中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-10 08:59

共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,255 会员排行

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

可打印版本　785 / 4

第1楼　77720666	发表于 2008-11-11 22:42
初级用户　发帖 46　积分 59
[求助]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

第2楼　slore	发表于 2008-11-11 23:33
铂金会员　发帖 2,478　积分 5,212
UserAccounts.CommonDialog

第3楼　slore	发表于 2008-11-11 23:35
铂金会员　发帖 2,478　积分 5,212
XP SP2测试你的代码也可以用...

第4楼　77720666	发表于 2008-11-12 00:16
初级用户　发帖 46　积分 59
Originally posted by slore at 2008-11-11 11:35 PM: XP SP2测试你的代码也可以用... 我电脑就是XP SP2的~ 运行弹出如图片提示~ 我用的是精简版的系统~难道被精简掉了~~~~` 那有什么解决办法？附件未命名.JPG (14.33 KiB)

第5楼　slore	发表于 2008-11-12 13:00
铂金会员　发帖 2,478　积分 5,212
C:\WINDOWS\system32\safrcdlg.dll 存在么？如果存在，运行 regsvr32 safrcdlg.dll看看。

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023