87,997
社区成员
发帖
与我相关
我的任务
分享如何通过js读取 从百度搜索引擎过来的关键字
比如说：在百度中 输入 “视频” 然后地址：http://www.baidu.com/s?wd=%CA%D3%C6%B5
现在我如何通过javascript 读取 wd=%CA%D3%C6%B5
让返回的值为 视频
谢谢大家的帮助啊
现在我如何通过javascript 读取 wd=%CA%D3%C6%B5
让返回的值为 视频
谢谢大家的帮助啊
...全文
请发表友善的回复…
发表回复
kaifadi 2011-03-11
- 打赏
- 举报
不知道什么编码，我用JS的3个编码函数都试了。但是都不是，估计是后台的其他什么编码函数方式！
冰川711 2011-03-11
- 打赏
- 举报
var temp = decodeURI("%CA%D3%C6%B5");
alert(temp)
alert(temp)
97℃空间 2011-03-11
- 打赏
- 举报
asc2str为定义 还是不行啊 ！我要疯了
hch126163 2011-03-11
- 打赏
- 举报
<script language="vbscript">
Function str2asc(strstr)
str2asc = hex(asc(strstr))
End Function
Function asc2str(ascasc)
asc2str = chr(ascasc)
End Function
Function toAsc(strstr)
toAsc =asc(strstr)
End Function
</script>
<script language="javascript">
// gb2312格式编码 （百度url编码为gb2312）
function UrlEncode(str){
var ret="";
var strSpecial="!\"#$%&'()*+,/:;<=>?[]^`{|}~%";
for(var i=0;i<str.length;i++){
var chr = str.charAt(i);
var c=str2asc(chr);
if(parseInt("0x"+c) > 0x7f){
ret+="%"+c.slice(0,2)+"%"+c.slice(-2);
}else{
if(chr==" ")
ret+="+";
else if(strSpecial.indexOf(chr)!=-1)
ret+="%"+c.toString(16);
else
ret+=chr;
}
}
return ret;
}
// gb2312格式解码
function UrlDecode(str){
var ret="";
for(var i=0;i<str.length;i++){
var chr = str.charAt(i);
if(chr == "+"){
ret+=" ";
}else if(chr=="%"){
var asc = str.substring(i+1,i+3);
if(parseInt("0x"+asc)>0x7f){
ret+=asc2str(parseInt("0x"+asc+str.substring(i+4,i+6)));
i+=5;
}else{
ret+=asc2str(parseInt("0x"+asc));
i+=2;
}
}else{
ret+= chr;
}
}
return ret;
}
</script>
Function str2asc(strstr)
str2asc = hex(asc(strstr))
End Function
Function asc2str(ascasc)
asc2str = chr(ascasc)
End Function
Function toAsc(strstr)
toAsc =asc(strstr)
End Function
</script>
<script language="javascript">
// gb2312格式编码 （百度url编码为gb2312）
function UrlEncode(str){
var ret="";
var strSpecial="!\"#$%&'()*+,/:;<=>?[]^`{|}~%";
for(var i=0;i<str.length;i++){
var chr = str.charAt(i);
var c=str2asc(chr);
if(parseInt("0x"+c) > 0x7f){
ret+="%"+c.slice(0,2)+"%"+c.slice(-2);
}else{
if(chr==" ")
ret+="+";
else if(strSpecial.indexOf(chr)!=-1)
ret+="%"+c.toString(16);
else
ret+=chr;
}
}
return ret;
}
// gb2312格式解码
function UrlDecode(str){
var ret="";
for(var i=0;i<str.length;i++){
var chr = str.charAt(i);
if(chr == "+"){
ret+=" ";
}else if(chr=="%"){
var asc = str.substring(i+1,i+3);
if(parseInt("0x"+asc)>0x7f){
ret+=asc2str(parseInt("0x"+asc+str.substring(i+4,i+6)));
i+=5;
}else{
ret+=asc2str(parseInt("0x"+asc));
i+=2;
}
}else{
ret+= chr;
}
}
return ret;
}
</script>
97℃空间 2011-03-11
- 打赏
- 举报
汗 大哥现在要通过javascript处理的啊 就是不让通过服务端语言处理的
hch126163 2011-03-11
- 打赏
- 举报
百度是 gb2312 编码的
js 没有 gb2312 编码 函数
vbscript 有
2种解决办法：
1、 发送到服务器，服务器解码
2、vbscript 解码
js 没有 gb2312 编码 函数
vbscript 有
2种解决办法：
1、 发送到服务器，服务器解码
2、vbscript 解码
kaifadi 2011-03-11
- 打赏
- 举报
[Quote=引用 3 楼 hongmei85 的回复:]
连续点2、3次
HTML code
<script type="text/vbscript">
<!--
Function URLDecode(enStr)
dim deStr,strSpecial
dim c,i,v
deStr=""
strSpecial="!""#$%&'()*+,.-_/……
[/Quote]
太帅了。居然把久久没有看到过的VB脚本也挂上了。呵呵，学习了。
连续点2、3次
HTML code
<script type="text/vbscript">
<!--
Function URLDecode(enStr)
dim deStr,strSpecial
dim c,i,v
deStr=""
strSpecial="!""#$%&'()*+,.-_/……
[/Quote]
太帅了。居然把久久没有看到过的VB脚本也挂上了。呵呵，学习了。
hongmei85 2011-03-11
- 打赏
- 举报
连续点2、3次
<script type="text/vbscript">
<!--
Function URLDecode(enStr)
dim deStr,strSpecial
dim c,i,v
deStr=""
strSpecial="!""#$%&'()*+,.-_/:;<=>?@[\]^`{|}~%"
for i=1 to len(enStr)
c=Mid(enStr,i,1)
if c="%" then
v=eval("&h"+Mid(enStr,i+1,2))
if inStr(strSpecial,chr(v))>0 then
deStr=deStr&chr(v)
i=i+2
else
v=eval("&h"+ Mid(enStr,i+1,2) + Mid(enStr,i+4,2))
deStr=deStr & chr(v)
i=i+5
end if
else
if c="+" then
deStr=deStr&" "
else
deStr=deStr&c
end if
end if
next
URLDecode=deStr
End Function
//-->
</script>
<script type="text/javascript">
<!--
r = document.referrer.toString();
alert(URLDecode(r.substr(r.indexOf("?")+4)))
//-->
</script>
</head>
<body>
<a href="?wd=%CA%D3%C6%B5">ddd</a>
</body>
