本帖最后由 ex_heyh 于 2023-9-5 22:37 编辑
首先1、6、8楼的代码都是正确的,可以获取到火的相关版本信息;
我的笔记本物理机是win7,前晚想着下载一个安全软件修复下,看看是不是有补丁没打好,导致系统故障导致程序获取不到信息,于是手动下载了一个火个人版;然后又因为当时忙着另一个事又没安装,昨晚再找原因时运行了下代码,神奇的发现可以获取信息了;遗憾的是不知道怎么解决的;
今晚在虚拟机win7夏打补丁、重装系统、换浏览器版本、安装microsoft edge等一系列模拟物理机的设置,想找到点蛛丝马迹,结果毫无用处;就在要关机时,阴差阳错的看到了前晚下载在桌面的火个人版程序;于是故事就来了;
在不能获取信息的系统下,手动下载火个人版,然后运行程序就可以正确的获得 的信息,包括下载txt,msgbox等,都可以正常。
怀疑问题的原因:在下载时在我得电脑产生了啥、发生了啥、建立了啥(缓存、白名单之类的),然后运行程序可以获取到这个地址的内容;
目前虽然知道获取不到信息的大概原因,以及不是解决办法的办法,但不能从根本上解决问题,因为写这个程序的原因是偷懒,是自动下载最新版,所以达不到我的预期;而且下载一次就能获取到版本信息这个问题还需要努力查找原因;
以上是最新进展,分享下,喜欢折腾的有时间一起折腾下;
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
目的:通过程序下载火软件的最新版本信息。
这个地址通过浏览器访问是正常、有内容的。这个方法改成其他下载地址可以正常下载,可以下载页面信息、程序文件。
下载跟火相关地址的就死活不行,完全获取不到页面内容,请各位大神指点迷津,看看是什么问题,谢谢!
- #notrayicon
- #requireadmin
- #include
- #include
- #include
- #include
- #include
- #include
- #include
- $filename = "huorong.txt"
- $filepath = @scriptdir & '\'
- local $sstring = "https://www.huorong.cn/versionshow.php"
- $pathexe = $filepath & $filename
- $load = inetget($sstring, $pathexe, 1, 1)
- progresson("", "正在下载...")
- while 1
- if inetgetinfo($load, 2) = true then exitloop
- inetgetinfo($load, 1)
- $rou = round(inetgetinfo($load, 0) / inetgetinfo($load, 1), 2) * 100
- progressset($rou, "已下载:" & $rou & "%" & " ")
- wend
- progressoff()
- exit
复制代码
|