繁體中文当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Save a File Using a File Save Dialog Box
- Javascript
- JavaScript 图片放大镜（可拖放、缩放效果）
- javascript textarea支持图形编辑
- 各种效果的jquery ui(接口)介绍
- js点小图显示大图的切换功能代码
- js怎样实现下拉框改变，它旁边的图像也改变
- js模拟电脑选择多文件夹效果_选区代码
- js实现小鱼吐泡泡在页面游动特效
- Javascript拖拽系列文章2之offsetLeft、offsetTop、offsetWidth、offsetHeight属性
- js抓人游戏
- JavaScript的学习入门整理篇
- Js动态创建div
- Javascript拖拽&拖放系列文章3之细说事件对象
- javascript不同页面传值的改进版
- select组合框option的捕捉实例代码
- 初学JavaScript第一章
- 初学JavaScript_03(ExtJs Grid的简单使用)
- jquery的颜色选择插件实例代码
- 鼠标跟随效果代码
- JS版网站风格切换实例代码
- javascript支持IE和firefox(FF)的渐变透明效果
Javascript 中的 Save a File Using a File Save Dialog Box
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-12 浏览: 571 ::
收藏到网摘: 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
