www.gusucode.com > 快乐中国企业管理系统 2007 Beta2 > 快乐中国企业管理系统 2007 Beta2/UserServer.asp
<!--#include file="Inc/conn.asp" -->
<!--#include file="Inc/Function.asp" -->
<!--#include file="Inc/Config.asp" -->
<!--#include file="inc/Skin_css.asp"-->
<!-- #include file="Head.asp" -->
<!--#include file="inc/md5.asp"-->
<%
Action=Trim(request("Action"))
if Action="Login" then
dim sql
dim rs
dim username
dim password
username=replace(trim(request("username")),"'","")
password=replace(trim(Request("password")),"'","")
password=md5(password)
set rs=server.createobject("adodb.recordset")
sql="select * from [User] where LockUser=False and username='" & username & "' and password='" & password &"'"
rs.open sql,conn,1,3
if not(rs.bof and rs.eof) then
if password=rs("password") then
rs("LoginIP")=Request.ServerVariables("REMOTE_ADDR")
rs("LastLoginTime")=now()
rs("logins")=rs("logins")+1
rs.update
session("UserName")=rs("username")
Response.Redirect "UserServer.asp"
end if
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
end if
%>
<table width="1000" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="210" valign="top"><table width="200" border="0" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3"><img src="Images_v1/left_top1.gif" width="200" height="20"></td>
</tr>
<tr>
<td width="5" bgcolor="#FFFFFF"></td>
<td width="189" align="center"background="Images_v1/left_topbg.gif" bgcolor="#F3F5F4" class="bg_x"><table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td align="center"><!--#include file="left_usres.asp" --></td>
</tr>
<tr>
<td align="center"> </td>
</tr>
</table></td>
<td width="6" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td colspan="3"><img src="Images_v1/left_top3.gif" width="200" height="8"></td>
</tr>
</table>
<table width="200" border="0" cellpadding="0" cellspacing="5" bgcolor="#FFFFFF">
<tr>
<td width="8%"><!--#include file="facility.asp" --></td>
</tr>
</table></td>
<td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="21"><img src="Images_v1/yx2_1.gif" width="35" height="21"></td>
<td background="Images_v1/yx2_2.gif"> </td>
<td width="21" align="right"><img src="Images_v1/yx2_3.gif" width="21" height="21"></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FAFBFB">
<tr>
<td width="3" background="Images_v1/yx2_4.gif"> </td>
<td bgcolor="#F9FBFB"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<TR>
<TD><table width="100%" border="0" align="center" cellpadding="3" cellspacing="0">
<tr>
<td width="34%"> <a href="index.asp">首页</a> >> 会员中心</td>
<td width="66%"> </td>
</tr>
<tr>
<td colspan="2" bgcolor="#999999"></td>
</tr>
</table>
<br>
<%If Session("UserName")="" Then%>
<table width="100%" border="0" cellpadding="0" cellspacing="3">
<tr>
<td colspan="2" align="right"><p align="center" style="word-spacing: 0; margin-top: 0; margin-bottom: 0"> </p></td>
</tr>
<tr>
<td colspan="2" align="right"><div align="center">
<table class="main" cellSpacing="0" cellPadding="2" width="100%" border="0" height="1">
<tbody>
<tr>
<td width="100%" height="1"><table width="300" border="0" align="center" cellpadding="0" cellspacing="0" background="Images_v1/bg_4px.gif">
<tr>
<td colspan="2"><img src="Images_v1/userlogin.gif" width="300" height="11"></td>
</tr>
<tr>
<td width="112"><img src="Images_v1/userlogin8.gif" width="96" height="105" hspace="8"></td>
<td width="188"><table border='0' align="center" cellpadding='0' cellspacing='0'>
<form action='UserServer.asp?Action=Login' method='post' name='UserLogin' onSubmit='return CheckForm();'>
<tr >
</tr>
<tr>
<td height='25' align='right'>用户名：</td>
<td height='25'><input name='UserName' type='text' id='UserName' size='10' maxlength='20'></td>
</tr>
<tr>
<td height='25' align='right'>密 码：</td>
<td height='25'><input name='Password' type='password' id='Password' size='10' maxlength='20'></td>
</tr>
<tr align='center'>
<td height='25' colspan='2'><input name='Login' type='submit' id='Login' value=' 登录 '>
<input name='Reset' type='reset' id='Reset' value=' 清除 '></td>
</tr>
<tr>
<td height='20' colspan='2' align='center'><a href='UserReg.asp' target='_blank'>用户注册</a> <a href='GetPassword.asp' target='_blank'>忘记密码</a></td>
</tr>
</form>
</table></td>
</tr>
<tr>
<td colspan="2"><img src="Images_v1/userlogin2.gif" width="300" height="11"></td>
</tr>
</table></td>
</tr>
</tbody>
</table>
</div></td>
</tr>
<tr>
<td height="19" colspan="2" align="right"> </td>
</tr>
<tr>
<td height="19" align="right"><p align="center" style="word-spacing: 0; margin-top: 0; margin-bottom: 0"> </p></td>
<td height="19" align="right"><div align="left">您无法进入会员中心，请先登录！如果您不是我们的会员，请立即<font color="#006699"><a href="UserReg.asp"><font color="#FF0000">注册</font></a>。</font></div></td>
</tr>
<tr>
<td width="18%" align="right"></td>
<td width="82%">我们的会员有以下功能：</td>
</tr>
<tr>
<td width="18%" align="right"> </td>
<td width="82%">1、修改您的会员注册资料；</td>
</tr>
<tr>
<td width="18%" align="right"> </td>
<td width="82%"><p>2、查询您的询价，以及询价的处理情况；</p></td>
</tr>
<tr>
<td width="18%" align="right"> </td>
<td width="82%">3、专用私人留言簿，您可在此给我们留言和查看我们的回复。</td>
</tr>
<tr>
<td align="right"> </td>
<td> </td>
</tr>
</table>
<%else%>
<TABLE width="85%" align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR vAlign=top >
<TD width="100%"><p style="margin-bottom: 0"> <br>
亲爱的<%=Session("UserName")%>：</p>
<p style="word-spacing: 0; margin-top: 0; margin-bottom: 0"> </p>
<p style="word-spacing: 0; margin-top: 0; margin-bottom: 0"> 您现在已经进入会员服务中心，这里只有注册会员才能访问。您可在这里修改您的注册信息、给我们留言、查看我们对您留言的答复，也可以查询您的询价及询价处理情况。</p></TD>
</TR>
</TBODY>
</TABLE>
<%end if%></TD>
</TR>
</table></td>
<td width="21" align="right" background="Images_v1/yx2_5.gif"> </td>
</tr>
</table>
<table width="790" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="10"><img src="Images_v1/yx2_6.gif" width="10" height="10"></td>
<td width="770" background="Images_v1/yx2_7.gif"></td>
<td width="10" align="right"><img src="Images_v1/yx2_8.gif" width="10" height="10"></td>
</tr>
</table></td>
</tr>
</table>
<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>