reg_info.asp

麦布会员管理程序是一个简易的会员注册及管理系统

<link href="style.css" rel="stylesheet" type="text/css">
<!--#include file="conn.asp"-->
<%
loginname = request("id")
set rs = server.CreateObject("adodb.recordset")
sql = "Select * from MB_Member where M_Name='" & loginname & "'"
rs.open Sql,my_conn,1,1
%><p align="center"><br>
<br>
　</p>
          <div align="center">
            <center>
            <table border="1" cellpadding="2" cellspacing="0" style="border-collapse: collapse" bordercolor="#ACACAC" width="33%" id="AutoNumber5">
              <tr>
                <td width="100%" colspan="2" bgcolor="#BCBCBC">
                <p align="center"><%=loginname%>的资料</td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">用户属性：</td>
                <td width="64%" bgcolor="#DEDEDE"><%=RS("M_vip")%>会员</td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">登陆次数：</td>
                <td width="64%" bgcolor="#DEDEDE"><%=RS("M_Time")%>次</td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">注册时间：</td>
                <td width="64%" bgcolor="#DEDEDE"><%=RS("M_Date")%>　</td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">客户性别：</td>
                <td width="64%" bgcolor="#DEDEDE"><%=RS("M_Sex")%>　</td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">所在省市：</td>
                <td width="64%" bgcolor="#DEDEDE"><%=RS("M_State")%>-<%=RS("M_City")%>　</td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">ＱＱ号码：</td>
                <td width="64%" bgcolor="#DEDEDE"><%if session("vip") ="VIP" then%><%=RS("M_QQ")%><%else%>普通会员无权查看<%end if%></td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">联系电话：</td>
                <td width="64%" bgcolor="#DEDEDE"><%if session("vip") ="VIP" then%><%=RS("M_phone")%><%else%>普通会员无权查看<%end if%></td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">身份证号：</td>
                <td width="64%" bgcolor="#DEDEDE"><%if session("vip") ="VIP" then%><%=RS("M_card")%><%else%>普通会员无权查看<%end if%></td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">网站地址：</td>
                <td width="64%" bgcolor="#DEDEDE"><%if session("vip") ="VIP" then%><%=RS("M_Web")%><%else%>普通会员无权查看<%end if%></td>
              </tr>
              <tr>
                <td width="36%" bgcolor="#DEDEDE">电子邮箱：</td>
                <td width="64%" bgcolor="#DEDEDE"><%if session("vip") ="VIP" then%><%=RS("M_Email")%><%else%>普通会员无权查看<%end if%></td>
              </tr>
              <tr>
                <td width="100%" bgcolor="#ACACAC" colspan="2">
                <p align="center">
                <input type="button" value="发 信" onClick="parent.self.location = 'mess_send.asp?name=<%=rs("M_name")%>';" style="color: #FFFFFF; border: 1px solid #DEDEDE; background-color: #ACACAC">
                <input type="button" value="返 回" onClick="parent.self.location = 'reg_list.asp';" style="color: #FFFFFF; border: 1px solid #DEDEDE; background-color: #ACACAC"></td>
                </tr>
            </table>
            </center>
          </div>
          <p align="center"><a target="_blank" href="http://www.mybu.net/soft.asp">
<font color="#FF0000">欢迎到麦布源码超市购买专业版[ www.mybu.net ]，麦布会员管理 Ver 1.1 专业版售价 200 
元/套！</font></a> </p>

          <%
my_conn.close
set my_conn = nothing
set rs = nothing
%>