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

Javascript
图片跟随的代码
对联广告js flash激活
用js怎么把&字符换成"&amp:"
动态加载js的几种方法
改进版:在select中添加、修改、删除option元素
关于搜索输入框
添加、删除HTML结点 & 上传图片预览
一个JavaScript继承的实现
this.clientWidth和this.offsetWidth两个有什么不同
实现iframe延时加载
document.styleSheets[0].disabled
一个级联菜单(IE ONLY),不过代码很精简!
xmlHTTP实例
有趣的思路~~JS仿 WINXP 注销桌面渐隐效果
Hutia 的 JS 代码集
PJ Blog修改-禁止复制的代码和方法
如何限制在一个表格里面禁止使用右键
怎样调用动态获取的自定义对象的方法
12个div逐个显示效果
挺酷的一个倒计时

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


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