Lave et lille vb til mig

Hey Daniel !
Hvad er det for en key, der skal kigges efter ??

/Killer

Set objShell = WScript.CreateObject ("WSCript.shell")

On Error Resume Next

RegKey = objShell.regread("<Reg key>")

If Err.Number then

Wscript.Echo("Reg key does not exist")

Else

Wscript.Echo("Reg Key exists")

End If

//>Rune

Og så åbner du filen sådan her:

objShell .run "c:\winnt\system32\Ica_PassThrough\pn.exe", 6, True
set objShell = nothing

//>Rune

Altså:

Set objShell = WScript.CreateObject ("WSCript.shell")

On Error Resume Next

RegKey = objShell.regread("<Reg key>")
If Err.Number Then
  Wscript.Echo("Reg key does not exist")
Else
  objShell .run "c:\winnt\system32\Ica_PassThrough\pn.exe", 6, True
End If

Set objShell = nothing

//>Rune

så skal den bare lige kunne oprette en regkey efter den har kørt exe filen

Det er ikke testet af men prøv med:

Set objShell = WScript.CreateObject ("WSCript.shell")

On Error Resume Next

RegKey = objShell.regread("<Reg key>")
If Err.Number Then
  objShell.RegWrite("<regkey>")
Else
  objShell .run "c:\winnt\system32\Ica_PassThrough\pn.exe", 6, True
End If

Set objShell = nothing

//>Rune

Her har du hvordan du skriver til RegDB:

http://www.devguru.com/Technologies/wsh/quickref/wshshell_RegWrite.html

//>Rune