当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box

Javascript
JavaScript效率调优经验
IE8 兼容性问题(属性名区分大小写)
javascript globalStorage类代码
一些常用的JS功能函数(2009-06-04更新)
js 鼠标点击事件及其它捕获
IE innerHTML,outerHTML所引起的问题
Firefox outerHTML实现代码
JavaScript 封装Ajax传递的数据代码
javascript 手机号码验证是否正确
javascript 冒号 使用说明
javascript 获取链接文件地址中第一个斜线内的正则表达式
JavaScript 回车 焦点切换
javascript 禁止复制网页
图片连续滚动代码[兼容IE/firefox]
犀利的js 函数集合
firefo xml 读写实现js代码
动态刷新 dorado树的js代码
javascript 框架小结 个人工作经验
Javascript 学习书 推荐
javascript getElementByTagName的使用

Javascript 中的 Save a File Using a File Save Dialog Box


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 555 ::
收藏到网摘: n/a

Demonstration script that allows you to enter a file name in a File Save dialog box, and then saves a sample text file (consisting entirely of the current date) under that file name.
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("SAFRCFileDlg.FileSave")
objDialog.FileName = "C:\Scripts\Script1.vbs"
objDialog.FileType = "VBScript Script"
intReturn = objDialog.OpenFileSaveDlg
If intReturn Then
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile(objDialog.FileName)
objFile.WriteLine Date
objFile.Close
Else
Wscript.Quit
End If