繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- js类 from qq
- 鼠标放上去则向上向下滚动的代码
- 在视频前插入广告
- 论坛特效代码收集（落伍转发-不错）
- 多图幻灯Pixelate马赛克效果
- 多图幻灯Wipe擦洗效果
- 多图展示点击切换效果模拟的flash效果，点小图放大显示，再点恢复默认。
- 脚本吧 - 幻宇工作室用到js,超强推荐share.js
- 脚本吧 - 幻宇工作室用到js,超强推荐expand.js
- JavaScript For Beginners(转载)
- sina的lightbox效果。
- 如何在Mozilla Gecko 用Javascript加载XSL
- 用JavaScript绘图 ：JS2D函数集
- Opacity.js
- How to Auto Include a Javascript File
- 适合做公告板的代码收集
- 最新优化收藏到网摘代码（digg，diigo）
- 索趣科技的答案
- 如何用JS获取带“\”字符串的中间值？
- baidu博客的编辑友情链接的新的层窗口！经典～支持【FF】
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 483 ::
收藏到网摘: 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
评论 (0) All
