📄 czpt.asp
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="ip.asp"-->
<link href="http://www.zibosky.com/css/zbsky.css" rel="stylesheet" type="text/css">
<% if request.cookies("userid")="" or request.cookies("password")="" then
%>
<SCRIPT>
function formcheck()
{
if (loginform.userid.value == "")
{
alert('请输入用户名。');
loginform.userid.focus();
return false;
}
if (loginform.password.value == "")
{
alert('请输入密码。');
loginform.password.focus();
return false;
}
if (loginform.validateCode.value=="")
{
alert('请输入附加码，附加码就在输入框右边。');
loginform.validateCode.focus();
return false;
}
return true;
}
</SCRIPT>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>青苑影院-用户登录</title>
<style><!--body, td, p, li, input, select{FONT-SIZE: 9pt; font-family:宋体; COLOR: #ffffff; font-family:Arial}
.fontshadow { width:100%; filter:dropshadow(color=#ffffff,offx=1,offy=1);}
A:link{COLOR: #ffffff; text-decoration: none;}
A:visited{COLOR: #ffffff; text-decoration: none;}
A:Active{color : #ffffff; TEXT-DECORATION: none;}
A:hover{color: #ffffff; TEXT-DECORATION: none;}
A.a1:link{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:visited{COLOR: #000000; TEXT-DECORATION: none;}
A.a1:Active{color : #000000; TEXT-DECORATION: none;}
A.a1:hover{color : #000000; TEXT-DECORATION: none;}
A.a2:link{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:visited{COLOR: #1B409B; TEXT-DECORATION: none;}
A.a2:Active{color : #1B409B; TEXT-DECORATION: none;}
A.a2:A:hover{color: #1B409B;T EXT-DECORATION: none;}
.L17{line-height:170%}
.L18{line-height:180%}
.L20{line-height:200%}
--></style>
</head>
<body bgcolor="#0F0DAE" text="0" leftmargin="0">
<table border="0" cellspacing="0" align=center style="border-collapse: collapse" bordercolor="#111111" width="359" id="AutoNumber1" cellpadding="0">
<TR>
<TD valign="top" background="images/login-bg.jpg" > <table width="90%" border="0" align="center">
<FORM method=post name=loginform action="userpass.asp"
onsubmit="if (!formcheck()) return false;">
<TBODY>
<TR>
<TD align="center" height=35><FONT
color=#3b591b class="fontshadow"></FONT></TD>
<TD align="left" height=35><FONT
color=#3b591b class="fontshadow"><b>用 户 登 录</b></FONT></TD>
</TR>
<TR>
<TD align=right height=25 width="40%"><FONT
color=#3b591b class="fontshadow">用户名：</FONT></TD>
<TD width="65%"><INPUT name=userid
onfocus=javascript:this.select(); style="border: 1px solid #3655AA; font-size:9pt;color:#000000"" size=14></TD></TR>
<TR>
<TD align=right height=13 width="40%"><FONT
color=#3b591b class="fontshadow">密 码：</FONT></TD>
<TD><INPUT name=password
onfocus=javascript:this.select(); style="border: 1px solid #3655AA; font-size:9pt;color:#000000"" size=14 type=password></TD></TR>
<TR>
<TR>
<TD align=middle colSpan=2 height=25><input type="image" name="Submit" src="images/index-denglu.gif" width="62" height="18">  
<a href="reguser.asp" target=_blank>
<img border="0" src="images/index-zhuce.gif" width="62" height="18"></a></TD></TR> </form>
</table></TD>
</TR>
</TABLE>
</body>
</html>
<link href="http://www.zibosky.com/css/zbsky.css" rel="stylesheet" type="text/css">
<%response.end
end if%>
<%
dim rs
dim sql
set rs=server.createobject("adodb.recordset")
sql="select * from users where userid='"&request.cookies("userid")&"'"
rs.open sql,conn,1,3
userid=rs("userid")
%>
<SCRIPT>
function formnamecheck(){
if (formname.car1.value=="")
{
alert('请输入充值卡号。');
formname.car1.focus();
return false;
}
if (formname.car2.value=="")
{
alert('请输入卡号密码。');
formname.car2.focus();
return false;
}
return true;
}
</SCRIPT>
<div align="center">
<center>
<table border="1" cellspacing="0" style="border-collapse: collapse" bordercolor="#1B409B" width="778" id="AutoNumber12" cellpadding="0" height="542">
<tr>
<td width="100%" bgcolor="#1B409B" height="542">
<div align="center">
<center>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="758" id="AutoNumber13" height="497" bgcolor="#4885FE" cellpadding="0">
<tr>
<td width="10" valign="top">
<img border="0" src="images/register-left1.gif" width="19" height="19"></td>
<td height="19" colspan="2">
</td>
<td width="10" valign="top" align="right">
<img border="0" src="images/register-right1.gif" width="19" height="19"></td>
</tr>
<tr valign="top" >
<td width="10"> </td>
<td width="544">
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber15" cellpadding="0">
<tr>
<td width="100%" align="center" background="images/charge_title.jpg" height="68">
</td>
</tr>
<tr>
<TD align=middle width="100%" background="images/pay_bg1.jpg" height=360>
<TABLE cellSpacing=0 cellPadding=0 width=500 align=center
border=0>
<form id=formname name=formname
onsubmit="if (!formnamecheck()) return false;" method="POST" action="czpt.asp">
<% if request("car1")<>"" or request("car2")<>"" then
car1=replace(trim(request("car1")),"'","")
car2=replace(trim(Request("car2")),"'","")
set rs=server.createobject("adodb.recordset")
sql="select * from car where carid='"&car1&"'and carpws='"&car2&"'"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write"<script>alert('该充值卡不存在或者密码不正确！');history.back();</Script>"
response.end
else
paymoney=rs("paymoney")
dayer=rs("day")
oklook=rs("oklook")
set rs1=server.createobject("adodb.recordset")
sql1="select money,starlook,oklook,usercount,baoyue,askmejoin from users where userid='"&Replace(request("userid"), "'", "''")&"'"
rs1.open sql1,conn,1,3
if rs1.eof and rs1.bof then
response.write"<script>alert('该充值帐号不存在或没有登陆，请先登陆！');history.back();</Script>"
response.end
else
rs1("starlook")=now()
if oklook<>0 then
if rs1("money")-now()<1 then
rs1("money")=now() + dayer
rs1("oklook")=oklook
rs1("baoyue")=1
else
rs1("money")=rs1("money") + dayer
rs1("oklook")=oklook
rs1("baoyue")=1
end if
else
rs1("usercount")=rs1("usercount") + dayer
rs1("baoyue")=0
end if
rs1.update
conn.execute"delete from car where carid='"&car1&"'"
end if
if rs1("askmejoin")<>"" then
set rs2=server.createobject("adodb.recordset")
sql2="select getmoney,payno,oklook from users where userid='"&rs1("askmejoin")&"'"
rs2.open sql2,conn,1,3
if rs2("oklook")=0 or rs2("oklook")=1 then
give=1
elseif rs2("oklook")=2 then
give=2
elseif rs2("oklook")=3 then
give=3
end if
rs2("getmoney")=cint(rs2("getmoney"))+paymoney/10*give
rs2("payno")=cint(rs2("payno"))+1
rs2.update
rs2.close
set rs2=nothing
end if
if oklook=0 then
oklook="游客"
elseif oklook=1 then
oklook="计点"
elseif oklook=2 then
oklook="包月"
elseif oklook=3 then
oklook="包季"
elseif oklook=4 then
oklook="包年"
elseif oklook=5 then
oklook="终生"
end if
end if
rs.close
rs1.close
set rs=nothing
set rs1=nothing
%><TBODY><font size="2">已经成功地将<font color="#FF0000"><%=dayer%>天/点</font>的<font color="#FF0000"><%=oklook%>卡</font>充入你的帐号，你现在是<font color="#FF0000"><%=oklook%>会员</font>。</font></td>
</tr>
<%else%>
<TABLE width="62%" border=0>
<TBODY>
<TR>
<TD><FONT color=#ff0000>充值说明：免费向我提取帐号密码，如果你输入了正确的充值卡号，那么卡上的点数就会即时加到你的帐号上。
</TD></TR></TBODY></TABLE><BR><BR>
<TABLE border=0>
<TBODY>
<TR>
<TD><FONT color=#000000>充值卡号：</TD>
<TD><INPUT style="border: 1px solid #3655AA; font-size:9pt; color:#000000" name=car1 size="20" value=""></TD></TR>
<TR>
<TD><FONT color=#000000>卡号密码：</TD>
<TD><INPUT style="border: 1px solid #3655AA; font-size:9pt; color:#000000" name=car2 size="20" value=""></TD></TR>
<TR>
<TD><FONT color=#000000>充值用户：</TD>
<TD><INPUT style="border: 1px solid #3655AA; font-size:9pt; color:#000000" name=car3 size="20" value="<%=userid%>" disabled></TD></TR>
<TR align=middle>
<TD colSpan=2>
<input name="b1" type="image" src="images/pass_clear.gif" class="button1" value="提交" width="81" height="20">
<a href="javascript:document.formname.reset()"><img border="0" src="images/pass_tijiao.gif" width="81" height="20"></a></TD></TR></TBODY></TABLE></FORM>
<%end if%>
</TD></TR>
<!--#include file="Bottom1.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -