多谢。
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [已结]如何使批处理自动去运行并隐藏
查看 29,964 回复 202
第 16 楼
发表于 2007-03-13 21:44 · 中国 重庆 永川区 电信
第 17 楼
发表于 2007-03-13 23:42 · 中国 广西 柳州 电信
不错，这方面好像vbs蛮好用
第 18 楼
发表于 2007-03-14 01:21 · 中国 广东 广州 番禺区 电信
在VBS最后加上以下语句即可删除批处理和脚本本身（假设运行的批处理为 run.cmd ，启动批处理的脚本为 run.vbs ）
set fso=wscript.createobject("scripting.filesystemobject")
fso.deletefile "c:\windows\system32\run.cmd"
fso.deletefile "c:\windows\system32\run.vbs"
提供一个直接隐藏运行DOS命令的脚本（DelTmp.vbs）：
Set objShell = CreateObject ("Wscript.Shell")
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.tmp"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*._mp"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.log"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.gid"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.chk"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.old"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\recycled\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %windir%\*.bak"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %windir%\prefetch\*.*"),0 ,TRUE
objShell.Run("%comspec% /c rd /s/q %windir%\temp & md %windir%\temp"),0 ,TRUE
objShell.Run("%comspec% /c del /f/q %userprofile%\cookies\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/q %userprofile%\recent\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %userprofile%\Local Settings\Temporary Internet Files\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %temp%\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %userprofile%\Local Settings\Temp\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %userprofile%\recent\*.*"),0 ,TRUE
[ Last edited by axi on 2007-3-13 at 12:24 PM ]
set fso=wscript.createobject("scripting.filesystemobject")
fso.deletefile "c:\windows\system32\run.cmd"
fso.deletefile "c:\windows\system32\run.vbs"
提供一个直接隐藏运行DOS命令的脚本（DelTmp.vbs）：
Set objShell = CreateObject ("Wscript.Shell")
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.tmp"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*._mp"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.log"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.gid"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.chk"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\*.old"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %systemdrive%\recycled\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %windir%\*.bak"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %windir%\prefetch\*.*"),0 ,TRUE
objShell.Run("%comspec% /c rd /s/q %windir%\temp & md %windir%\temp"),0 ,TRUE
objShell.Run("%comspec% /c del /f/q %userprofile%\cookies\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/q %userprofile%\recent\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %userprofile%\Local Settings\Temporary Internet Files\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %temp%\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %userprofile%\Local Settings\Temp\*.*"),0 ,TRUE
objShell.Run("%comspec% /c del /f/s/q %userprofile%\recent\*.*"),0 ,TRUE
[ Last edited by axi on 2007-3-13 at 12:24 PM ]
第 19 楼
发表于 2007-03-16 02:40 · 中国 江苏 南京 电信
呵呵，学会了，谢谢！
第 20 楼
发表于 2007-03-16 15:45 · 中国 河北 廊坊 联通
这个工具非常好啊~~谢谢~~
第 21 楼
发表于 2007-03-19 07:23 · 中国 北京 歌华宽带
小工具非常好，xiexie !
第 22 楼
发表于 2007-03-19 15:30 · 中国 河南 南阳 联通
~~谢谢~~
第 23 楼
发表于 2007-03-26 04:10 · 中国 河南 信阳 联通
好东西，顶了
第 24 楼
支持。
发表于 2007-03-27 00:48 · 中国 广东 电信
支持一下
第 25 楼
发表于 2007-03-27 13:40 · 中国 陕西 西安 电信
小工具非常好用,谢谢！
第 26 楼
发表于 2007-03-28 10:53 · 中国 广东 深圳 电信
这个有用哦
第 27 楼
发表于 2007-03-29 11:58 · 中国 贵州 铜仁 电信
小工具非常好用,谢谢！
第 28 楼
发表于 2007-04-01 10:37 · 中国 河南 开封 联通
顶一下了，谢谢
第 29 楼
发表于 2007-04-04 02:38 · 中国 广东 广州 天河区 电信
呵呵
学习中...
学习中...
第 30 楼
发表于 2007-04-05 07:02 · 中国 江苏 扬州 电信
我想下可积分不够 呀
论坛跳转: