mirror of
https://github.com/signalwire/freeswitch.git
synced 2025-02-05 02:34:18 +00:00
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
|