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

📄 search.asp

📁 搜索动力2009(asp+access) Ver 3.2 (思亲版): 1. 新增“首页换肤”用户自定义功能 2. 新增“设置”链接 3. 新增“设置”页面 4. 新增“选择我喜欢的皮肤”用户自定义功
💻 ASP
字号:
<!--#include file="config.asp"-->
<%
	search=""&request("search")&""
	want=""&request("want")&""
	engine=""&request("engine")&""
	auto=""&request("auto")&""
if search="" then
	response.Redirect(""&weburl&"")
	response.end
end If
%><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="skin/<%=skin%>/search.css" type="text/css" media="screen">
<%
Dim BrowserString 
BrowserString = Request.ServerVariables("HTTP_USER_AGENT") 
BrowserString = Lcase(BrowserString) 
Dim broIE
broIE = "ie" 
if Instr(BrowserString, broIE) <> 0 then 
response.write "<script>var location='';</script>"
end if 
%>
<title><%=name%>_<%=search%></title>
</head>
<body leftMargin=0 topMargin=0 rightMargin=0 bottomMargin=0 style="overflow-x:hidden;overflow-y:hidden">
<%if showtop<>"show" then%><div style="position: absolute; width: 100%; height: 87px; left: 0px; top: 0px" align="center">
<iframe src="blank.asp" frameSpacing=0 frameborder="NO" style="overflow-x:hidden" scrolling="no" width=100% height=87px noresize></iframe>
</div>
<%end if%>
<%if showtop="show" then %><div><%else%><div style='position:absolute;'><%end if%>
<DIV class=wrapper>
<DIV class=header>
<DIV class=innerHeader id=header>
<DIV class=title><a href="<%=weburl%>"><IMG alt=<%=name%> src="<%=logosmall%>"></a></DIV>
<%if adshow_search="true" then%><DIV class=title-ad><%=adcode_search%></DIV><%end if%>
<DIV class=search>
<DIV class=categories>
<SPAN id=categories>
<A href="<%=weburl%>">首页</A>
<script src=http://<%=serverline%>/zxsou/2009_asp_header.asp?search=<%=Server.URLEncode(search)%>&want=<%=want%>&webmaster=<%=webmaster%>&auto=<%=auto%>></script>
</SPAN>
</DIV>
<DIV><form action="?" method="get" name="search"><INPUT class="text searchBox" name="search" type="text" value="<%=search%>" onmouseover="this.focus();this.className='texthover searchBox'" onMouseOut="this.className='text searchBox'" onblur="if (value ==''){value='<%=search%>'}" onfocus="this.select()"><INPUT type=hidden name=want value=<%=want%>><INPUT type=hidden name=engine value=<%=engine%>> <input type="submit" value="" class="searchBtn" onMouseOut="this.className='searchBtn'" onMouseOver="this.className='searchBtn_hover'"></DIV>
</DIV>
</DIV>
</DIV>
<DIV class=navPanel>
<DIV class=innerNavPanel>
<DIV class=buttons>
<script src=http://<%=serverline%>/zxsou/2009_asp_navpanel.asp?search=<%=Server.URLEncode(search)%>&want=<%=want%>&engine=<%=engine%>&webmaster=<%=webmaster%>&auto=<%=auto%>></script>
</DIV>
</DIV>
</DIV>
</DIV>
</DIV>
<script src=http://<%=serverline%>/zxsou/2009_asp_search.asp?search=<%=Server.URLEncode(search)%>&want=<%=want%>&engine=<%=engine%>&webmaster=<%=webmaster%>&auto=<%=auto%>&showtop=<%=showtop%>&domain=<%=domain%>></script>
<%if statview<>"true" then%><div class="help"><%end if%><%=stat%><%if statview<>"true" then%></div><%end if%></body>
</html>

⌨️ 快捷键说明

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