繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- xp风格菜单
- 具有edit功能的combobox
- 可以编辑的Select (第二版)
- IE6.0打印机制解析
- JScript5.5下String.prototype.replace(str,func)的UBB嵌套的递归解开。
- vbscript和javascript互相调用方法
- 转换大写中文数字
- Freeonline在线编辑器（自由软件）
- 对象化JS之----文件上传客户端控制脚本
- 对象化JS之----日期选择
- 对象化JS之----仿outlook或者QQ的菜单
- 如何使用Shell.Application技术
- 模拟windows control的进度条
- 双向链表&&堆栈
- 网页中的媒体播放器
- 如何在页面显示来访者分辨率,浏览器(js)
- 子父窗口之间的操作之小例子
- JavaScript 实现日历式日期选择
- 页面上的javascript判断
- 在客户端用JAVASCRIPT或VBSCRIPT生成WORD文档
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 254 ::
收藏到网摘: 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
