⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 baidu.asp

📁 迅时后台可以 对新闻栏目进行管理
💻 ASP
字号:

<%
lx=trim(request("lx"))
word=trim(Request("word"))
if (not isNumeric(ID)) then
	lx=1
end if

if word<>"" then 

	if lx="2" then
		Response.Redirect "http://image.baidu.com/i?tn=baiduimage&ct=201326592&lm=-1&cl=2&word="&word
	elseif lx="3" then
		Response.Redirect "http://news.baidu.com/ns?tn=newstitle&from=news&cl=2&rn=20&ct=0&word="&word
	elseif lx="4" then
		Response.Redirect "http://mp3.baidu.com/m?f=ms&rn=&tn=baidump3&ct=134217728&lm=-1&word="&word
	elseif lx="6" then
		Response.Redirect "http://www.xuas.com/other/ip2.asp?ip="&word&" "
	elseif lx="5" then
		Response.Redirect "http://life.httpcn.com/Dict.asp?act=1&word="&left(word,1)
	elseif lx="7" then
		Response.Write "<FORM action='http://www.ip138.com:8080/search.asp' method='post' onsubmit='return checkMobile();' name='mobileform'>"
		Response.Write "<INPUT class='TextBoxStyle' maxLength='11' name='mobile' value='"&word&"' size='15'><INPUT class='ButtonStyle' type='submit' value='提交'><INPUT TYPE='hidden' NAME='action' VALUE='mobile'></FORM>"
		Response.Write "<script language='JavaScript'>document.mobileform.submit();</script>"
		Response.end
	elseif lx="9" then
		Response.Redirect "http://video.baidu.com/v?ct=301989888&rn=20&pn=0&db=0&s=0&tn=alanxua&fbl=1024&word="&word		
	elseif lx="10" then
		Response.Redirect "http://bt.fkee.com/search.aspx?p=Seed&b=0&q="&word
	elseif lx="11" then
		Response.Redirect "http://search.gougou.com/search?id=2&search="&word
	elseif lx="12" then
		Response.Redirect "http://stock.baidu.com/cn/q.php?code="&word
	elseif lx="14" then
		Response.Redirect "http://tieba.baidu.com/f?kw="&word
	end if

	
	if bk="1" then
		Response.Redirect "/bk1.asp?s_book="&word
	end if
		
		Response.Redirect "http://www.baidu.com/baidu?tn=alanxua&ct=&lm=&rn=&z=&_sv=1&hl=zh-CN&wd="&word
		'Response.Redirect "http://search.cn.yahoo.com/search?lp="&word&"&p="&word&"&pid=ysearch&meta=all"


end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -