kxing 发表于 2010-4-8 17:34:32

求教关于字符串加密的问题

请问下各位高手网页搜索提交中文的时候用什么加密的呢

如下面这两个链接：
http://so.tudou.com/isearch/盗墓/
http://so.tudou.com/isearch/%E7%9B%97%E5%A2%93/

请问它怎样将 “盗墓” 转换成 “%E7%9B%97%E5%A2%93”

感谢各位回答！！！

kxing 发表于 2010-4-8 17:36:32

我目的是想把搜索到的结果htm代码保存到本地。
直接提交第一个链接不行，非得用第二种方是提交才能得到正确的htm代码。

afan 发表于 2010-4-8 20:12:35

http://www.autoitx.com/forum.php?mod=redirect&goto=findpost&ptid=11042&pid=129871&fromuid=7644923

kxing 发表于 2010-4-8 20:32:59

感谢,原来是url编码。学到新东西！！！

kxing 发表于 2010-4-8 20:39:00

不对呢，可能不是这种编码。
我将 “盗墓笔记5 转换后世 “%B5%C1%C4%B9%B1%CA%BC%C75””

而他们网站转换的是：
%E7%9B%97%E5%A2%93%E7%AC%94%E8%AE%B05

请问还有其他的url编码吗？

afan 发表于 2010-4-8 20:41:07

回复 5# kxing


    9#，你没看错吧;例子：
$str = "盗墓笔记5"
$str1 = _UnicodeURLEncode($str)
MsgBox(0, '转换前后', $str & @CRLF & $str1)
ShellExecute('http://so.tudou.com/isearch/' & $str1)

Func _UnicodeURLEncode($UnicodeURL) ;==>_UnicodeURLEncode
      Local $UnicodeBinaryLength, $UnicodeBinary, $UnicodeBinary2
      $UnicodeBinary = StringToBinary($UnicodeURL, 4)
      $UnicodeBinary2 = StringReplace($UnicodeBinary, '0x', '', 1)
      $UnicodeBinaryLength = StringLen($UnicodeBinary2)
      Local $EncodedString, $UnicodeBinaryChar, $EncodedString
      For $i = 1 To $UnicodeBinaryLength Step 2
                $UnicodeBinaryChar = StringMid($UnicodeBinary2, $i, 2)
                If StringInStr("$-_.+!*'(),;/?:@=&abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890", BinaryToString('0x' & $UnicodeBinaryChar, 4)) Then
                        $EncodedString &= BinaryToString('0x' & $UnicodeBinaryChar)
                Else
                        $EncodedString &= '%' & $UnicodeBinaryChar
                EndIf
      Next
      Return $EncodedString
EndFunc   ;==>_UnicodeURLEncode

netegg 发表于 2010-4-8 21:04:51

应该是udd吧

kxing 发表于 2010-4-8 21:24:34

嘿嘿,真的看错了.
没看到afan大的回复。

kxing 发表于 2010-4-12 17:36:10

请问下afan大这是什么编码呢，是不是base64的。
有没有相关的反编码函数呢，多谢！
http://www.tudou.com/programs/view/-QEIrXqawjI/

后面的这个:QEIrXqawjI
页: [1]
查看完整版本: 求教关于字符串加密的问题