login_ok.asp

一个免费的绿叶网上书店请大家提宝贵意见 站长的帐号是 用户名：雨丁香 密码：200505 副站长帐号是 用户名： wangli 密码：197207

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../include/top3.asp"-->
<%
lgname=Replace(Request.Form("user"),"'","''")
lgpwd=Replace(Request.Form("pwd"),"'","''")
sql="select * from member where username='"&lgname&"' and password='"&lgpwd&"'"
rs.open sql,conn,1,2
%>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="210" height="32" background="../images/bg2.gif">&nbsp;</td>
    <td width="568" rowspan="9" bgcolor="#FFFFFF">
<p align="center"> 
        <%if rs.eof then %>
        <strong><font color="#FF0000">登 陆 失 败</font></strong></p>
      <p align="center"><font size="2">·你的用户名或密码错误·<br>
        <br>
        ·<a href='javascript:history.go(-1)'>返回重新登陆</a>·</font></p>
		 </tr>
   <!--#include file="../include/left.htm"-->
</table>
<!--#include file="../include/foot.asp"-->
      <div align="center"> 
        <p> 
          <% else
		  dim logins
	 session("user")=rs("username")
	 logins=rs("logins")+1
	 sql="update member set logins="&logins&",lasttime='"&now()&"' where username='"&session("user")&"'"
	conn.execute(sql)
	  %>
          <font color="#FF0000"><strong>登 陆 成 功</strong></font> </p>
        <p>·<a href='dingdan.asp'><font size="2">查看订单情况</font></a>·</p>
      </div>
      <p>&nbsp; </p></td>
  </tr>
  <tr> 
    <td height="32" background="../images/bg2.gif"><div align="center"><strong><a href="newbooks.asp?pageno=1" class="text">新书上市</a></strong></div></td>
  </tr>
  <tr> 
    <td height="32" background="../images/bg2.gif"><div align="center"><strong><a href="books.asp?pageno=1" class="text">本店图书</a></strong></div></td>
  </tr>
  <tr> 
    <td height="32" background="../images/bg2.gif"><div align="center" class="text"><strong>订单查询</strong></div></td>
  </tr>
  <tr> 
    <td height="32" background="../images/bg2.gif"><div align="center" class="text"><strong>友情链接</strong></div></td>
  </tr>
  <tr> 
    <td height="16" background="../images/bg2.gif"><div align="center"><a href="../index.asp"><img src="../images/agree4.gif" width="100" height="32" border="0"></a></div></td>
  </tr>
  <tr> 
    <td height="8" background="../images/bg2.gif">&nbsp;</td>
  </tr>
  <tr>
    <td height="8" background="../images/bg2.gif">&nbsp;</td>
  </tr>
  <tr>
    <td height="16" background="../images/bg2.gif">&nbsp;</td>
  </tr>
</table>
<!--#include file="../include/foot.asp"-->
<% end if
    rs.close
	set conn=nothing  %>