index_login.asp

asp的网上卖东西的..看看还可以的吧

<TABLE cellSpacing=0 cellPadding=0 width=185 border=0>
        <TBODY>
          <TR>
            <TD><IMG height=7 src="images/2_login_h.gif" 
                        width=185></TD>
          </TR>
          <TR>
            <TD style="PADDING-RIGHT: 8px; PADDING-LEFT: 8px" 
                      background=images/2_login_bg.gif>
              <TABLE cellSpacing=0 cellPadding=0 width="100%" 
border=0>
                <TBODY>
				<%if request.Cookies("bjx")("username")=""  then%>
<form name="userlogin" method="post" action="checkuserlogin.asp">
                  <TR>
                    <TD>
                      <TABLE cellSpacing=0 cellPadding=0 width="100%" 
                              border=0>
                        <TBODY>
                          <TR>
                            <TD>
                              <TABLE cellSpacing=0 cellPadding=0 width="100%" 
                                border=0>
                                <TBODY>
                                  <TR>
                                    <TD align=middle width="57%" height=22><INPUT 
                                class=wenbenkuang 
                                
                                style="WIDTH: 90px" 
                                name=username></TD>
                                    <TD align=middle width="43%" rowSpan=2><INPUT name="image" 
                                type=image 
                                src="images/2_login_btn.gif" width=59 height=31 
                                border=0></TD>
                                  </TR>
                                  <TR>
                                    <TD align=middle height=22><INPUT class=wenbenkuang 
                                style="WIDTH: 90px" 
                                
                                type=password 
                                name=userpassword></TD>
                                  </TR>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                          <TR>
                            <TD height=6></TD>
                          </TR>
                          <TR>
                            <TD>
                              <TABLE class=basic_small cellSpacing=0 
                                cellPadding=0 width=160 border=0>
                                <TBODY>
                                  <TR>
                                    <TD width="77"  align=middle 
                                ><img 
                                src="images/2_bullet_001.gif"><a href="reg.asp">用户注册</a></TD>
                                    <TD align=middle width=83><img 
                                src="images/2_bullet_001.gif"><a href="getpwd.asp">忘记密码</a></TD>
                                  </TR>
                                </TBODY>
                            </TABLE></TD>
                          </TR>
                        </TBODY>
                    </TABLE>
					</TD>
                  </TR>
			    </form>
                  <%else%>
				  <TR>
                    <TD><%
set rs=server.createobject("adodb.recordset")
rs.open "select jifen,yucun,reglx,vipdate from Dv_User where username='"&request.Cookies("bjx")("username")&"'",conn,1,3
if rs("vipdate")<>"" then 
'看是不是过期VIP
if rs("vipdate")<date and rs("reglx")=2 then
rs("reglx")=1
rs.update
end if
end if
response.Cookies("bjx")("yucun")=rs("yucun")
response.Cookies("bjx")("jifen")=rs("jifen")
response.Cookies("bjx")("reglx=")=rs("reglx")
rs.close
set rs=nothing
if request.Cookies("bjx")("reglx")=2 then
response.write ""&request.Cookies("bjx")("username")&" 贵宾您好<br>您目前有"&request.Cookies("bjx")("jifen")&"积分<br>预存款"&request.Cookies("bjx")("yucun")&"元 "
else
response.write ""&request.Cookies("bjx")("username")&" 您好<br>您目前有"&request.Cookies("bjx")("jifen")&"积分<br>预存款"&request.Cookies("bjx")("yucun")&"元 "
end if
response.write "<br><a href=user.asp><font color=red>进入会员中心</font></a>"
response.write "<br><a href=logout.asp>注销退出</a>"
%></TD>
                  </TR>
				  <%end if%>
                  <TR>
                    <TD height=4></TD>
                  </TR>
                  <TR>
                    <TD bgColor=#f3f3f3 height=1></TD>
                  </TR>
                  <TR>
                    <TD bgColor=#e4e4e4 height=1></TD>
                  </TR>
                  <TR>
                    <TD height=4></TD>
                  </TR>		                 
            </TABLE>
			
			
			
			</TD>
          </TR>
          <TR>
            <TD><IMG height=7 src="images/2_login_b.gif" 
                        width=185></TD>
          </TR>
        </TBODY>
      </form>
    </TABLE>