member_list.asp
来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 176 行
ASP
176 行
<!--#include file="../inc/conn.asp"-->
<%
'┌─ 风云ASP在线 ────────────────────────┐
'│ │
'│ 作者：赵振波. http://www.fyasp.com │
'│ │
'│ Q Q：176189168 │
'│ │
'│ Email：fy96@163.com │
'│ │
'│ 程序定做，系统开发，网站制作，提供高质量的网络产品、技术和服务！│
'│ │
'│ │
'└─────────────────── http://www.fyasp.com ──┘
%><%
If session("manager")="" Then
Response.Redirect("manage.asp")
Response.end
End If
%>
<%opendataconn%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>会员资料</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../ht.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#444444">
<table width="431" height="19" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="431"><form name="form1" method="post" action="member_modi_ok.asp" enctype="multipart/form-data">
<%
id=trim(request("id"))
set rs=server.createobject("adodb.recordset")
sql="select * from company where id="&id&" "
rs.open sql,conn,1,1
if not rs.eof then
%>
<TABLE width=417
height=363 border=0 align=center cellPadding=0 cellSpacing=1 bgcolor="#999999">
<TBODY>
<TR bgcolor="#535353">
<TD width="70" class="p12" height="25"><div align="center"><SPAN class=P9-13>用户名：</SPAN></div></TD>
<TD width="344" class="p12" height="25"><SPAN class=P9-13>
<input name="reg_username" type="text" id="reg_username3" value="<%=trim(rs("userid"))%>" size="35" readonly>
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center"><SPAN class=P9-13>密 码：</SPAN></div></TD>
<TD bgcolor="#535353" class="p12" height="25"><SPAN class=P9-13>
<input name="reg_password" type="text" id="reg_password4" value="<%=trim(rs("pwd"))%>" size="35" maxlength="40">
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25">公司名称：</TD>
<TD class="p12" height="25"><SPAN class=P9-13>
<input name="company" type="text" value="<%=trim(rs("company"))%>" size="35">
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center">问 题：</div></TD>
<TD class="p12" height="25"><SPAN class=P9-13>
<input name="question" type="text" value="<%=trim(rs("question"))%>" size="35">
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center">回 答：</div></TD>
<TD class="p12" height="25"><SPAN class=P9-13>
<input name="answer" type="text" value="<%=trim(rs("answer"))%>" size="35">
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center">手 机：</div></TD>
<TD class="p12" height="25"><SPAN class=P9-13>
<input name="mphone" type="text" value="<%=trim(rs("mphone"))%>" size="35" onKeyUp="this.value=this.value.replace(/\D/gi,'')">
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center">传 真：</div></TD>
<TD class="p12" height="25"><SPAN class=P9-13>
<input name="fax" type="text" value="<%=trim(rs("fax"))%>" size="35" onKeyUp="this.value=this.value.replace(/\D/gi,'')">
<font color="#FF6600">*</font> </SPAN></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center">联系人：</div></TD>
<TD class="p12" height="25"><font color="#006666"><SPAN class=P9-13>
<input name="name" type="text" id="ren3" value="<%=trim(rs("name"))%>" size="35" maxlength="40">
<font color="#FF6600">*</font> </SPAN></font></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center"><SPAN class=P9-13>联系电话：</SPAN></div></TD>
<TD class="p12" height="25"><FONT color=#006666><SPAN class=P9-13>
<input name="tel" type="text" id="tel3" value="<%=trim(rs("phone"))%>" size="35" onKeyUp="this.value=this.value.replace(/\D/gi,'')">
<font color="#FF6600">*</font> </SPAN></FONT></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center"><SPAN class=P9-13>电子邮箱：</SPAN></div></TD>
<TD class="p12" height="25"><FONT color=#006666><SPAN class=P9-13>
<input name="email" type="text" id="email3" value="<%=trim(rs("email"))%>" size="35" maxlength="40">
</SPAN></FONT></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center"><SPAN class=P9-13>联系地址： </SPAN></div></TD>
<TD class="p12" height="25"><FONT color=#006666><SPAN class=P9-13>
<input name="address" type="text" id="address3" value="<%=trim(rs("address"))%>" size="40" maxlength="50">
</SPAN></FONT></TD>
</TR>
<TR bgcolor="#535353">
<TD class="p12" height="25"><div align="center"><SPAN class=P9-13>个人主页：</SPAN></div></TD>
<TD class="p12" height="25"><FONT color=#006666><SPAN class=P9-13>
<input name="url" type="text" id="http3" value="<%=trim(rs("url"))%>" size="40" maxlength="50">
</SPAN></FONT></TD>
</TR>
<TR bgcolor="#535353">
<TD height="25"><div align="center">公司简介：</div></TD>
<TD height="25"> <div align="center">
<textarea name="info" cols="40" rows="5"><%=trim(rs("info"))%></textarea>
</div></TD>
</TR>
<TR bgcolor="#535353">
<TD height="25">会员类型：</TD>
<TD height="25"><%strlx=rs("reg_type")%><%if strlx=1 then%>中介<%else%>个人<%end if%></TD>
</TR><%if strlx=1 then%>
<TR bgcolor="#535353">
<TD height="25">中介状态：</TD>
<TD height="25"><%zjzt=rs("zj")%><%if zjzt=1 then%><font color="#0000FF">已审</font><%end if%><%if zjzt=-1 then%><font color="#FFFF00">申请中</font><%end if%><%if zjzt=0 then%><font color="#FF0000">未审</font><%end if%></TD>
</TR>
<TR bgcolor="#535353">
<TD height="25">中介LOGO：</TD>
<TD height="25"><%
oldpic=rs("zjlogo")
if oldpic<>"" then%><input name="oldpic" type="hidden" value="<%=oldpic%>"><img border="0" src="../uppic/zjlogo/<%=oldpic%>"><br><%end if%><input name="pic" type="file"> <br>
无图请留空,建议图片尺寸100*60,文件不大于<font color="#FF0000"><%=1048576/1024%></font>K
</TD>
</TR>
<%end if%>
<TR bgcolor="#535353">
<TD height="25"><div align="center">排行位置：</div></TD>
<TD height="25"><FONT color=#006666><SPAN class=P9-13>
<input name="place" type="text" id="place" value="<%=trim(rs("place"))%>" size="5" maxlength="5" onKeyUp="this.value=this.value.replace(/\D/gi,'')">
<font color="#FFCC00">（只能填写数字且不能为空，值越大，排在越前面）</font></SPAN></FONT></TD>
</TR>
<TR bgcolor="#535353">
<TD rowspan="3" height="25">
<p align="center">操作：</TD>
<TD height="25"><input name="ismember" type="checkbox" id="ismember" value="1" <%if trim(rs("ismember"))="1" then response.write "checked" end if%>>
批准成为会员
<input name="id" type="hidden" id="id" value="<%=trim(rs("id"))%>">
</TD>
</TR><%if strlx=1 then%>
<TR bgcolor="#535353">
<TD><input name="zj" type="checkbox" id="zj" value="1" <%if trim(rs("zj"))="1" then response.write "checked" end if%>>
批准加入中介联盟</TD>
</TR><TR bgcolor="#535353">
<TD><input name="indexzj" type="checkbox" id="indexzj" value="1" <%if trim(rs("indexzj"))="1" then response.write "checked" end if%>>
设为首页推荐中介联盟</TD>
</TR><%end if%>
</TBODY>
</TABLE>
<div align="center">
<%
end if
%>
<br>
<input name="Submit" type="submit" id="Submit2" value="修改">
</div>
</form>
<div align="center"></div></td>
</tr>
</table>
<br>
</body>
</html>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?