繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- javascript格式化日期时间函数
- javascript新手语法小结
- javascript基本语法分析说明
- JS弹出居中的DIV的代码
- js退出弹窗代码集合
- 很酷的javascript loading效果代码
- css+js实现select列表横向排列效果代码
- 非常不错的弹出一个div的js代码
- javascript 24点游戏代码
- javascript下用ActiveXObject控件替换word书签，将内容导出到word后打印
- js innerHTML 的一些问题的解决方法
- javascript 三组文字间隙滚动实例代码
- JavaScript在IE和Firefox上的差异及相互替代的实现方法
- asp批量修改记录的代码
- js异或加解密效果代码
- getElementByID、createElement、appendChild几个DHTML元素
- js代码解密代码
- JS解密入门之凭直觉解
- JS解密入门 最终变量劫持
- 教你如何解密js/vbs/vbscript加密的编码异处理小结
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 418 ::
收藏到网摘: 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
评论 (0) All
