[已解决]求教，一段这样的htm代码，如何用AU3将里面的文字显示出来

cyl675 · 发表于 2012-6-23 20:29:23

本帖最后由 cyl675 于 2012-6-24 20:18 编辑

求教，一段这样的htm代码，如何用AU3将里面的文字显示出来，用IE_UDF可以吗，该怎么操作，可以用AU3调用JS来解密吗

                           <!-- -->
                            <script>var wapType=1;var nowHost="http://q32.3g.qq.com";var nowUrlPath="http://q32.3g.qq.com/g/";var replace_img="";</script><script type="text/javascript"  id="dowap_decode">var js_engine_content="<script>wapType=1;<\/script><script src="http:\/\/static.pctowap.com\/dowap2\/1.16-050804\/js\/wml_index.js" type="text\/javascript" ><\/script><script>var adkw= new Array( new Array("@do5bfc@do822a","123WAP@do5feb@do901f@do5bfc@do822a","http:\/\/123.pctowap.com\/?fr=kyad")

用览器打开里面的文字是这样的，如果不用浏览器，用au3怎么实现呢

cyl675 · 发表于 2012-6-23 20:39:33

本帖最后由 cyl675 于 2012-6-23 22:05 编辑

丛IE6升级到IE8,怎么_IECreate 都不能用了，一用就崩溃

cyl675 · 发表于 2012-6-23 21:57:06

有人能帮我下吗

ebhb · 发表于 2012-6-23 23:45:59

给个连接，直接用xmlhttp就行了

komaau3 · 发表于 2012-6-24 03:06:23

网页被unicode编码了，解码后正则匹配下你想要的信息

Local $str = '@do706b]@do6d4f@do89c8@do5668@do5e26@do4f60@do4f53@do9a8c@do6781@do901f@do4e0a@do7f51'

ConsoleWrite(UniDecode($str, '\@do') & @CRLF)

Func UniDecode($sUni, $sExp = '\\u')
        Local $sStr = ''
        $sHex = StringRegExp($sUni, $sExp & '(\w{4})', 3)
        If @error = 0 Then
        For $i = 0 To UBound($sHex) - 1
                        $sText = ChrW(Dec($sHex[$i]))
                        $sStr = StringRegExpReplace($sUni, $sExp & $sHex[$i], $sText, 1)
                        $sUni = $sStr
        Next
        EndIf
        Return $sStr
EndFunc   ;==>UniDecode

cyl675 · 发表于 2012-6-24 20:17:21

网页被unicode编码了，解码后正则匹配下你想要的信息
komaau3 发表于 2012-6-24 03:06

此方法完美解决，另我想到另一的办法，浏览器虽打不开wap网站但源码还是可以下载的，绕过
代理站点直接丛3gqq下载源码

komaau3 · 发表于 2012-6-24 20:47:25

回复 6# cyl675

没那么复杂，伪造个user agent就行了

fhqbbfcu2050 · 发表于 2012-6-26 14:52:49

你这什么意思还是没懂。。。

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

[IE类操作] [已解决]求教，一段这样的htm代码，如何用AU3将里面的文字显示出来

本帖子中包含更多资源

相关帖子

本帖子中包含更多资源