gusucode.com > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外 > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外文翻译)\音乐网站设计\BBS\checkusersy.asp

    <% Response.Buffer=True %>
<!--#include file="dbconn.inc"--> 

<% 
   name=trim(request("name"))
   passwd=request("passwd")
   yxq=request("yxq")
   set rs=server.createobject("adodb.recordset")
   sql="select * from user_table where username='"&name&"' and passwd='"&passwd&"'"
   rs.open sql,conn,3,3
   if rs.bof or rs.eof then
   response.write"<SCRIPT language=JavaScript>alert('错误的用户名或密码,请重新输入!');"
   response.write"javascript:history.go(-1)</SCRIPT>"
   else
   rs("lastlogindate")=now()
   rs.update
   response.cookies("username")=rs("username")
    if yxq="1" then
       response.cookies("username").expires=date()+1
     else  
	   if yxq="2" then
	         response.cookies("username").expires=date()+7
	       else
		    response.cookies("username").expires=date()+30
		 end if
	 end if    
		   
             response.Redirect "index.asp"
	        
   end if 
   
  %>