批处理之家 - Powered by Discuz! Board

标题: [文本处理] 【已解决】BAT、vbs如何实现快捷键复制网页 [打印本页]

作者: 1270697389 时间: 2014-2-14 15:50 标题: 【已解决】BAT、vbs如何实现快捷键复制网页

本帖最后由 1270697389 于 2014-2-15 14:03 编辑

是这样的，桌面上打开了一个浏览器，打开了很多个网页。桌面上还打开了一个记事本。我想用bat或者vbs执行先跳到浏览器，再用快捷键Ctrl+a,全选。Ctrl+c复制，然后alt+tab,跳到记事本，ctrl+v粘贴，然后alt+tab跳到浏览器，ctrl+w关闭当前页面。谢谢大家！
有的朋友可能会说，直接抓取网页，但是有的网页是不行的，它说你访问过于频繁，禁止访问。

作者: Batcher 时间: 2014-2-14 16:45

但是有的网页是不行的，它说你访问过于频繁，禁止访问。

抓完一个之后，sleep一会，再抓下一个，这样行吗？

作者: 1270697389 时间: 2014-2-14 16:54

回复 2# Batcher

不行，我都试过了。

作者: 1270697389 时间: 2014-2-14 17:05

抓完一个之后，sleep一会，再抓下一个，这样行吗？
Batcher 发表于 2014-2-14 16:45

http://www.19lou.com/forum-26-thread-29464530-1-1.html
就是这种网址，谢谢！

作者: Batcher 时间: 2014-2-14 17:12

回复 4# 1270697389

能否把你的代码贴出来看看

作者: 1270697389 时间: 2014-2-14 17:25

本帖最后由 1270697389 于 2014-2-14 17:28 编辑

回复 5# Batcher

Dim WshShell
Set WshShell = CreateObject("wscript.Shell")
WshShell.SendKeys "%{tab}"
WshShell.SendKeys "^{a}"
WshShell.SendKeys "^{c}"
WshShell.SendKeys "%{tab}"
WshShell.SendKeys "^{v}"
WshShell.SendKeys "%{tab}"
WshShell.SendKeys "^{w}"
然后循环
复制代码

作者: Batcher 时间: 2014-2-14 17:36

回复 6# 1270697389

循环的代码在哪里？

作者: 1270697389 时间: 2014-2-14 18:02

回复 1270697389

循环的代码在哪里？
Batcher 发表于 2014-2-14 17:36

不知道怎么循环。

作者: Batcher 时间: 2014-2-14 19:30

回复 8# 1270697389

那么，2楼说的方法你是如何测试的呢？

欢迎光临批处理之家 (http://www.bathome.net/)