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

Javascript
用new Image()预先加载图片真的有用吗?
超级susymenu实现top菜单
新版本susymenu树形菜单,请大家指教、分享
javascript入门·图片对象(无刷新变换图片)\滚动图像
国外Lightbox v2.03.3 最新版 下载
javascript渐变显示的雅虎中国选项卡效果代码
用javascript来实现select标签的美化的代码
用javascript实现改善用户体验之alert提示效果
Auntion-TableSort javascript类文件
javascript 新闻切换技术
JS代码判断集锦大全
[原创]用javascript实现检测指定目录是否存在的方法
JavaScript中的其他对象
[原创]来自ImageSee官方 JavaScript图片浏览器
用js 让图片在 div或dl里 居中,底部对齐
网页代码常用小技巧总结
可以自动轮换的页签 tabs with auto play fucntion
js判断一点是否在一个三角形内
DHTML Slide Show script图片轮换
JS event使用方法详解

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


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