📄 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">QQ号码:</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
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -