Question Thanks for helping out. I am able to create an internet shortcut to the desktop via available vbscript but haven't been able to figure out how to create this in a program files subfolder. Here's the code I am using to create one on the desktop. Thanks again for your help. Alan
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oUrlLink = WshShell.CreateShortcut(strDesktop & "\Setup.url")
oUrlLink.TargetPath = "http://www.clnmnd.com"
oUrlLink.Save
Answer Hi Alan,
can you email me value of strDesktop variable has.
If it is this
C:\windows\desktop
then use this code
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oUrlLink = WshShell.CreateShortcut(mid(strdesktop,1,instr(1,strdesktop,"\"))&"Program Files" & "\Setup.url")
oUrlLink.TargetPath = "http://www.clnmnd.com"
oUrlLink.Save
