登陆页面

(login.asp)

<% @LANGUAGE = " VBSCRIPT "  CODEPAGE = " 936 " %>
<%
Response.Buffer  =  True 
Response.Expires  =   - 1
Response.ExpiresAbsolute  =  Now()  -   1  
Response.Expires  =   0  
Response.CacheControl  =   " no-cache "  
Function GetCode()
    Dim TestObj
    On Error Resume Next
    Set TestObj  =  Server.CreateObject( " Adodb.Stream " )
    Set TestObj  =  Nothing
    If Err Then
        Dim TempNum
        Randomize timer
        TempNum  =  cint( 8999 * Rnd + 1000 )
        session( " RndCode " )  =  TempNum
        GetCode  =  session( " RndCode " )        
    Else
        GetCode  =   " <img src= "" inc/GetCode.asp "" > "         
    End If
End Function
  %>

< html >
< head >
< meta http - equiv = " Content-Type "  content = " text/html; charset=gb2312 " >
< title > 网站管理员登录 </ title >
< link href = " bmp/admin_login.css "  rel = " stylesheet "  type = " text/css " >
</ head >

< body topmargin = " 50 " >
< TABLE cellSpacing = 0  cellPadding = 0  width = 550  align = center border = 0 >
   < TR bgColor = #2b4ed6 >  
      
     < TD width = 30  height = 10 >< IMG height = 30  
      src = " bmp/btm-left1.gif "  width = 30 ></ TD >
      
     < TD align = " left "  valign = " bottom " > 深圳市 ** 网站管理系统  </ TD >
      
     < TD width = 30 >< IMG height = 30  
      src = " bmp/btm-right1.gif "  
width = 30 ></ TD >
     </ TR >
     < TR bgColor = #2b4ed6 >  
      
     < TD width = 30  height = " 263 " >& nbsp; </ TD >
      
     < TD background = " bmp/icon-use.gif " >
< table width = " 300 "  border = " 0 "  align = " right "  cellpadding = " 6 "  cellspacing = " 5 " >
         < form name = " form1 "  method = " post "  action = " sys/loginn.asp " >
           < tr >  
             < td colspan = " 2 " >< strong > 系统管理员登录··· </ strong ></ td >
           </ tr >
           < tr >  
             < td width = " 74 "  align = " right " > 用户名称 < strong >< span  class = " Glow " >< font color = " #FFFFFF " > ： </ font ></ span ></ strong ></ td >
             < td >< input name = " u "   type = " text "   id = " u "  style = " width:160px;border-style:solid;border-width:1;padding-left:4;padding-right:4;padding-top:1;padding-bottom:1 "  onFocus = " this.select();  "  onmouseover = " this.style.background='#E1F4EE'; "  onmouseout = " this.style.background='#FFFFFF' "  maxlength = " 20 " ></ td >
           </ tr >
           < tr >  
             < td align = " right " > 用户密码 < strong >< span  class = " Glow " > ： </ span ></ strong ></ td >
             < td >< input name = " p "   type = " password "  id = " p "  style = " width:160px;border-style:solid;border-width:1;padding-left:4;padding-right:4;padding-top:1;padding-bottom:1 "  onFocus = " this.select();  "  onmouseover = " this.style.background='#E1F4EE'; "  onmouseout = " this.style.background='#FFFFFF' "  maxlength = " 20 " ></ td >
           </ tr >
           < tr >  
             < td align = " right " > 验 证 码： </ td >
             < td >   < input name = " r "  size = " 6 "  maxlength = " 4 "  style = " border-style:solid;border-width:1;padding-left:4;padding-right:4;padding-top:1;padding-bottom:1 "  onmouseover = " this.style.background='#E1F4EE'; "  onmouseout = " this.style.background='#FFFFFF' "  onFocus = " this.select();  " >  
               <%=  GetCode()  %></ td >
           </ tr >
           < tr align = " center " >  
             < td colspan = " 2 " >   < input   type = " submit "  name = " Submit2 "  value = "  确&nbsp;认  "  style = " font-size: 9pt; height: 19; width: 60; color: #000000; background-color: #E1F4EE; border: 1 solid #E1F4EE "  onMouseOver  = " this.style.backgroundColor='#ffffff' "  onMouseOut  = " this.style.backgroundColor='#E1F4EE' " >  
               & nbsp;  < input name = " reset2 "  type = " reset "   id = " reset2 "  value = "  清&nbsp;除  "  style = " font-size: 9pt; height: 19; width: 60; color: #000000; background-color: #E1F4EE; border: 1 solid #E1F4EE "  onMouseOver  = " this.style.backgroundColor='#ffffff' "  onMouseOut  = " this.style.backgroundColor='#E1F4EE' " >  
             </ td >
           </ tr >
         </ form >
       </ table >   </ TD >
       < TD width = 30 >& nbsp; </ TD >
     </ TR >
     < TR bgColor = #2b4ed6 >  
       < TD width = 30 >< IMG height = 30  
      src = " bmp/btm-left.gif "  width = 30 ></ TD >
      
     < TD align = " center "  valign = " top " > 深圳 *** 版权所有 </ TD >
       < TD width = 30 >< IMG height = 30  
      src = " bmp/btm-right.gif "  
width = 30 ></ TD >
     </ TR >
</ TABLE >
</ body >
</ html >

转自他人代码!
如有需要请联系:深圳全空间技术部