|
Function SelectFile( )
Dim $objSHELLexec, $CMD, $objSHELL
$SelectFile=""
$CMD='mshta.exe "about:" '
$objSHELL=CreateObject("WScript.Shell")
$objSHELLexec=$objSHELL.Exec($CMD)
$SelectFile=$objSHELLexec.StdOut.ReadLine( )
EndFunction
Edited by Allen (2026-09-10 10:03 PM)
| 
