找回密码
 加入
搜索
查看: 2097|回复: 4

[系统综合] 请问如何自动打开浏览器,并且自动下载PDF文件

[复制链接]
发表于 2012-9-20 18:09:47 | 显示全部楼层 |阅读模式
http://www.sciencedirect.com/sci ... 9780122841514500002
网址是上面这个,左上角有一个PDF(xxx),我想下载这个PDF文件,但是不是网页下面的PDF文件大小不一定,所以()里面的数字会变化,我想问怎么能自动下载这个PDF文件,我写成了PDF却下载不了,写成了PDF (125 K)是可以下载的,但是这个125K是变化的.想问一问是不是需要正则表达式了.
另外一个问题是,自动点击这个PDF文件以后,一闪而过了,对话框认为是取消按扭,如何改写保存按扭呢?
发表于 2012-9-20 18:56:39 | 显示全部楼层
用正则表达式可以写成PDF\s*(\d*\sK)
模拟点击保存按扭是可一的,自己在本站找吧
 楼主| 发表于 2012-9-20 20:57:51 | 显示全部楼层
#include<IE.au3>
$oIE=_IECreate("http://www.sciencedirect.com/science/article/pii/S0006291X01953197")
$pdf=StringRegExp("PDF\s*(\d*\sK)");把字符串中的前2个数字替换成中字
_IELinkClickByText($oIE,$PDF)
还是不好用,我不知道哪里出错了
 楼主| 发表于 2012-9-21 10:10:40 | 显示全部楼层
可能是没有读取和保存网页的原因吧,我改了改代码,但是还是不好用呢.
#include <IE.au3>
$oIE = _IECreate("http://www.sciencedirect.com/science/article/pii/B9780122841514500002")
$sHTML = _IEDocReadHTML ($oIE)
FileWriteLine("c:/123.txt",$sHTML)

$pdf=StringRegExp("PDF\s*(\d*\sK)",1)
_IELinkClickByText($oIE,$PDF)
Sleep(5000)
 楼主| 发表于 2012-9-21 10:32:01 | 显示全部楼层
#include <IE.au3>



$url1="http://www.sciencedirect.com/science/article/pii/B9780122841514500002"
$oIE = _IECreate("http://www.sciencedirect.com/science/article/pii/B9780122841514500002")
$sHTML = _IEDocReadHTML ($oIE)
FileWriteLine("c:/123.txt",$sHTML)

;$pdf=StringRegExp("PDF\s*(\d*\sK)")
$var1 = FileRead("c:\test.txt",40000 )
;$html1 = _send($url1)
$pattern = "PDF\s*(\d*\sK)"
;$html = StringReplace($html, @CRLF, '')

;$html=123.txt
$pdf = StringRegExp($var1, $pattern, 1)

_IELinkClickByText($oIE,$PDF)
Sleep(5000)

还是不好用.郁闷了.
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-15 16:19 , Processed in 0.080322 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表