Hoi ik zit met een klein probleem wat ik maar niet opgelost krijg. Het wil de regfile niet runnen. Wat doe ik fout?
'On Error Resume Next
Dim WshShell, sysd, deploy, reg
set fso = CreateObject("scripting.filesystemobject")
set WshShell = WScript.CreateObject("WScript.Shell")
sysd = WshShell.ExpandEnvironmentStrings("%ProgramFiles%")
deploy = sysd & "\dameware\"
reg = "ClearUserSettingsNt5.reg"
If fso.folderexists (deploy) Then
WshShell.Run "REGEDIT /S " & deploy & reg
WshShell.Popup "Successfully imported", 0, "Good", 64
WScript.Quit
Else
WshShell.Popup "Doet het niet", 0, "Bad", 48
End if
En ja de reg file staat op die locatie
'On Error Resume Next
Dim WshShell, sysd, deploy, reg
set fso = CreateObject("scripting.filesystemobject")
set WshShell = WScript.CreateObject("WScript.Shell")
sysd = WshShell.ExpandEnvironmentStrings("%ProgramFiles%")
deploy = sysd & "\dameware\"
reg = "ClearUserSettingsNt5.reg"
If fso.folderexists (deploy) Then
WshShell.Run "REGEDIT /S " & deploy & reg
WshShell.Popup "Successfully imported", 0, "Good", 64
WScript.Quit
Else
WshShell.Popup "Doet het niet", 0, "Bad", 48
End if
En ja de reg file staat op die locatie