繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- 一定时间滚动的链接菜单效果
- 超链接的陷下效果
- 用js实现的打字效果的带链接的新闻标题
- js实现的很酷的连接提示效果
- 再谈IE中Flash控件的自动激活 ObjectWrap
- 超级兔子让浮动层消失的前因后果
- 在线编辑器的实现原理(兼容IE和FireFox)
- B/S开发中常用javaScript技术与代码
- 用JavaScript事件串连执行多个处理过程的方法
- Javascript中的Split使用方法与技巧
- HTML在线编辑器的基本概念与相关资料
- Js+DVML很酷漂亮实用的右键弹出菜单
- 用js实现的比较经典实用的触发型导航菜单
- js中slice()方法的使用说明
- 基础的prototype.js常用函数及其用法
- 常用限制input的方法的js代码
- 又一个图片自动缩小的JS代码
- JavaScript触发器详解
- 理解Javascript的caller,callee,call,apply区别
- 一个简单的日历代码 (For: FF1+ IE5+ Opr7+)测试
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 283 ::
收藏到网摘: 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
