如何用批处理实现自动关闭网页,追加20!

来源:百度知道 编辑:UC知道 时间:2024/06/26 03:08:08
我想实现先打开一个126邮箱,输入用户名和密码之后,等登陆进去了再关闭网页,然后再打开另一个126邮箱,也是输入用户名和密码之后,等登陆进去了再关闭网页。现在登陆是能实现了,就是不知道怎么把网页关闭掉?请大家看看我写的,看怎么修改好

登陆第一个邮箱.vbs
Dim a
Set a=WScript.CreateObject("WScript.shell")
a.run "http://www.126.com/"
WScript.Sleep 3000
a.SendKeys "用户名1"
a.SendKeys "{TAB}"
a.SendKeys "密码1"
a.SendKeys "{TAB}"
a.SendKeys "{ENTER}"

登陆第二个邮箱.vbs
Dim a
Set a=WScript.CreateObject("WScript.shell")
a.run "http://www.126.com/"
WScript.Sleep 3000
a.SendKeys "用户名2"
a.SendKeys "{TAB}"
a.SendKeys "密码2"
a.SendKeys "{TAB}"
a.SendKeys "{ENTER}"

这两个都是.vbs文件,然后写了一个.bat文件实现批处理:
"C:\Documen

编写第三个close.vbs
[
那你试着把taskkill /f /im iexplore.exe
改成为:
taskkill /f /fi "windowtitle eq 网易163免费邮"
就是关闭带有"网易163免费邮"这些字的网页。
以后网页上面的字改了,你就要跟着改掉。

]

Dim a
Set a=WScript.CreateObject("WScript.shell")
a.run "126-haibrala.vbs"
wscript.sleep 15000 '休息15秒
a.run "126-sdzwbmzg.vbs"
wscript.sleep 15000 '休息15秒
a.run "taskkill /f /fi "windowtitle eq 网易163免费邮"
如果用批处理就是:

cd /d "C:\Documents and Settings\hf\桌面"
start 126-haibrala.vbs
::'休息15秒
ping 127.0.0.1 -n 15
start 126-sdzwbmzg.vbs
::'休息15秒
ping 127.0.0.1 -n 15
taskkill /f /fi "windowtitle eq 网易163免费邮

晕。修改了这么多次百度禁止我修改了。
呵呵,要是这次可以了,请 加分给我{上面那个账号}!!! 啊。

我这个号是上面的号的马甲,呵呵~

据测试,批处理会把所有网页关闭的,因为IE只有一个进程。
所以最后我只想给你vbs的方案。
编写第三个close.vbs :(和其他2个放在同一目录)

Dim a,b