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

Javascript
js类后台管理菜单类-MenuSwitch
符合标准的js表单提交的代码
js实现的层变换效果
一个js随机颜色脚本(用于标签页面,也可用于任何页面)
轻松实现HTML和JS之间的转化的代码
完整显示当前日期和时间的JS代码
写了个XML+Tree无穷树js版
指定js可访问其它域名的cookie的方法
惰性函数定义模式 使用方法
从阿里妈妈发现的几个不错的表单验证函数
js定义对象简单学习例子
js的with语句使用方法
js有效数字 显示指定位数
js 生成密匙流 脚本代码
js使用对象直接量创建对象的代码
百度前台js笔试题与答案
用JS输入email的代码,以防垃圾邮件
一种让页面完全把过来显示的脚本代码
让getElementsByName适应IE和firefox的方法
奇妙的js

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


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