ScriptPath.vbs |
' This script shows how to determine the folder that contains the Script being run.
' For this and other interesting scripts, visit www.RichSchreiber.com
Option Explicit
Dim oFSO, strAppPath
Set oFSO = CreateObject("Scripting.FileSystemObject")
strAppPath = oFSO.GetParentFolderName(wscript.ScriptFullName)
msgbox "This script is currently running in folder:" & vbCrlf & strAppPath
wscript.quit