繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- JavaScript 渐变效果页面图片控制
- JavaScript blog式日历控件新算法
- Javascript 读后台cookie代码
- js 弹簧效果代码
- JavaScript滑移效果代码
- javascript字符串拆分成单个字符相加和不超过10，求最终值
- Prototype中dom对象方法汇总
- Jquery与Prototype混合用法对比
- javascript下IE与FF兼容函数收集
- 突破winxp sp2/win2003 sp2超强弹窗代码
- js点击出现场层层外点击层消失的代码
- Javascript模拟scroll滚动效果脚本
- javascript各种复制代码收集
- javascript的trim,ltrim,rtrim自定义函数
- 仿3721首页模块拖曳移动效果js代码[可拖曳层移动层]
- Javascript拖拽系列文章1之offsetParent属性
- Discuz! 6.1_jQuery兼容问题
- js日历控件（可精确到分钟）
- javascript DOM实用学习资料
- javascript实现的树型下拉框改进版
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 460 ::
收藏到网摘: 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
