VBS Script help
Hi All I have a script that installs 3 components and runs a check disk. This script uses the getfoldername api but I want to point it to the exact location (desktop central requires it). I have attached the script and would like to know what lines I would change in this to the network path of the location of the file. I didn't write this, thanks:
0 Comments
[ + ] Show comments
Answers (5)
Please log in to answer
Posted by:
anonymous_9363
14 years ago
This script uses the getfoldername apiReally? Where? It sets up a container for the FileSystemObject object but doesn't use it, nor does it contain the word 'folder'.
And when you say "I want it to point to the exact location", what exactly is "it"?
Posted by:
BerkApp
14 years ago
Sorry about that - I was trying to make some changes myself and attached the wrong script. Here is the original:
Posted by:
Jsaylor
14 years ago
If I'm parsing what you're asking right, you want to hardcode the files locations to a ____ network path instead of the script path. To do that, replace these lines:
With something that would look like this:
Also, uh, the "InstallationLogFileLocation" is defined, but it never gets used. Might consider removing those lines altogether since it's just clutter at this point.
Dim SGNClientPreinstallMSILocationFile
SGNClientPreinstallMSILocationFile = chr(34) & fso.GetParentFolderName(WScript.ScriptFullName) & "\SGxClientPreinstall.msi" & Chr(34)
Dim SDEClientMSILocationFile
SDEClientMSILocationFile = chr(34) & fso.GetParentFolderName(WScript.ScriptFullName) & "\sdeclient.msi" & Chr(34)
Dim SDEClientConfigMSILocationFile
SDEClientConfigMSILocationFile = chr(34) & fso.GetParentFolderName(WScript.ScriptFullName) & "\clientpkg.msi" & Chr(34)
Dim InstallationLogFileLocation
InstallationLogFileLocation = fso.GetParentFolderName(WScript.ScriptFullName)With something that would look like this:
Dim SGNClientPreinstallMSILocationFile
SGNClientPreinstallMSILocationFile = chr(34) & "\\SERVER\PATH\SGxClientPreinstall.msi" & Chr(34)
Dim SDEClientMSILocationFile
SDEClientMSILocationFile = chr(34) & "\\SERVER\PATH\sdeclient.msi" & Chr(34)
Dim SDEClientConfigMSILocationFile
SDEClientConfigMSILocationFile = chr(34) & "\\SERVER\PATH\clientpkg.msi" & Chr(34)
Dim InstallationLogFileLocation
InstallationLogFileLocation = "\\SERVER\PATH\"Also, uh, the "InstallationLogFileLocation" is defined, but it never gets used. Might consider removing those lines altogether since it's just clutter at this point.
Rating comments in this legacy AppDeploy message board thread won't reorder them,so that the conversation will remain readable.