1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
on error resume Next
Set objDialog=CreateObject( "UserAccounts.CommonDialog" )
objDialog.Filter= "仅支持xls格式文件|*.xls"
objDialog.InitialDir="C:\" intResult=objDialog.ShowOpen If intResult=0 Then
Wscript.Quit Else If Right(objDialog.FileName,3)= "xls" Then
Wscript.Echo objDialog.FileName Else Wscript.Echo "你选择的文件格式不支持"
Wscript.Quit End If
End If
|
相关文章
- 12-21WPF 选择文件选择文件夹
- 12-21<<< 将一个rar格式的文件变成一张jpg图片,按照后缀来选择打开他的模式
- 12-21选择目录,选择文件夹的COM组件问题。在可以调用 OLE 之前,必须将当前线程设置为单线程单元(STA)模式。请确保您的 Main 函数带有 STAThreadAttribute 标记。 只有将调试器附加到该进程才会引发此异常。
- 12-21后缀为.ppt和.pps的文件无法选择打开方式
- 12-21配置文件和数据库配置选择
- 12-21android – 如何使用Locale和Configuration选择不同的资产文件作为我的语言更改?
- 12-21c – 允许IFileOpenDialog选择尚未创建的文件
- 12-21Dav 错误: 输入的文件夹似乎无效。请选择另一个。
- 12-21使用input:file控件在微信内置浏览器上传文件返回未显示选择的文件
- 12-21windows目录选择 文件选择 文件保存对话框