📄 inc.asp
字号:
<%
'****************************************************
'=================================================
'过程名：head
'作 用：页头
'参 数：无
'web: www.ynsky.com.cn
'=================================================
sub head()
if Request.Cookies("skins")<>"" and skinopen="yes" then
skin=Request.Cookies("skins")
end if
dim Ip_address
Ip_address=Request.ServerVariables ("HTTP_X_FORWARDED_FOR") '获得客户端的代理ip地址
If Ip_address="" Then
Ip_address= Request.ServerVariables ("REMOTE_ADDR") '获得客户端的ip地址
End If
'--------ID限制
u_uid=Request.Cookies("HX_CHECK")("uid")
checkopen=False
if bad_ID<>"" then
check_uid=split(bad_ID,"|")
for z=0 to ubound(check_uid)
'if instr(u_uid,check_uid(z))>0 then
if check_uid(z)=u_uid then
checkopen=true
exit for
end if
next
end if
'--------ID限制
if valid_ip(Ip_address)<>"true" OR checkopen=true then
response.write"<div align=center><font color=red size=2>对不起，您的IP已被系统管理员锁定!</font></div>"
response.end
end if
if webopen="yes" then
response.write"<div align=center><font color=red size=2>"& offweb &"</font></div>"
response.end
end if
%>
<% Server.ScriptTimeOut=90 %><html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=webname%>>><%=start%></title>
<meta name="keywords" content="云南旅游,云南旅游网,云南旅行社,云南旅游路线,云南旅游景点,昆明康辉">
<meta name="description" content="云南旅游信息网为打算到云南旅游的朋友提供云南旅游的信息，如云南旅游景点、云南旅游路线及报价、云南旅游攻略、云南旅游资讯等，为您的云南旅程提供优质服务！">
<meta http-equiv="Content-Language" content="zh-CN" />
<meta name="generator" content="youyou" />
<meta name="robots" content="all" />
<meta name="author" content="tour@ynsky.com.cn" />
<link href="skin/<%=skin%>/css.css" rel="stylesheet" type="text/css" />
<base onmouseover="window.status='欢迎访问“云南旅游信息网”';return true"/>
<SCRIPT language=javaScript src="inc/js.js" type=text/javascript></SCRIPT>
<style type="text/css">
<!--
.menuskin {
BORDER: #003366 1px solid; VISIBILITY: hidden; FONT: 12px Verdana;
POSITION: absolute; background-color:#F0F0F0;
}
.menuskin A {
PADDING-RIGHT: 1px; PADDING-LEFT: 1px; COLOR: #333333; TEXT-DECORATION: none;
}
.menuitems{
margin:2px;padding:1px;word-break:keep-all;
}
-->
</style>
</HEAD>
<BODY>
<table width="760" background="skin/<%=skin%>/banner.gif" border="0" align="center" cellpadding="0" cellspacing="0" class="table-hx66s">
<tr>
<td valign="top" height="100">
<div align="right" style="padding-right:50px;"><a href ="#" onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://www.ynsky.com.cn/');return(false);">
<font color="#005782">设为首页</font></a> <a href="javascript:window.external.AddFavorite('http://www.ynsky.com.cn', '云南旅游信息网www.ynsky.com.cn')" target=_self><font color="#005782">收藏本站</font></a></div>
</td>
</tr>
<%end sub
'=================================================
'过程名：menu
'作 用：导航
'参 数：无
'web: www.ynsky.com.cn
'=================================================
sub menu()%>
<script type="text/JavaScript">
<!--
document.body.oncopy=function(){
event.returnValue=false;
var t=document.selection.createRange().text;
var s="来自“云南旅游信息网”http://www.ynsky.com.cn";
clipboardData.setData('Text',t+'\r\n'+s+'\r\n\r\n');
}
//-->
</script>
<!--#include file="menu.asp"--></table>
<%end sub
'=================================================
'过程名：footer
'作 用：页脚
'参 数：无
'web: www.ynsky.com.cn
'=================================================
sub footer()
time2=timer
dim skin1
skin1=""&skin&""
if skin1="0" then
hxskin="淡蓝风格"
elseif skin1="1" then
hxskin="黄色魅力"
elseif skin1="2" then
hxskin="墨蓝深远"
elseif skin1="3" then
hxskin="粉红诱惑"
elseif skin1="4" then
hxskin="灰色畅想"
elseif skin1="5" then
hxskin="花之仙子"
elseif skin1="6" then
hxskin="生命绿色"
elseif skin1="7" then
hxskin="新年风格"
elseif skin1="8" then
hxskin="蓝蓝海岸"
end if%>
<table width="760" border="0" align="center" cellspacing="0" cellpadding="0" class="table-hx66s" bgcolor="#FFFFFF">
<tr>
<td height="10"></td>
</tr>
<tr>
<td height="23" class="a1" align="right"><font color=#999999>www.ynsky.com.cn 当前风格：<%=hxskin%></font> </td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" background="skin/<%=skin%>/bg_bott.jpg" class="table-hx66s">
<tr>
<td valign="top" height="6"></td>
</tr>
<tr>
<td align="center" valign="top">
<!--copyright-->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="18%" align="center"><img src="../img/cjht.gif" border="0" alt="出境旅游合同样本"> <a href="../upload/旅游合同.doc"><img src="../img/gnht.gif" border="0" alt="国内旅游合同样本"></a></td>
<td width="64%" align="center"><a href="http://www.ynsky.com.cn">云南旅游</a> | <a href='about.asp'>关于康辉</a> | <a href='about.asp?ynsky=lx'>联系地址</a> | <a href='about.asp?ynsky=dt'>网站地图</a><br><script src="http://www.ynsky.com.cn/count/YnSky.asp?username=ynsky"></script>Copyright © 2005-2007 www.ynsky.com.cn Inc All Rights Reserved.<BR><a href="http://ynsky.com.cn">云南旅游信息网</a> 昆明康辉 版权所有 页面执行时间：<%=FormatNumber((time2-time1)*1000,2)%>MS <a href="http://www.miibeian.gov.cn" target="_blank"><%=webinfo%></a></td>
<td width="18%" align="center"><img src="../img/cctry.gif" border="0" alt="我们取得的荣誉"> <img src="../img/cctzz.gif" border="0" alt="许可证号：L-YN-GJ00042"></td>
</tr>
</table>
<!--copyright-->
</td>
</tr>
<tr>
<td valign="top" height="20"><!--#include file="count.asp"--></td>
</tr>
</table>
<noscript><iframe src=*.html></iframe></noscript>
</body>
</html>
<!---------版权信息-------------
┌───www.ynsky.com.cn────┐
│ │
│╭⌒╮┅~ ¤ ╭⌒╮ ╭⌒╮ │
│╭⌒╭⌒╮╭⌒╮～╭⌒╮︶︶, │
│,︶︶︶︶,''︶** ,''~︶︶ ,'│
│╭○╮● **** ^_^ │
│ /■\/■\ ****** │
│ || || ◎Q七彩云南C◎ │
│ *****游游工作室****** │
└───────────────┘
--------云南旅游信息网---------->
<%end sub
'=================================================
'过程名：无
'作 用：会员登陆判断
'参 数：无
'web: www.ynsky.com.cn
'=================================================
if Request.Cookies("HX_USER")("User_Name")="" or isnull(Request.Cookies("HX_USER")("User_Name")) or Request.Cookies("HX_USER")("User_Pwd")="" or isnull(Request.Cookies("HX_USER")("User_Pwd")) then
UserLogined=False
checkmember=False
SupAdmin=False
Hx66_Grade=""
Hx66_points=""
else
function ReplaceBadChar(strChar)
if strChar="" then
ReplaceBadChar=""
else
ReplaceBadChar=replace(replace(replace(replace(replace(replace(replace(strChar,"'",""),"*",""),"?",""),"(",""),")",""),"<",""),".","")
end if
end function
userid=clng(request.Cookies("HX_USER")("uid"))
username=ReplaceBadChar(request.Cookies("HX_USER")("User_Name"))
password=ReplaceBadChar(request.Cookies("HX_USER")("User_Pwd"))
sql="select * from [User] where userid=" & userid &" and UserName='" & Username & "' and password='" & password & "'"
set rs0=server.createobject("adodb.recordset")
rs0.open sql,conn,1,1
IF Rs0.eof Then
Response.Redirect "show_error.asp?eid=非法登录,请不要破坏此系统,如果依然有问题请联系管理员!"
Response.End
else
UserLogined=True
Hx66_uid=rs0("UserID")
Hx66_name=rs0("UserName")
Hx66_Password=rs0("Password")
Hx66_Question=rs0("Question")
Hx66_Answer=rs0("Answer")
Hx66_Email=rs0("Email")
Hx66_sex=rs0("sex")
Hx66_RegDate=rs0("RegDate")
Hx66_LoginTimes=rs0("LoginTimes")
Hx66_Homepage=rs0("Homepage")
Hx66_QQ=rs0("QQ")
Hx66_LastLoginTime=rs0("LastLoginTime")
Hx66_Grade=rs0("UserGrade")
Hx66_points=rs0("points")
Hx66_Photo=rs0("UserPhoto")
Hx66_Sign=rs0("UserSign")
Hx66_friend=rs0("Userfriend")
Hx66_collect=rs0("usercollect")
Hx66_hidden=rs0("hidden")
Hx66_whe=rs0("whe")
Hx66_birthday=rs0("birthday")
Hx66_phone=rs0("phone")
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -