◎Vbs脚本编程简明教程之十二—使用系统对话框
来源:互联网 发布:java面向对象的理解 编辑:程序博客网 时间:2024/05/16 06:18
在VBS脚本设计中,如果能使用windows提供的系统对话框,可以简化脚本的使用难度,使脚本人性化许多,很少有人使用,但VBS并非不能实现这样的功能,方法当然还是利用COM对象。
1、SAFRCFileDlg.FileSave对象:属性有:FileName — 指定默认文件名;FileType —
指定文件扩展名;OpenFileSaveDlg — 显示文件保存框体方法。
2、SAFRCFileDlg.FileOpen 对象:FileName — 默认文件名属性;OpenFileOpenDlg — 显示打开文件框体方法。
3、UserAccounts.CommonDialog对象:Filter — 扩展名属性("vbs File|*.vbs|All Files|*.*");
FilterIndex — 指定
InitialDir — 指定默认的文件夹
FileName — 指定的文件名
Flags — 对话框的类型
Showopen方法:
很简单,ok,让我们来举两个简单的例子:
例一:保存文件
Set objDialog = CreateObject("SAFRCFileDlg.FileSave")
Set objFSO = CreateObject("Scripting.FileSystemObject")
objDialog.FileName = "test"
objDialog.FileType = ".txt"
intReturn = objDialog.OpenFileSaveDlg
If intReturn Then
objFSO.CreateTextFile(objDialog.FileName & objdialog.filetype)
Else
Wscript.Quit
End If
注意:1、SAFRCFileDlg.FileSave对象仅仅是提供了一个方便用户选择的界面,本身并没有保存文件的功能,保存文件还需要使用FSO对象来完成。2、用FileType属性来指定默认的文件类型。3、在调用OpenFileSaveDlg方法时,最好把返回值保存到一变量中,用它可以判断用户按下的是确定还是取消。
例二:.打开文件
set objFile = CreateObject("SAFRCFileDlg.FileOpen")
intRet = objFile.OpenFileOpenDlg
if intret then
msgbox “文件打开成功!文件名为:” & objFile.filename
else
wscript.quit
end if
例三:比较复杂的打开文件对话框
Set objDialog = CreateObject("UserAccounts.CommonDialog")
objDialog.Filter = "vbs File|*.vbs"
objDialog.InitialDir = "c:/"
tfile=objDialog.ShowOpen
if tfile then
strLoadFile = objDialog.FileName
msgbox strLoadFile
else
wscript.quit
end if
- ◎Vbs脚本编程简明教程之十二—使用系统对话框
- Vbs脚本编程简明教程之十二
- ◎Vbs脚本编程简明教程之十 —— Vbs脚本编程常用的编辑器
- ◎Vbs脚本编程简明教程之二—如何开始第一个Vbs脚本?
- ◎Vbs脚本编程简明教程之十三 —使用dictionary对象
- ◎Vbs脚本编程简明教程之三—Vbs的基本语法(牢记)
- ◎Vbs脚本编程简明教程之四—如何利用Vbs运行外部程序?
- ◎Vbs脚本编程简明教程之十四—VBS内置函数
- ◎Vbs脚本编程简明教程之三—Vbs的基本语法(牢记)
- ◎Vbs脚本编程简明教程之四—如何利用Vbs运行外部程序?
- ◎Vbs脚本编程简明教程之一—为什么要使用Vbs?
- Vbs脚本编程简明教程之二
- Vbs脚本编程简明教程之三
- Vbs脚本编程简明教程之四
- Vbs脚本编程简明教程之五
- Vbs脚本编程简明教程之六
- Vbs脚本编程简明教程之七
- Vbs脚本编程简明教程之八
- 编译期错误、连接错误
- Linux命令速查(资料)
- 使用Hashtable对字符串进行碰撞
- ◎Vbs脚本编程简明教程之十一 ——FSO中文件的基本操作
- 使用div仿javascript模态窗口
- ◎Vbs脚本编程简明教程之十二—使用系统对话框
- Installing Oracle 8i Release 3 (8.1.7)
- 得到SDK 运行时库的位置的Code
- 数据库设计方法、规范与技巧(推荐)
- 将access导入SQL server 的方法
- 决不要重新定义继承而来的缺省参数值
- ◎Vbs脚本编程简明教程之十三 —使用dictionary对象
- JSP乱码问题解决方法
- SQL SERVER 与ACCESS、EXCEL的数据转换