📄 modify.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file="../inc/ubbcode.asp"-->
<!--#include file="top.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
If Cint(AdminGroup(4))<>1 then
Response.Redirect("Default.asp")
Response.End()
End If
%>
<%
dim userid,username,mail,tel,realname,password,num,lastlogintime,from,city,add,content,job,State,qq,ZipCode,sfz,ans,qus,autoreg,dj,huser
dim id,rs
id=request("id")
if id<>"" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from users where id="&id&"",conn,1,1
if rs.bof and rs.eof then
response.Write("<script>alert('用户不存在或已被删除！');history.back()</script>")
response.End()
end if
userid=rs("userid")
password=rs("password")
username=rs("username")
city=rs("city")
job=rs("job")
State=rs("State")
tel=rs("tel")
qq=rs("qq")
mail=rs("mail")
add=rs("add")
zipcode=rs("zipcode")
sfz=rs("sfz")
dj=rs("dj")
autoreg=rs("autoreg")
content=rs("content")
num=rs("num")
lastlogintime=rs("lastlogintime")
ans=rs("ans")
qus=rs("qus")
huser=rs("huser")
rs.close
set rs=nothing
end if
%>
<table border="0" align="center" cellpadding="3" cellspacing="1" class="tablecolor">
<form name="form1" method="post" action="saveuser.asp">
<tr>
<td height="25" colspan="2" align="center" class="banner"><%if request("id")<>"" then%>修改资料<%else%>添加会员<%end if%>(带*项必填 )</td>
</tr>
<tr>
<td colspan="2" align="center" class="tablebody"><table width="84%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#ebebeb">
<tr bgcolor="#FFFFFF">
<td width="19%"> 用户名</td>
<td width="81%"><input name="UserId" type="text" id="username" value="<%=UserId%>" maxlength="15">
* </td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 密码</td>
<td><input name="password" type="text" id="pwd" value="<%=password%>" maxlength="20">
* (至少6位)</td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 密码提示问题</td>
<td><input name="ans" type="text" id="ans" value="<%=ans%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 密码提示答案</td>
<td><input name="qus" type="text" id="qus" value="<%=qus%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 联系人</td>
<td><input name="UserName" type="text" id="UserName" value="<%=UserName%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 联系电话</td>
<td><input name="Tel" type="text" id="Tel" value="<%=Tel%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 手机</td>
<td><input name="sfz" type="text" id="sfz" value="<%=sfz%>" maxlength="25"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> E-Mail</td>
<td><input name="Mail" type="text" id="Mail" value="<%=Mail%>" maxlength="50"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 联系QQ</td>
<td><input name="QQ" type="text" id="QQ" value="<%=qq%>" maxlength="11"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 单位</td>
<td><input name="job" type="text" id="job" value="<%=job%>" maxlength="11">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 省份</td>
<td><select name="State" id="State">
<option selected value="<%=State%>"><%=State%>
<option value="">--
<option value="北京">北京
<option value="天津">天津
<option value="上海">上海
<option value="重庆">重庆
<option value="河北">河北
<option value="山西">山西
<option value="内蒙古">内蒙古
<option value="辽宁">辽宁
<option value="吉林">吉林
<option value="黑龙江">黑龙江
<option value="河南">河南
<option value="新疆">新疆
<option value="江苏">江苏
<option value="浙江">浙江
<option value="山东">山东
<option value="安徽">安徽
<option value="江西">江西
<option value="湖北">湖北
<option value="四川">四川
<option value="云南">云南
<option value="陕西">陕西
<option value="甘肃">甘肃
<option value="青海">青海
<option value="宁夏">宁夏
<option value="西藏">西藏
<option value="广东">广东
<option value="广西">广西
<option value="福建">福建
<option value="湖南">湖南
<option value="海南">海南
<option value="贵州">贵州
<option value="香港">香港
<option value="澳门">澳门
<option value="台湾">台湾
</select>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 城市</td>
<td><input name="city" type="text" id="city" value="<%=city%>" maxlength="20"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 联系地址</td>
<td><input name="Add" type="text" id="Add" value="<%=add%>" maxlength="255"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> 邮政编码</td>
<td><input name="ZipCode" type="text" id="ZipCode" value="<%=ZipCode%>" size="10" maxlength="10"></td>
</tr>
<tr class="tablecolor">
<td class="tablebody"> 会员类型:</td>
<td class="tablebody"><input name="dj" type="text" id="dj" value="<%=dj%>"></td>
</tr>
<tr class="tablecolor">
<td class="tablebody"> 高级会员:</td>
<td class="tablebody"><input name="huser" type="checkbox" id="huser" value="1" <%if huser=1 then%>checked<%end if%>></td>
</tr>
<%if autoreg="1" then%>
<tr class="tablecolor">
<td class="tablebody"> 回复信息:</td>
<td class="tablebody"><textarea name="content" cols="60" rows="5" id="content"><%=content%></textarea></td>
</tr>
<%end if%>
<tr class="tablecolor">
<td class="tablebody"> 是否管理员添加:</td>
<td class="tablebody"><%if autoreg="" then%>默认<%else%><%if autoreg="1" then%><font color="#FF0000">是</font><%else%>否<%end if%><%end if%></td>
</tr>
<tr class="tablecolor">
<td class="tablebody"> 登陆次数:</td>
<td class="tablebody"><%=num%></td>
</tr>
<tr class="tablecolor">
<td class="tablebody"> 上次登陆时间:</td>
<td class="tablebody"><%=lastlogintime%></td>
</tr>
</table></td>
</tr>
<tr>
<td width="30%" align="center" class="tablebody"> </td>
<td class="tablebody"> <input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置"> <input type="hidden" name="id" value="<%=id%>"></td></tr>
</form>
</table>
<%closeconn%>
<!--#include file="end.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -