PureBasic Forums - English

Posted: **Wed Jan 13, 2021 7:33 pm**

Why this procedure output is ever = 1 ?? (no matter if key exists or not)

Procedure.i RegKeyExists(exePath$)

  Protected Key.l = #HKEY_CURRENT_USER
  Protected Path.s = "Software\Microsoft\Windows\CurrentVersion\Run"
  Protected Value.s = "TEST"
  Protected String.s = Chr(34)+exePath$+Chr(34)
  Protected CurKey.l
  
      Define res.l=RegOpenKeyEx_(Key,@Path,0,#KEY_ALL_ACCESS,@CurKey)
      If res<>#ERROR_SUCCESS
        RegCloseKey_(CurKey)
        ProcedureReturn 0
      Else
        RegCloseKey_(CurKey)
        ProcedureReturn 1        
      EndIf
EndProcedure

Posted: **Wed Jan 13, 2021 8:02 pm**

I've figured out why happen this (this key already exists

)

Then perhaps I must read the inside key value?

I see an: RegSetValueEx_ but not a: RegGetValueEx_

Any help apreciate

Posted: **Wed Jan 13, 2021 8:23 pm**

Nevermind, I already found: RegQueryValueEx_
Thanks anyway

PureBasic Forums - English

How to check if a register key exists?

How to check if a register key exists?

Re: How to check if a register key exists?

Re: How to check if a register key exists?