The following code illustrates the use of the
TargetPath property:
#INCLUDE "WSHOM.INC"
' Create an instance of the Windows Script Host
LOCAL pWsh AS IWshShell
pWsh = NEWCOM "WScript.Shell"
' Create a shortcut programatically (if it already exists, CreateShortcut opens it)
LOCAL pLnk AS IWshURLShortcut
pLnk = pWsh.CreateShortcut(UCODE$(EXE.Path$ & "Microsoft Web Site.url"))
' Sets the TargetPath property
pLnk.TargetPath UCODE$("http://www.microsoft.com")
' Saves the shortcut file to disk
pLnk.Save