比如http://www.baidu.com/s?wd=草泥马
变成http://www.baidu.com/s?wd=%B2%DD%C4%E0%C2%ED 要怎么弄啊
我现在的代码是这样的 但是只能在IE下正常 用其他浏览器就是乱码 需要编码才能正常访问#NoTrayIcon
Dim $I, $str
If $CmdLineRaw = "" Then
Exit
Else
$CmdNub = StringSplit($CmdLineRaw, " ")
Switch $cmdline[1]
Case "g"
For $I = 2 To $CmdNub[0]
$str &= $cmdline[$I] & " "
Next
ShellExecute("http://www.google.com/search?hl=zh-CN&ie=GB2312&q=" & $str)
Case "b"
For $I = 2 To $CmdNub[0]
$str &= $cmdline[$I] & " "
Next
ShellExecute("http://www.baidu.com/s?wd=" & $str)
Case "y"
For $I = 2 To $CmdNub[0]
$str &= $cmdline[$I] & " "
Next
ShellExecute("http://one.cn.yahoo.com/s?p=" & $str)
Case "w"
For $I = 2 To $CmdNub[0]
$str &= $cmdline[$I] & " "
Next
ShellExecute("http://www.youdao.com/search?q=" & $str)
EndSwitch
EndIf
|