goto.asp

来自「客户管理系统使用ASP.NET和Access」· ASP 代码 · 共 20 行

<%
select0=trim(request("select"))
word=trim(request("word"))

if select0="baidu" then
 response.Redirect("http://www.baidu.com/s?ie=gb2312&wd="&word&"")
 response.End()
end if

if select0="google" then
 response.Redirect("http://www.google.cn/search?hl=zh-CN&q="&word&"&meta=&aq=f")
 response.End()
end if

if select0="alibaba" then
 response.Redirect("http://search.china.alibaba.com/search/company_search.htm?keywords="&word&"")
 response.End()
end if
%>