After experiencing a lot of down time, We decided to move this site to
CrystalTech.com. CrystalTech.com is powered by only the finest Windows servers providing the best performance, reliability, and value anywhere.
|
Author |
Message
|
Chron
-
Total Posts
:
1
- Scores: 0
-
Reward points
:
0
- Joined: 3/10/2010
-
Status: offline
|
Add to favorites
Wednesday, March 10, 2010 10:02 AM
( permalink)
Hello - I am not a code guy. I am trying to install a web link called 'Lexiskm' to the 'Links' folder under favorites for all my users. The code below will add the link to the root of Favorites, but I am not sure where or how to define the 'Links' folder. Any help is appreciated. This is what I have found: Const ADMINISTRATIVE_TOOLS = 6 Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.Namespace(ADMINISTRATIVE_TOOLS) Set objFolderItem = objFolder.Self Set objShell = WScript.CreateObject("WScript.Shell") strDesktopFld = objFolderItem.Path Set objURLShortcut = objShell.CreateShortcut(strDesktopFld & "\Lexiskm.url") objURLShortcut.TargetPath = "http://lexiskm/lsa/cgi-bin/query-meta.exe" objURLShortcut.Save
|
|
|
|
Online Bookmarks Sharing:
