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

📄 ku_top.asp

📁 欢迎使用酷航设计系统
💻 ASP
字号:
<%
    '缓冲面页
    response.Expires = -1
    'True开启缓冲 False关闭
    Response.Buffer=True 
    Dim time1,time2
    time1=timer
%>
<!--#include file="Include/xbqq_Setup.asp" -->
<!--#include file="Include/xbqq1_Function.asp" -->
<!--#include file="Include/Xbqq_Function.asp" -->
<!--#include file="Conn_User.asp" -->
<!--#include file="other/xbqq_Md5.asp" -->
<!--#include file="Conn.asp" -->

<%
Dim Fy_Url,Fy_a,Fy_x,Fy_Cs(),Fy_Cl,Fy_Ts,Fy_Zx
'---定义部份  头------
Fy_Cl = 3		'处理方式:1=提示信息,2=转向页面,3=先提示再转向
Fy_Zx = "index.Asp"	'出错时转向的页面
'---定义部份  尾------
On Error Resume Next
Fy_Url=Request.ServerVariables("QUERY_STRING")
Fy_a=split(Fy_Url,"&")
redim Fy_Cs(ubound(Fy_a))
On Error Resume Next
for Fy_x=0 to ubound(Fy_a)
Fy_Cs(Fy_x) = left(Fy_a(Fy_x),instr(Fy_a(Fy_x),"=")-1)
Next
For Fy_x=0 to ubound(Fy_Cs)
If Fy_Cs(Fy_x)<>"" Then
If Instr(LCase(Request(Fy_Cs(Fy_x))),"'")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"and")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"select")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"update")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"chr")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"delete%20from")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),";")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"insert")<>0 or Instr(LCase(Request(Fy_Cs(Fy_x))),"mid")<>0 Or Instr(LCase(Request(Fy_Cs(Fy_x))),"master.")<>0 Then
Select Case Fy_Cl
  Case "1"
Response.Write "<Script Language=JavaScript>alert('出现错误!参数 "&Fy_Cs(Fy_x)&" 的值中包含非法字符串!\n\n  请不要试图破坏酷航系统,感谢大家的支持与帮助!向中国红客致敬!');window.close();</Script>"
  Case "2"
Response.Write "<Script Language=JavaScript>location.href='"&Fy_Zx&"'</Script>"
  Case "3"
Response.Write "<Script Language=JavaScript>alert('出现错误!参数 "&Fy_Cs(Fy_x)&"的值中包含非法字符串!\n\n  请不要试图破坏酷航系统,感谢大家的支持与帮助!向中国红客致敬!');location.href='"&Fy_Zx&"';</Script>"
End Select
Response.End
End If
End If
Next
%>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="keywords" content="酷航设计--学校版,酷航网络,酷航虚拟主机,域名注册,网站建设,kuhang.cn">
<meta name="description" content="酷航设计--学校版,酷航网络,酷航虚拟主机,域名注册,网站建设,kuhang.cn">
<title><%=Gaobei_Title%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="other/xbqq_style.css" rel="stylesheet" type="text/css">
<SCRIPT language=javaScript src="Include/kuhang.js" type=text/javascript></SCRIPT>
</head>

<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" marginwidth="0" marginheight="0" background="xbqq_img/bg.gif">

<div align="center">
	<table border="0" width="800" height="150" background="xbqq_img/ku_index01.jpg" cellpadding="0" cellspacing="0">
		<tr>
			<td height="150" width="800">
			<div align="center">
				<table border="0" width="100%" id="table1" height="150">
					<tr>
						<td width="147"> </td>
						<td> </td>
					</tr>
					<tr>
						<td width="147" height="30"> </td>
						<td height="30"><!--#include file="Include/index_dh.asp" --></td>
					</tr>
				</table>
			</div>
			</td>
		</tr>
	</table>
</div>
<!--
<%
    '获取文章的导航题目
    SortID=CheckStr(Request.QueryString("SortID"))
    sql="select * from Sort where ID="&SortID&""
    Set Rs=conn.execute (sql)
    Sortname=Rs("names")
    Rs.close
    set Rs=nothing
    '==============================================
    ClassID=CheckStr(Request.QueryString("ClassID")) 
    sqlc="select * from Sort where ID="&ClassID&""
    Set Rsc=conn.execute (sqlc)
    Classname=Rsc("names")
    Gaobei_CalssInfo=Rsc("Info")
    B_ID=Rsc("B_ID")
    sqls="select * from Sort where ID="&B_ID&""
    Set Rss=conn.execute (sqls)
    SortName=Rss("names")
    Title ="<a href=Sort.asp?SortID="&B_ID&">" &SortName & "</a>"& " &gt;&gt; " & Classname
    Rs.close
    set Rs=nothing
%>
-->
<div align="center">
	<table border="0" width="800" height="28" background="xbqq_img/bg02.gif" cellpadding="0" cellspacing="0">
		<tr>
			<td height="28" width="42">
			<p align="right">
			<img border="0" src="xbqq_img/ku_ico.gif" width="19" height="12"></td>
			<td height="28" width="580">&nbsp;您现在位置:<a href="index.asp">酷航中学校</a>&nbsp;<% call navigation() %> </td>
			<td height="28" width="178"><SCRIPT type=text/javascript>ku_time();</SCRIPT></td>
		</tr>
	</table>
</div>
<div align="center">
	<table border="0" width="800" height="120" cellpadding="0" cellspacing="0">
		<tr>
			<td height="35" width="399">
			<img border="0" src="<%=Gaobei_Banner%>" width="800" height="120"></td>
		</tr>
	</table>
</div>
<div align="center">
	<table border="0" width="800" height="2" cellpadding="0" cellspacing="0" bgcolor=#FFFFFF>
		<tr>
			<td height="2" width="800"></td>
		</tr>
	</table>
</div>

⌨️ 快捷键说明

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