mirror of
https://github.com/signalwire/freeswitch.git
synced 2025-02-05 02:34:18 +00:00
836bd19070
git-svn-id: http://svn.freeswitch.org/svn/freeswitch/trunk@54 d0543943-73ff-0310-b7d9-9358b9ac24b2
12 lines
329 B
Plaintext
12 lines
329 B
Plaintext
Set WshShell = WScript.CreateObject("WScript.Shell")
|
|
Set objArgs = WScript.Arguments
|
|
|
|
'system, user, or process
|
|
wscript.echo Showpath(objargs(0))
|
|
|
|
Function Showpath(folderspec)
|
|
Dim fso, f
|
|
Set fso = CreateObject("Scripting.FileSystemObject")
|
|
Set f = fso.GetFolder(folderspec)
|
|
showpath = f.path
|
|
End Function |