社区
Windows Server
帖子详情
求助~~如果能批量找开超链接
wozaiasd
2010-03-07 10:42:27
一、有一个网页文件,上面有很多网页的超链接,如何能一下子把它们全部打开呢?
二、如果说有一个全是网址的文本文件,用什么软件能逐个或一起打开呢?
上面二个哪个能做到呢?~~~~~~~~哪位高手帮帮忙啊!!!在些谢过了!!
...全文
255
26
打赏
收藏
求助~~如果能批量找开超链接
一、有一个网页文件,上面有很多网页的超链接,如何能一下子把它们全部打开呢? 二、如果说有一个全是网址的文本文件,用什么软件能逐个或一起打开呢? 上面二个哪个能做到呢?~~~~~~~~哪位高手帮帮忙啊!!!在些谢过了!!
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
26 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
就是just4
2010-03-13
打赏
举报
回复
忘了测试,重新测试过了:
[code=BatchFile]@echo off
echo 循环打开文本链接,按ctrl+c结束
echo ----------------------------------------
echo.
set total=100
set val=0
setlocal enabledelayedexpansion
:loop
for /f "delims=" %%i in (c:\url.txt) do (
echo 先暂停3秒
echo.
ping 127.1 -n 3 >nul 2>&1
set /a var=!var!+1
echo 计数%total%次暂停10分钟并关闭IE,当前计数!var!
echo.
if !var! geq %total% (
ping 127.1 -n 10 >nul 2>&1
set var=0
taskkill /im iexplore.exe /f >nul
) else (
echo %%i
echo.
start iexplore.exe %%i
)
)
goto :loop
pause>nul[/code]
ljc007
2010-03-13
打赏
举报
回复
[Quote=引用 13 楼 wozaiasd 的回复:]
我用的是傲游要执行关闭,这些程序我都看不懂,关键的设置能稍微解释下吗,麻烦了
[/Quote]
12楼的代码是以IE为例的,你把下面的进程名换成遨游的就行了。
taskkill /im
iexplore.exe
/f
wozaiasd
2010-03-13
打赏
举报
回复
[Quote=引用 12 楼 just4 的回复:]
楼主是想给别人刷流量不成 。。。自己改下:
BatchFile code
@echo off
rem 循环打开文本链接,按ctrl+c结束
:loop
set total=100
set var=1
setlocal enabledelayedexpansion
for /f %%i in (c:\url.txt) do (
rem 先暂停3秒
ping 127.1 -n ……
[/Quote]
运行只是一闪之后就反应了
wozaiasd
2010-03-13
打赏
举报
回复
我用的是傲游要执行关闭,这些程序我都看不懂,关键的设置能稍微解释下吗,麻烦了
就是just4
2010-03-13
打赏
举报
回复
楼主是想给别人刷流量不成 。。。自己改下:
[code=BatchFile]@echo off
rem 循环打开文本链接,按ctrl+c结束
:loop
set total=100
set var=1
setlocal enabledelayedexpansion
for /f %%i in (c:\url.txt) do (
rem 先暂停3秒
ping 127.1 -n 3 >nul 2>&1
set /a val=!val!+1
rem 计数100次暂停10分钟并关闭IE
if !val! geq %total% (
ping 127.1 -n 600 >nul 2>&1
set var=1
taskkill /im iexplore.exe /f
goto :next
)
echo %%i
start %%i
:next
)
goto :loop
pause>nul[/code]
wozaiasd
2010-03-13
打赏
举报
回复
最近经常这样不知道怎么加事
cmd.exe -应用程序错误
应用程序发生异常 unknown software exception (0xc0000094),位置为0x7ff999cf.
要终止程序,请单击确定
要高度程序,请单击取消
sltanm
2010-03-13
打赏
举报
回复
说一下哈,ping 127.1 -n 10 >nul 2>&1 的10改为600才是10分钟。
tangchao5220
2010-03-13
打赏
举报
回复
楼主用的时候,如果用下一句,把
rem start "D:\Program Files\Maxthon2\Maxthon.exe" %%i
这行的rem去掉啊
[Quote=引用 22 楼 just4 的回复:]
“根据你的提示换这样改下,可是执行后却全打开了这个http://website”,楼主不能咬文嚼字啥,website是网址的意思,意思就是要换成你url.txt中的内容,因没装max,楼主自己测试下先
BatchFile code
@echo off
set total=5
set val=0
setlocal enabledelayedexpansion
for /f "deli……
[/Quote]
tangchao5220
2010-03-13
打赏
举报
回复
你不该告诉他start http://website
那样他就不能一下打开那么多了
呵呵
[Quote=引用 22 楼 just4 的回复:]
“根据你的提示换这样改下,可是执行后却全打开了这个http://website”,楼主不能咬文嚼字啥,website是网址的意思,意思就是要换成你url.txt中的内容,因没装max,楼主自己测试下先
BatchFile code
@echo off
set total=5
set val=0
setlocal enabledelayedexpansion
for /f "deli……
[/Quote]
就是just4
2010-03-13
打赏
举报
回复
“根据你的提示换这样改下,可是执行后却全打开了这个http://website”,楼主不能咬文嚼字啥,website是网址的意思,意思就是要换成你url.txt中的内容,因没装max,楼主自己测试下先
[code=BatchFile]@echo off
set total=5
set val=0
setlocal enabledelayedexpansion
for /f "delims=" %%i in (c:\url.txt) do (
echo 暂停3秒
echo.
ping 127.1 -n 3 >nul 2>&1
set /a var=!var!+1
echo 计数%total%次暂停10分钟并关闭maxthon,当前计数!var!
echo.
if !var! geq %total% (
ping 127.1 -n 10 >nul 2>&1
set var=0
taskkill /im maxthon.exe /f >nul
) else (
echo %%i
echo.
rem 默认浏览器是max就直接用下一句,否则用下下句(开头rem表示注释)
start %%i
rem start "D:\Program Files\Maxthon2\Maxthon.exe" %%i
)
)
pause>nul[/code]
ljc007
2010-03-13
打赏
举报
回复
[Quote=引用 19 楼 wozaiasd 的回复:]
根据你的提示换这样改下,可是执行后却全打开了这个http://website
[/Quote]
这个,怎么说呢,还是建议学习一些基础知识吧,否则交流起来真的很困难。
wozaiasd
2010-03-13
打赏
举报
回复
strat没有的
wozaiasd
2010-03-13
打赏
举报
回复
@echo off
echo 循环打开文本链接,按ctrl+c结束
echo ----------------------------------------
echo.
set total=5
set val=0
setlocal enabledelayedexpansion
for /f "delims=" %%i in (c:\url.txt) do (
echo 先暂停3秒
echo.
ping 127.1 -n 3 >nul 2>&1
set /a var=!var!+1
echo 计数%total%次暂停10分钟并关闭IE,当前计数!var!
echo.
if !var! geq %total% (
ping 127.1 -n 10 >nul 2>&1
set var=0
taskkill /im D:\Program Files\Maxthon2\Maxthon.exe /f >nul
) else (
echo %%i
echo.
start start http://website %%i
)
)
pause>nul
根据你的提示换这样改下,可是执行后却全打开了这个http://website
就是just4
2010-03-13
打赏
举报
回复
问题一:直接把:loop和goto :loop去掉就行了,关机,直接在后面加一条shutdown /s /t 0 /f
问题二:暂停十分钟后关闭与计数有关呀,你要计数达这么多次后就直接全关完了,直接看默屏中的屏显
问题三:换遨游,要用程序的全部路径,比如"c:\program files\maxthon\max.exe",另,最好把max设为默认浏览器,这样打开的话直接start http://website就行了
wozaiasd
2010-03-13
打赏
举报
回复
有三个问题请教,一、我想打的链接是只需要打开一次就行了,不用循环,如果文件的地址全部打开完了,就自己终止,如果再能有一个关机的程序就更好了,不知道要怎么改动?
二、刚运行了一下程序里面的暂停十分钟,可以全部打开之后好像只停了没几秒钟就自动运行关闭了。
三、想用傲游浏览器进行打开,我试了下,把程序的ie换成傲游打开的执行文件名,可是我运行却说无法打开,找不到,不知哪里有问题!
感谢!
wozaiasd
2010-03-13
打赏
举报
回复
二三秒打开一个链接, 或者 如果能这样最好,打开一百个链接,先暂停七八分钟,执行关闭打开的网页,然后再继续。不知道行不行的!期待
ljc007
2010-03-12
打赏
举报
回复
[Quote=引用 9 楼 wozaiasd 的回复:]
还有这个打开 的速度能不能控制的。谢谢
[/Quote]
能。说说你想怎么控制吧。
wozaiasd
2010-03-12
打赏
举报
回复
还有这个打开 的速度能不能控制的。谢谢
wozaiasd
2010-03-12
打赏
举报
回复
行了,非常感谢!这个论坛 的高手真多啊
还有一个问题,就是我如果打开的多了,机器内存就不够了,有没有办法打开到一定的时候比如打开200页或者几分之后自己运行程序关闭呢?
就是just4
2010-03-12
打赏
举报
回复
唉,唉,唉,
1.先建你的url文件啥,比如放在C:\url.txt,内容为:
http://www.baidu.com
http://www.google.cn
http://www.163.com
http://www.sina.com
2.再建立脚本文件,比如存桌面上的test.bat,内容为:
[code=BatchFile]@echo off
for /f %%i in (c:\url.txt) do (echo %%i)&&(start %%i)
echo OK
pause>nul[/code]
3.直接双击桌面上的test.bat运行,如果要关闭所有打开的IE,直接开始 --> 运行 --> 输入taskkill /im iexplore.exe /f后回车执行
加载更多回复(6)
批量
创建
超链接
跳转
批量
创建
超链接
跳转 大家好,我是超爱高效率的秋小叶~ 最近有一位同学
求助
,他需要在 Excel 文件里加很多
超链接
,可他只会一个个加,感觉太麻烦了。 那可不,身为超爱高效率的我,今天就教大家一个一键搞定
超链接
添加的函数! 先来看看这位同学的具体问题: 有一张 Excel 汇总表,其中一列是合同编号,每个合同编号都有个对应的 Excel 文件。 现在需要实现:点击总表中的合同编号时能自...
ncl
批量
处理多个nc文件_教程合集 | python文件读写
叮铃铃!中国假期管理局提醒您,国庆假期还有3天余额。节前立下的FLAG都实现了吗?有在好好学习吗(反正小编的FLAG是倒了一片)。Python以库闻名天下,然而名目繁多的库却让小白同学们常头昏脑涨不知如何选择。今天跟着小编一起梳理一下都有哪些库可以读写文件吧!让假期不再虚度~1.Python自带方式 Python自带的文件打开函数是open及with open,使用方式为:...
使用VBA在自动生成的目录和标题段落之间建立交叉链接
使用VBA在标题段落与自动生成的目录之间建立
超链接
,形成标题段落与目录间的交叉连接效果
matlab怎么
批量
删除文件中的前几行_教程合集 | python文件读写
叮铃铃!中国假期管理局提醒您,国庆假期还有3天余额。节前立下的FLAG都实现了吗?有在好好学习吗(反正小编的FLAG是倒了一片)。Python以库闻名天下,然而名目繁多的库却让小白同学们常头昏脑涨不知如何选择。今天跟着小编一起梳理一下都有哪些库可以读写文件吧!让假期不再虚度~1.Python自带方式 Python自带的文件打开函数是open及with open,使用方式为:...
VBA中方法的函数式调用和过程式调用的差别
因见到有人
求助
批量
设置工作簿中的
超链接
,尝试写了一段代码: 1 Sub AddHyperlinks() 2 3 Dim strName As String, source As String, target As String 4 Dim i As Integer 5 6 i = 5 7 source = "目录!a1" 8 9 Do While C...
Windows Server
6,868
社区成员
177,996
社区内容
发帖
与我相关
我的任务
Windows Server
Windows 2016/2012/2008/2003/2000/NT
复制链接
扫一扫
分享
社区描述
Windows 2016/2012/2008/2003/2000/NT
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章