繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- 图片展示效果 鼠标经过变大图，支持FF
- 可拖动可改变大小div的实现代码
- javascript 随机广告代码(图片广告)
- JS+Ajax+Jquery实现页面无刷新分页以及分组 超强的实现
- JQuery 浮动导航栏实现代码
- jQuery一步一步实现跨浏览器的可编辑表格，支持IE、Firefox、Safari、Chrome、Opera
- js 分栏效果实现代码
- 基于jQuery的ajax功能实现web service的json转化
- IE 条件注释详解总结（附实例代码）
- 用cssText批量修改样式
- JavaScript 应用技巧集合[推荐]
- jquery 导航设计实现代码 学习jquery的朋友可以看下
- 动态样式类封装JS代码
- 一步一步教你写一个jQuery的插件教程(Plugin)
- 使用jQuery的ajax功能实现的RSS Reader 代码
- jquery tools 系列 scrollable（2）
- jquery tools系列 overlay 学习
- jquery tools系列 expose 学习
- javascript十个最常用的自定义函数(中文版)
- javascript 流畅动画实现原理
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 426 ::
收藏到网摘: 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
