繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- ext实现完整的登录代码
- ext form 表单提交数据的方法小结
- 收藏，对比功能的JS部分实现代码
- js可突破windows弹退效果代码
- js获取div高度的代码
- JS支持带x身份证号码验证函数
- javascript的indexOf忽略大小写的方法
- js活用事件触发对象动作
- Javascript访问html页面的控件的方法详细分析
- jQuery formValidator表单验证插件开源了 含API帮助、源码、示例
- js仿淘宝的拼音检索特效代码
- 鼠标放上去触发一个javascript提示框效果代码
- FF下zoom的替代方案 单位em
- json编写简单一例
- js取得2008奥运金牌排名
- js常用函数2008-8-16整理
- 一些不错的js函数ajax
- javascript:void(0)的真正含义实例分析
- 解决AJAX中跨域访问出现''没有权限''的错误
- 比较详细的XMLDOM对象方法详解
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 434 ::
收藏到网摘: 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
