troubleshooting Question

VBS Script to create shortcut to folder

Avatar of sasdaniels
sasdaniels asked on
Visual Basic Classic
3 Comments1 Solution5779 ViewsLast Modified:
Hi this is a script I used for an exe (someone helped me!), it creates a folder on desktop ok, but, I get the what program do you want to use prompt - funnily enough if I pick Internet Explorer it does open the folder. So maybe I need to associate the .lnk with explorer.exe in some way ? Possible in objShortCut.Arguments ? (thats leftover/unused script at moment . .)

Set objShell = WScript.CreateObject("WScript.Shell")
strDesktopFolder = objShell.SpecialFolders("AllUsersDesktop")

Set objShortCut = objShell.CreateShortcut(strDesktopFolder & "\Manuals & Procedures.lnk")
objShortCut.TargetPath = """W:\Office Manual"""                                           '<-- only the executable
'objShortCut.Arguments =" -pf s:\config\help.pf -basekey INI -ininame s:\config\help.ini -T ""%TEMP%"""    '<-- argument stored in here
objShortCut.Description = "Manuals & Procedures"
objShortCut.IconLocation = "C:\WINDOWS\system32\SHELL32.dll, 19"
objShortCut.Save
ASKER CERTIFIED SOLUTION
EDDYKT

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Join our community to see this answer!
Unlock 1 Answer and 3 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 3 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros