sinobuy
  

你好! 访客. 请先 登陆注册一个帐号.
十一月 21, 2019, 06:19:25 pm
论文答辩趣闻 新年祝福短信 淘淘成长日记 可爱发行全攻略 鬼故事一箩筐 杨柳青石家大院 淘淘成长日记
* 首页 说明 搜索 日历 登陆 注册
公告和新闻:原生态购物网沉香微店热卖 点击进入
原生态论坛  |  设计专版  |  网页/程序设计 (版主: tianya)  |  主题: 从URL中提取搜索引擎的关键字 0 会员 以及 1 访客 正在阅读本篇主题. « 上一篇主题 下一篇主题 »
页: [1] 向下 打印
作者 主题: 从URL中提取搜索引擎的关键字  (阅读 8352 次)
efan
访客
从URL中提取搜索引擎的关键字
« 于: 十二月 27, 2005, 09:07:04 pm »


http://www.baidu.com/s?wd=friend%C4%E3%BA%C3&cl=3
http://www.google.com/search?hl=zh-CN&ie=GB2312&q=friend%C4%E3%BA%C3&btnG=Google+%CB%D1%CB%F7&lr=
里面的关键词是"friend你好",
用javascript decodeURI()方法解码
或者用下面的
<%
'解码函数
Function URLDecode(enStr)
dim deStr
dim c,i,v
deStr=""
for i=1 to len(enStr)
c=Mid(enStr,i,1)
if c="%" then
v=eval("&h"+Mid(enStr,i+1,2))
if v<128 then
deStr=deStr&chr(v)
i=i+2
else
if isvalidhex(mid(enstr,i,3)) then
if isvalidhex(mid(enstr,i+3,3)) then
v=eval("&h"+Mid(enStr,i+1,2)+Mid(enStr,i+4,2))
deStr=deStr&chr(v)
i=i+5
else
v=eval("&h"+Mid(enStr,i+1,2)+cstr(hex(asc(Mid(enStr,i+3,1)))))
deStr=deStr&chr(v)
i=i+3
end if
else
destr=destr&c
end if
end if
else
if c="+" then
deStr=deStr&" "
else
deStr=deStr&c
end if
end if
next
URLDecode=deStr
end function
function isvalidhex(str)
isvalidhex=true
str=ucase(str)
if len(str)<>3 then isvalidhex=false:exit function
if left(str,1)<>"%" then isvalidhex=false:exit function
c=mid(str,2,1)
if not (((c>="0") and (c<="9")) or ((c>="A") and (c<="Z"))) then isvalidhex=false:exit function
c=mid(str,3,1)
if not (((c>="0") and (c<="9")) or ((c>="A") and (c<="Z"))) then isvalidhex=false:exit function
end function

'使用方式:把你要解的放在这里就可以了
response.write urldecode("friend%C4%E3%BA%C3") & "<br/>"
%>

具体怎么得到friend%C4%E3%BA%C3用split函数一步步拆分
strname="http://www.baidu.com/s?wd=friend%C4%E3%BA%C3&cl=3"
strname2=split(strname,"?")
strname3=split(strname2[1],"&")
strname4=split(strname3[0],"=")
strname4[1]就是你想要得到的那些
GOOGLE的你自己看下和这个原理一样,拆分下

已记录

原生态特色礼品:沉香 紫檀 黄花梨
页: [1] 向上 打印 
原生态论坛  |  设计专版  |  网页/程序设计 (版主: tianya)  |  主题: 从URL中提取搜索引擎的关键字 « 上一篇主题 下一篇主题 »
跳到:  

友情链接: 原生态购物网 原生态官方博客  佛珠网  搜狐社区 淑女情缘论坛 沉香
  原生态论坛© 2005~2017, www.sinobuy.cn 版权所有
Powered by SMF 1.1 RC1 Lewis Media.
Powered by MySQL  Powered by PHP  Valid XHTML 1.0!  Valid CSS!