Demonstration script that displays a File Open dialog box (open to the folder C:\Scripts), and then echoes back the name of 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
Set objDialog = CreateObject("")
= "VBScript Scripts|*.vbs|All Files|*.*"
= 1
= "C:\Scripts"
intResult =
If intResult = 0 Then
Else
End If
Windows Server 2003
No
Windows XP
Yes
Windows 2000
No
Windows NT 4.0
No
Windows 98
No
Script Code
Copy the codeThe code is as follows:
Set objDialog = CreateObject("")
= "VBScript Scripts|*.vbs|All Files|*.*"
= 1
= "C:\Scripts"
intResult =
If intResult = 0 Then
Else
End If