[VBS] process at commandline schduler

[Verwijderd]

Hallo,

hoop dat dit de juiste plaats is om deze vraag te stellen,

Ik moet een at command in een runonce entry gooien met voorkeur via VBS, dus iets in de trend van

Dim objShell, RegLocate, RegLocate1
Set objShell = WScript.CreateObject("WScript.Shell")

RegLocate = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce\filetorun"
objShell.RegWrite RegLocate,"at 1:30 /INTERACTIVE /EVERY:S "C:\filetorun.vbs"","REG_SZ"

wscript.quit

Als ik ipv ""at 1:30 /INTERACTIVE /EVERY:S "C:\filetorun.vbs"" "test" erin gooi werkt het prima, maar hij komt nu met expected end of statement, vanwege de at ?, ik moet het commando dus als een value laten zien en niet als iets wat het script moet uitlezen, ""()'' etc,werkt allemaal niet

waarschijnlijk heel simpel, maar ik kan het niet vinden met google, waarschijnlijk omdat ik niet weer waar ik naar moet zoeken, google tips zijn ook altijd welkom

Many Thanks

R.

[remco_k]

Moet je niet quoten in VBS? (geen idee, maar het lijkt me aannemelijk)

Zo

VBScript:

objShell.RegWrite RegLocate,"at 1:30 /INTERACTIVE /EVERY:S \"C:\\filetorun.vbs\"","REG_SZ"

Of misschien zo:

VBScript:

objShell.RegWrite RegLocate,"at 1:30 /INTERACTIVE /EVERY:S  ""C:\filetorun.vbs""","REG_SZ"

[ Voor 77% gewijzigd door remco_k op 17-08-2007 13:44 ]

[Verwijderd]

remco_k schreef op vrijdag 17 augustus 2007 @ 13:40:
Moet je niet quoten in VBS? (geen idee, maar het lijkt me aannemelijk)

Zo

VBScript:

objShell.RegWrite RegLocate,"at 1:30 /INTERACTIVE /EVERY:S \"C:\\filetorun.vbs\"","REG_SZ"

Of misschien zo:

VBScript:

objShell.RegWrite RegLocate,"at 1:30 /INTERACTIVE /EVERY:S  ""C:\filetorun.vbs""","REG_SZ"

Sorry, Maar dat doe ik toch ? lama,

at 1:30 /INTERACTIVE /EVERY:S ""C:\filetorun.vbs"""

dat werkt, thanks,

[ Voor 9% gewijzigd door Verwijderd op 17-08-2007 13:44 ]

[remco_k]

Verwijderd schreef op vrijdag 17 augustus 2007 @ 13:42:
[...]

Sorry, Maar dat doe ik toch ? lama,
at 1:30 /INTERACTIVE /EVERY:S ""C:\filetorun.vbs"""

dat werkt, thanks,

mmm was wel een beetje basic heh...

[mhoogendam]

Iets kortere versie

VBScript:

Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")

WshShell.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce\filetorun" ,"at 1:30 /INTERACTIVE /EVERY:S ""C:\filetorun.vbs""","REG_SZ"

wscript.quit

[Verwijderd]

Beetje Basic ja, ik voel me net een druif nu

Thanks
R.