load.asp

校园二手交易系统,具有完备的后台操作以及应用功能!

<%sub load1()%><form action="chkuser_login.asp" method="post" name="input" id="input" onsubmit=return(CheckInput())>
<table width="100%" border="0">
<tr> 
<td>用户名：</td>
                              <td><input name="username" type="text" id="username" size="14" maxlength="20"></td>
                            </tr>
                            <tr> 
                              <td>密&nbsp; 码：</td>
                              <td><input name="password" type="password" id="password" size="14" maxlength="20"></td>
                            </tr>
   <tr> 
                              <td>验证码：</td>
                              <td><input name="getcode" type="text" id="getcode" size="4" style="ime-mode:disabled">
            &nbsp;<img src="inc/Code.asp"></td>
                            </tr>
                            <tr align="center"> 
                              <td colspan="2"> <input type="submit" class=input3 name="Submit" value="登 陆"> 
                              <input class=input3 onclick="window.location='UserReg.asp'" type=reset value="注 册" name=Submit2>
<input class=input3 onclick="window.location='GetPws.asp'" type=button value="忘 密" name=Submit3></td>
                            </tr>
                        
                          </table>
                        </form>
<%end sub%>
<%sub load2()%>

 <table width="100%" border="0" align=center>  <%
		  dim strsql,rs
		  strsql="select * from [dduser] where user_id="&cint(session("user_id"))
		  set rs=conn.execute(strsql)
		  %><tr><td align=center> <table width="80%" border="0">
                     
                          <tr> 
                            <td>欢迎：<font color="#FF0000"><%=rs("user_name")%></font></td>
                          </tr> 
<tr> 
                            <td>积分：<font color="#FF0000"><%=rs("mark")%></font></td>
                          </tr> 
  <tr> 
                            <td><script src="myMessage.asp"></script></td>
                          </tr>

                          <tr> 
                            <td ><a href="user.asp">控制面板</a> <a href="user_logout.asp">退出登陆</a></td>
                          </tr>
                        
                        </table></td>
                          </tr>
                        </table>
<%end sub%>