中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [求助]VBS的保存对话框

作者:

标题: [求助]VBS的保存对话框

上一主题 | 下一主题

77720666
初级用户

积分 59
发帖 46
注册 2007-4-10
状态离线

『楼主』: [求助]VBS的保存对话框

这段代码网上找的~ 为什么2000和XP不能运行~只有2003才能运行

Set objDialog = CreateObject("SAFRCFileDlg.FileSave")
Set objFSO = CreateObject("Scripting.FileSystemObject")
objDialog.FileName = "test"
objDialog.FileType = ".TXT"
intReturn = objDialog.OpenFileSaveDlg
If intReturn Then
msgbox objDialog.FileName & objdialog.filetype
Else
Wscript.Quit
End If

2008-11-11 22:42

查看资料发送邮件发短消息网志

编辑帖子

引用回复

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 2 楼』:

UserAccounts.CommonDialog

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-11-11 23:33

查看资料发短消息网志

编辑帖子

引用回复

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 3 楼』:

XP SP2测试你的代码也可以用...

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-11-11 23:35

查看资料发短消息网志

编辑帖子

引用回复

77720666
初级用户

积分 59
发帖 46
注册 2007-4-10
状态离线

『第 4 楼』:

Originally posted by slore at 2008-11-11 11:35 PM: XP SP2测试你的代码也可以用...

我电脑就是XP SP2的~ 运行弹出如图片提示~ 我用的是精简版的系统~难道被精简掉了~~~~` 那有什么解决办法？

附件 1: 未命名.JPG (2008-11-12 00:26, 14.33 K)

2008-11-12 00:16

查看资料发送邮件发短消息网志

编辑帖子

引用回复

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 5 楼』:

C:\WINDOWS\system32\safrcdlg.dll 存在么？如果存在，运行 regsvr32 safrcdlg.dll看看。

此帖被 +2 点积分点击查看详情

S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore

2008-11-12 13:00

查看资料发短消息网志

编辑帖子

引用回复

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: