Pages

Showing posts with label set directory to shortcut using script. Show all posts
Showing posts with label set directory to shortcut using script. Show all posts

Thursday, 23 July 2009

Set Working Directory of Shortcut

Set objShell = WScript.CreateObject("WScript.Shell")
Set objShtCut = objShell.Createshortcut("D:\Documents and Settings\All Users\Start Menu\Programs\MKS Toolkit\Evaluation Guide\For Systems Administrators\Desktop Shortcuts.lnk")
objShtCut.WorkingDirectory = "C:\PROGRA~1\MKSTOO~1\Demonstrations\bin"
objShtCut.Save
'WScript.Echo objShtCut.WorkingDirectory