当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box

Javascript
[HTML/CSS/Javascript]WWTJS
DynamicOptionList连动菜单代码
用meta实现的页面跳转代码
带缓冲的 收缩与展开内容效果
删除数组条目中重复的条目(可能有多个),返回值是一个仅包含被删除的重复条目的新数组。
javascript入门·对象属性方法大总结
javascript入门·动态的时钟,显示完整的一些方法,新年倒计时
JavaScript 入门·JavaScript 具有全范围的运算符
用javascript实现模拟火焰
JavaScript加密解密7种方法总结分析
javascript一段创建层的代码
简洁的一个实现网页全屏代码
关于 byval 与 byref 的区别分析总结
表单填写时用回车代替TAB的实现方法
javascript currentTarget对象介绍
js文本中搜索关键词输入效果
javascript实现的左右选择框效果代码
JS网络游戏-(模拟城市webgame)提供的一些例子下载
javascript最短的拖动代码[兼容FF]
javascript实现的LI列表输出,隔行同色的代码

Javascript 中的 Save a File Using a File Save Dialog Box


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 310 ::
收藏到网摘: 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