Not sure if this will work in 98 but try it:
loShell = Createobject('WScript.Shell')
? loShell.SpecialFolders("MyDocuments")
? loShell.SpecialFolders("DeskTop")
Jon
>I am trying to save a LNK file to users desktops using the following code:
>
>
>cFileName = "\\baker\apps\QuestPDMHangers\CheckHanger.bat"
>cLinkName = "CheckHanger002.LNK"
>cDestination = "C:\Documents and Settings\lewisn\Desktop"
>
>oShell = CREATEOBJECT('WScript.Shell')
>olink = oShell.CreateShortcut(cDestination +"\"+ cLinkName)
>oLink.TargetPath = cfilename
>oLink.Arguments = "00001"
>oLink.Save()
>
>
>The problem is cDestination assumes the windows OS path is C:\Documents and Folders. IS there a global way of sending files to the desktop. i.e. \\
\desktop. The reason I ask is that some users may have windows 98 which doesnt have this path for its desktop.
>
>Any suggestions?