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

Javascript
脚本收藏iframe
自适应图片大小的弹出窗口
Prototype1.4手册
3张图片循环组和(很有动感)
图片加载进度实时显示
收藏一个代码
点击变化图象 不错
去除链接虚线全面分析总结
如何用JS取得网址中的文件名
新页面打开实际尺寸的图片
js的event详解。
js输入中文效果
图片完美缩放
图片自动更新(说明)
Ajax Blog 用到的几个函数
js几个不错的函数 $$()
菜单效果
yahoo 页面的标签效果
Ucren Virtual Desktop V2.0
一段非常简单的让图片自动切换js代码

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


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