中国DOS联盟

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

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

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

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [已结] vbs脚本如何打开windows临时目录并打开指定文件呢

作者:

标题: [已结] vbs脚本如何打开windows临时目录并打开指定文件呢

上一主题 | 下一主题

cichulai
新手上路

积分 5
发帖 4
注册 2008-4-4
状态离线

『楼主』: [已结] vbs脚本如何打开windows临时目录并打开指定文件呢

如题！ [ Last edited by cichulai on 2009-2-18 at 03:59 ]

2009-2-16 18:13

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

newxso
初级用户

l i u s s

积分 73
发帖 101
注册 2008-9-17
来自 GZ
状态离线

『第 2 楼』:

Dim WshShell
Set WshShell = WScript.CreateObject("Wscript.Shell")
WshShell.Exec "explorer.exe ""%temp%"""
WshShell.Run "cmd.exe /c start """" ""%temp%\a.txt""",0 ,true
Set WshShell = Nothing

（RE：5楼） 知道了目录，后面加上路径及文件名就可以（以楼下everest79兄的代码为例）：

Dim WshShell
Set WshShell=CreateObject("WScript.Shell")
Set WshEnvP=WshShell.Environment("Process")
strFolder=WshEnvP("TEMP")
WshShell.Run strFolder
WshShell.Run strFolder & "\1.txt"

[ Last edited by newxso on 2009-2-18 at 10:32 ]

2009-2-17 00:56

查看资料发短消息网志

everest79
金牌会员

一叶枝头，万树皆春

积分 2564
发帖 1127
注册 2006-12-25
状态离线

『第 3 楼』:

Dim WshShell
Set WshShell=CreateObject("WScript.Shell")
Set WshEnvP=WshShell.Environment("Process")
WshShell.Run WshEnvP("TEMP")

49206C6F766520796F752067757973 54656C3A3133383238343036373837

2009-2-17 02:42

查看资料发短消息网志

cichulai
新手上路

积分 5
发帖 4
注册 2008-4-4
状态离线

『第 4 楼』:

谢谢newxso；everest792位的热心帮助

2009-2-17 14:08

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

cichulai
新手上路

积分 5
发帖 4
注册 2008-4-4
状态离线

『第 5 楼』:

everest79请问你的脚本怎么打开临时文件的指定文件呢比如说临时文件下的1.txt 再次麻烦了

2009-2-17 14:10

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

HAT
版主

积分 9023
发帖 5017
注册 2007-5-31
状态离线

『第 6 楼』: Re 4楼

如果有人帮你解决了问题，建议进行以下操作： 1、修改帖子标题，在标题最前面注明：[已结] 2、给正确回答问题者加分以示感谢，虽然大家来论坛是为了学习而不是为了积分，但加分聊表谢意总是或多或少能够让花费了时间和精力无私帮助你的人略感欣慰。 3、如果你是在别人的提示下自己写出了代码，请把自己的方法贴出来跟大家分享一下，也许他人可以帮你指出代码中的不足之处、告诉你如何提高执行效率等，有交流才能更快地进步。

2009-2-17 14:18

查看资料发短消息网志

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

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

论坛跳转: