shuangliudaxia 发表于 2013-7-1 22:39:15

ConsoleWrite读取真实下载地址后下载失败

Local $sUrl = "http://url7.me/99ru?download"
Local $bData = InetRead($sUrl)
Local $sText = BinaryToString($bData, 1)
Local $aText = StringRegExp($sText,"href\h*=.([^""']+)", 3)
ConsoleWrite("RealUrlAddress: " & $aText & @CRLF)
InetGet("RealUrlAddress:","d:\谷歌地图.exe",0)

代码如上所示 我运行后不能成功下载文件到D盘 搞不懂哪里出问题了 哪位朋友帮忙看看

鸟人 发表于 2013-7-3 09:33:25


Local $sUrl = "http://url7.me/99ru?download"
Local $bData = InetRead($sUrl)
Local $sText = BinaryToString($bData, 1)
Local $aText = StringRegExp($sText,"href\h*=.([^""']+)", 3)
Local $bText=StringSplit($aText,'/')
InetGet($aText,"d:\"&$bText[$bText],0)
页: [1]
查看完整版本: ConsoleWrite读取真实下载地址后下载失败