[已解决]请教实现网络图片下载到本地的AU3代码

lon91ong · 发表于 2011-10-31 23:23:12

本帖最后由 lon91ong 于 2011-11-1 08:54 编辑

如题,图片地址是确定的:

http://www.kitco.cn/cn/live_charts/silvercny.gif

希望保存至AU3脚本所在的目录下,并按照如下的规则重新命名
silvercny_日期_美元兑人民币汇率.gif

比如,今天是2011年10月31日,当前汇率是6.3233,汇率查询网址
那么相应的文件名就是:
silvercny_20111031_6.3233.gif

希望能不用打开网页,全部用后台执行的方式进行!
望大侠不吝赐教!多谢大侠!

afan · 发表于 2011-11-1 04:01:18

#include <INet.au3>
$Str = _INetGetSource('http://forex.hexun.com/rmbhl/')
$aSR = StringRegExp($Str, '(?s)美元/人民币\v+</td>.+?(\d+\.\d+)', 1)
If Not @error Then
        ToolTip('下载中...')
        InetGet('http://www.kitco.cn/cn/live_charts/silvercny.gif', 'silvercny_' & @YEAR & @MON & @MDAY & '_' & $aSR[0] & '.gif', 1)
EndIf

menfan1 · 发表于 2011-11-1 07:57:28

还是正则快哈。。

lon91ong · 发表于 2011-11-1 08:57:14

才那么几句啊？？？
我看到代码的第一印象

测试成功之后，服了！

fastidium · 发表于 2011-11-1 09:03:05

afan大牛啊，佩服，学习了

		自动登录	找回密码
密码			加入

[系统综合] [已解决]请教实现网络图片下载到本地的AU3代码

相关帖子

评分

浏览过的版块