繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- 点击广告后才能获得下载地址
- document.open() 与 document.write()
- 定单管理上 JS表格排序
- js传值 判断
- 动态改变textbox的宽高的js
- 如何用javascript控制上传文件的大小
- 利用XMLHTTP传递参数在另一页面执行并刷新本页
- 发表文章时自动保存到剪贴板
- 取得传值的函数
- 拖动层
- 按键测试，支持像 Ctrl+Alt+Shift+T 的组合键
- 将多选框选中时打勾的颜色
- 脚本和web页共用同一个文件测试
- 教学演示-UBB,剪贴板,textRange及其他
- 仿YAHOO的一个小效果 下拉效果
- 多线程的全选复选框
- 一些实用的TAB效果
- Js中sort()方法的用法
- js计数器代码
- 破除一些网站复制、右键限制
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 324 ::
收藏到网摘: 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
