asp登入代碼

沒事寫了一個簡單的使用者登入代碼,也貼出來吧

<!--#include file="inc/cn.asp" -->
<!--#include file="inc/function.asp" -->
<%
 myname =Html_encode(Request.Form("myname"))
 mypass =Html_encode(Request.Form("mypass"))
 
 If myname="" or mypass="" Then
  Response.Write("<script>alert('使用者名稱密碼不可為空！');history.back();</script>")
 Elseif len(myanme)>15 or len(mypass)>15 Then
  Response.Write("<script>alert('使用者名稱密碼長度1-15 位');history.back();</script>")
 Else
  Sql="select * from stu_user where user_id='"&myname&"' and user_pwd='"&mypass&"'"
  Call Db_connect()
  Set Rs=Conn.execute(Sql)
  If Not Rs.eof Then
   Session("Uid")=Rs("user_id")
   Session("Udj")=Rs("user_dj")
   Session("Stuname")=Rs("User_name")
   Response.Redirect("iframe.asp")
  
  Else
   Response.Write("<script>alert('使用者名稱密碼不正確！');history.back();</script>")
  End if
 End If
 
%>