Locate a file Using a file Open Dialog box_javascript Tips

Demonstration script that displays a File Open dialog box (open to the folder C:\Scripts), and then echoes back the name O  f the selected file. Supported platforms

Windows Server 2003
No

Windows XP
Yes

Windows 2000
No

Windows NT 4.0
No

Windows 98
No


Script Code

Copy Code code as follows:

Set Objdialog = CreateObject ("UserAccounts.CommonDialog")

Objdialog.filter = "VBScript scripts|*.vbs| All Files|*.* "
Objdialog.filterindex = 1
Objdialog.initialdir = "C:\Scripts"
Intresult = Objdialog.showopen

If intresult = 0 Then
Wscript.Quit
Else
WScript.Echo Objdialog.filename
End If