发现3.3.1.1一个编译问题
本帖最后由 Bone 于 2009-8-21 21:30 编辑在编辑器里F5执行没有一点问题,但是编译后会出现下面问题
代码如下:
Func DownLoadimg($imgUrl)
Local $hDownload = InetGet($imgUrl, @TempDir & "\tempjpg.tmp", 1, 1)
Do
Sleep(250)
Until InetGetInfo($hDownload, 2) ; Check if the download is complete.
Local $aData = InetGetInfo($hDownload) ; Get all information.
InetClose($hDownload) ; Close the handle to release resourcs.
EndFunc ;==>DownLoadimg
试了这样也还是一样的问题
Func DownLoadimg($imgUrl)
Local $hDownload = InetGet($imgUrl, @TempDir & "\tempjpg.tmp", 1, 1)
Do
Sleep(250)
Until InetGetInfo($hDownload, 2) ; Check if the download is complete.
EndFunc ;==>DownLoadimg
一时间找不到问题所在
找了老版本的编译,以下面代码编译后执行成功
分析可能是3.3.1.1版本编译的问题
Func DownLoadimg($imgUrl)
Local $hDownload = InetGet($imgUrl, @TempDir & "\tempjpg.tmp", 1, 1)
While @InetGetActive
WEnd
EndFunc Local $imgUrl = "http://www.google.cn/images/nav_logo4.png"
Func DownLoadimg($imgUrl)
Local $hDownload = InetGet($imgUrl, @TempDir & "\tempjpg.tmp", 1, 1)
Do
Sleep(250)
Until InetGetInfo($hDownload, 2) ; Check if the download is complete.
Local $aData = InetGetInfo($hDownload) ; Get all information.
InetClose($hDownload) ; Close the handle to release resourcs.
EndFunc ;==>DownLoadimg3.3.1.1 编译后无错. 2# iftodo
你试试这样
Local $imgUrl = "http://www.google.cn/images/nav_logo4.png"
Func DownLoadimg($imgUrl)
Local $hDownload = InetGet($imgUrl, @TempDir & "\tempjpg.tmp", 1, 1)
Do
Sleep(250)
Until InetGetInfo($hDownload, 2) ; Check if the download is complete.
Local $aData = InetGetInfo($hDownload) ; Get all information.
InetClose($hDownload) ; Close the handle to release resourcs.
EndFunc ;==>DownLoadimg
DownLoadimg($imgUrl);加上这一行你编译再试试
上图是用英文原版编译的出错信息,说什么未知函数名??
现在可以肯定的是,不是汉化版的问题,有可能是InetGetInfo这函数被取消了吧..有兴趣的话到官网查下就知道了. 那就不太清楚了。。。 新版本新增了InetGetInfo函数,但编译后会提示未知函数的!等官方修复吧
页:
[1]