中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 那里有VBS教程。谁有啊。帮我把这个批处理转成VBS。可以不
作者:
标题: 那里有VBS教程。谁有啊。帮我把这个批处理转成VBS。可以不 上一主题 | 下一主题
zerostudy
中级用户





积分 266
发帖 98
注册 2006-4-21
状态 离线
『楼 主』:  那里有VBS教程。谁有啊。帮我把这个批处理转成VBS。可以不

本来是把存为killqq.bat
@echo off
start h:\wenqq\qq.exe
ping 127.0.0.1 -n 5      
taskkill /f /t /im TIMPlatform.exe

这个存为.vbs  搜索到的。。启动批处理无黑屏。
DIM objShell
set objShell=wscript.createObject("wscript.shell")
iReturn=objShell.Run("cmd.exe /C killqq.bat", 0, TRUE)

启动时会调先cmd ping taskkill这几个命令。。
@echo off
start h:\wenqq\qq.exe
ping 127.0.0.1 -n 5      ////这个可以用别的代替吗。。VBS的什么命令可以吗
taskkill /f /t /im TIMPlatform.exe 把这个杀了。VBS用什么?
。。求一个用VBS杀掉timplatform.exe这个进程。。。。。。谢谢了。
timplatform.exe这个也可以在QQ里删除的。不过聊天室这些就不能进了`~

2006-10-30 02:40
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 2 楼』:  


  请问楼主,为什么要杀掉TIMPlatform.exe进程呢?杀掉了QQ可能不会正常工作的...

  在VBS里,延时的话,可以用 "Wscript.Sleep 1000" 延时一秒钟,至于杀掉进程,VBS的就不知道了,不知道是不是调用CMD命令.


2006-10-30 03:53
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zerostudy
中级用户





积分 266
发帖 98
注册 2006-4-21
状态 离线
『第 3 楼』:  

因为只是聊天的话。。那个进程没用的。。。白白占内存啊。所以杀掉他。。。

2006-10-30 04:05
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zerocq
中级用户




积分 458
发帖 196
注册 2006-10-5
状态 离线
『第 4 楼』:  

结束进程可以使用VBS+WMI

不调用cmd

2006-10-30 04:44
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
不得不爱
超级版主

我爱DOS


积分 5310
发帖 2044
注册 2005-9-26
来自 四川南充
状态 离线
『第 5 楼』:  

要杀掉TIMPlatform.exe进程还不如直接删除TIMPlatform.exe文件来的好



我的网络U盘 我的网络第2个U盘
论坛软件下载链接
灵雨飘零论坛  
论坛新手必读,所有人的基本行为准则
刷QQ空间人气、留言的小软件
2006-10-30 22:50
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
3742668
荣誉版主





积分 2013
发帖 718
注册 2006-2-18
状态 离线
『第 6 楼』:  


createobject("wscript.shell").run "cmd.exe",1 '把最后的1改为0则后台运行
wscript.sleep 2000       '延时2秒,可自己修改
str = "TIMPlatform.exe" '要结束的进程名
for each x in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_  
    if ucase(x.name) = ucase(str) then x.terminate
next
代码未测试..

2006-10-31 01:45
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
不得不爱
超级版主

我爱DOS


积分 5310
发帖 2044
注册 2005-9-26
来自 四川南充
状态 离线
『第 7 楼』:  

我认为还是这样的好:
@echo off
del h:\wenqq\TIMPlatform.exe
start h:\wenqq\qq.exe

   此帖被 +2 点积分     点击查看详情   
评分人:【 redtek 分数: +2  时间:2006-10-31 02:40




我的网络U盘 我的网络第2个U盘
论坛软件下载链接
灵雨飘零论坛  
论坛新手必读,所有人的基本行为准则
刷QQ空间人气、留言的小软件
2006-10-31 02:22
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zerostudy
中级用户





积分 266
发帖 98
注册 2006-4-21
状态 离线
『第 8 楼』:  

TIMPlatform.exe
平时只聊天的话.这个没用..有时可能会去聊天室聊聊天.就要用到这个了...

2006-11-3 05:28
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
senffon
初级用户





积分 118
发帖 66
注册 2005-10-21
状态 离线
『第 9 楼』:  

版主没有考虑到杀掉TIMPlatorm.exe的意义所在!原因在网吧这种场合有时TIMPlatorm.exe会同其它软件产生冲突!而TIMPlatorm.exe又是常驻内存的!删除掉的话有用户要用又不行!所以杀掉是最好的!
所以
createobject("wscript.shell").run "cmd.exe",1 '把最后的1改为0则后台运行
wscript.sleep 2000       '延时2秒,可自己修改
str = "TIMPlatform.exe" '要结束的进程名
for each x in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_  
    if ucase(x.name) = ucase(str) then x.terminate
next

这个还是挺好的!

2006-11-3 08:33
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zerostudy
中级用户





积分 266
发帖 98
注册 2006-4-21
状态 离线
『第 10 楼』:  



  Quote:
Originally posted by 3742668 at 2006-10-31 01:45:
[code]
createobject("wscript.shell").run "cmd.exe",1 '把最后的1改为0则后台运行
wscript.sleep 2000       '延时2秒,可自己修改
str = "TIMPlatform.exe&quo ...

看不懂下面结束的命令~~

2006-11-3 09:09
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 11 楼』:  



  Quote:
Originally posted by zerostudy at 2006-11-3 09:09:



看不懂下面结束的命令~~


  不是什么命令,是用VBS编写的脚本,运行就可以了。


2006-11-3 10:40
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
windzb
初级用户





积分 32
发帖 14
注册 2006-10-28
状态 离线
『第 12 楼』:  

隐藏窗口的脚本

Set ws = CreateObject("Wscript.Shell")   
ws.run "cmd /c 批处理程序名,需要路径",vbhide

2006-11-4 01:55
查看资料  发短消息 网志   编辑帖子  回复  引用回复
不得不爱
超级版主

我爱DOS


积分 5310
发帖 2044
注册 2005-9-26
来自 四川南充
状态 离线
『第 13 楼』:  

TIMPlatorm.exe只是一个防止同样的QQ号在同一个机子上重复登录的文件,可要可不要,我的机子里就没有那个文件,却没有任何问题,只是可以1个QQ可以同时登陆而也



我的网络U盘 我的网络第2个U盘
论坛软件下载链接
灵雨飘零论坛  
论坛新手必读,所有人的基本行为准则
刷QQ空间人气、留言的小软件
2006-11-4 02:20
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转: