繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- JavaScript 自动完成脚本整理(33个)
- 7个Javascript地图脚本整理
- JavaScript 事件记录使用说明
- Javascript remove 自定义数组删除方法
- fireworks菜单生成器mm_menu.js在 IE 7.0 显示问题的解决方法
- Jquery Ajax.ashx 高效分页实现代码
- extjs 学习笔记 四 带分页的grid
- javascript void(0)的妙用
- 用Javascript 编写可以缓慢弹出收缩的层
- 再谈ie和firefox下的document.all属性
- JavaScript 常用函数库详解
- JS 截取字符串substr 和 substring方法的区别
- Domino中运用jQuery读取视图内容的方法
- Js+CSS 文字渐隐渐现显示
- Javascript 小写字母依次变为大写
- JavaScript 炫彩的文字
- javascript 洒脱飘动的文字
- JavaScript 平滑文字闪烁
- 仿打字特效的JS逐字出现的信息文字
- JavaScript数组应用 可依次读取的公告栏文字
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 335 ::
收藏到网摘: 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
