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

Javascript
用Javascript轻松制作抽奖系统
一个鼠标效果,代码简单易懂,效果不错的
JavaScript的目的
时钟显示在任意指定位置
浅谈在网页上显示日期的两种方法
设计干净的链接
动态CSS,换肤技术
说不清的 childNodes
innerHTML和innerText的使用方法
Web开发:Javascript是Web开发正确方向的一个错误吗?
JS特效代码:实现间歇无缝文字滚动特效
Javascript编程语言和DOM接口系列教程(1)
JS实例教程:用6N±1法求素数
Firefox的Jetpack扩展案例分析:Gmail邮件提醒
JS小游戏实例:2D桌面台球
JS实例教程:制作图片放大特效
用Ant构建JavaScript组件
JavaScript组件:编码实现和算法
JS教程:制作颜色梯度和渐变效果
JS编码技巧:翻译的14天JS编写技巧

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


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