繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- 添加到收藏夹代码（兼容几乎所有的浏览器）
- innerHTML在Mozilla Firefox和Opera下执行的一个特例情况。
- 尽可能写"友好"的"Javascript"代码
- 在修改准备发的批量美化select+可修改select时，在非IE下发现了几个问题
- 添加一个以前写的table的spliter给大家
- 鼠标滚轮编程
- googlemap 之 javascript实现方法
- Javascript - 全面理解 caller，callee，call，apply
- 简单的仿Flash文字动画（兼容Mozilla）
- 客户端脚本中常常出现的一些问题和调试技巧
- Prototype使用指南之hash.js
- 做网页的一些技巧（续）
- JavaScript中“+=”的应用
- Javascript的IE和Firefox兼容性汇编(zz)
- js滚动条多种样式,推荐
- 微调数字
- Div上下居中
- 初探jquery：表单应用范例
- [原创]保存的js无法执行的解决办法
- 用javascript实现“闪动”标题栏
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 494 ::
收藏到网摘: 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
