📄 edit.asp
字号:
<%@ language=vbscript %>
<!--#include file="conn.inc"-->
<!--#include file="config.asp"-->
<%
if session("username")="" then
response.redirect "log.asp"
else
lname=session("username")
passw=session("passw")
sql = "select * from mis where username='"&lname&"' and passw1='"&passw&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
if rs.eof then
response.write"<script language='javascript'>" & VbCRlf
response.write"alert('对不起,用户名或密码错误!');" & VbCRlf
response.write"history.go(-1);" & VbCRlf
response.write"</script>"
response.end
end if
name=rs("name")
sex=rs("sex")
phone=rs("phone")
addr=rs("addr")
oicq=rs("oicq")
id=rs("id")
username=rs("username")
waihao=rs("waihao")
web=rs("web")
email=rs("email")
work=rs("work")
self=rs("self")
%>
<html>
<head>
<title>修改<%=name%>的通讯</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="config.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" background="bg01.gif">
<table width="75%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<div align="center"><font color="#FF0000"><%=name%>请在框内修改您的资料然后提交</font></div>
</td>
</tr>
</table>
<form name="form1" action="editsave.asp?id=<%=id%>" method="post">
<table width="50%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="16%" height="8">姓名:</td>
<td width="84%" height="8">
<input type="text" name="name" value="<%=name%>">
* </td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">外号:</td>
<td width="84%">
<input type="text" name="waihao" value="<%=waihao%>">
</td>
</tr>
<tr>
<td width="16%" height="9"> </td>
<td width="84%" height="9"> </td>
</tr>
<tr>
<td width="16%">性别:</td>
<td width="84%">
<input type="text" name="sex" value="<%=sex%>">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">电话: </td>
<td width="84%">
<input type="text" name="phone" value="<%=phone%>">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">oicq: </td>
<td width="84%">
<input type="text" name="oicq" value="<%=oicq%>">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">电子邮件:</td>
<td width="84%">
<input type="text" name="email" value="<%=email%>">
* </td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">个人主页:</td>
<td width="84%">
<input type="text" name="web" value="<%=web%>">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">联系地址:</td>
<td width="84%">
<input type="text" name="addr" size="40" value="<%=addr%>">
* </td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">工作单位:</td>
<td width="84%">
<input type="text" name="work" size="40" value="<%=work%>">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">呢称:</td>
<td width="84%">
<input type="text" name="nicname" value="<%=username%>">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">个人介绍:</td>
<td width="84%">
<textarea name="self" rows="3" cols="40"><%=self%></textarea>
*不超过120个字符! </td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<%
set rs1=server.CreateObject("adodb.recordset")
sql1="SELECT * FROM imgdata WHERE user ='"&lname&"'"
rs1.open sql1,conn,3,3
if rs1.eof and rs1.bof then
%>
<tr><td>关于相片:</td>
<td>您还没有传相片,您可以在传完相片后来此修改!<input type="hidden" name="topic" value="无">
<input type="hidden" name="topic" value="无">
</td>
</tr>
<%else
topic=rs1("topic")
js=rs1("js")
%>
<tr>
<td width="16%">相片主题:</td>
<td width="84%">
<input type="text" name="topic">
不超过20字符 </td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"> </td>
</tr>
<tr>
<td width="16%">相片简介:</td>
<td width="84%">
<textarea name="js" cols="50" rows="4"></textarea>不超过200字符
</td>
</tr>
<%end if%>
<tr>
<td width="16%"> </td>
<td width="84%">
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重写">
</td>
</tr>
<tr>
<td width="16%"> </td>
<td width="84%"><a href="uploadimg.asp" target="_blank">重传相片</a></td>
</tr>
</table>
</form>
<br>
<table width="75%" border="1" cellspacing="0" cellpadding="0" align="center" bordercolor="#999999" bordercolorlight="#999999" bordercolordark="#f7f7f7">
<tr>
<td height="12" bgcolor="#CCCCCC">
<div align="center"><%=titlemark%>通讯录管理中心</div>
</td>
</tr>
<tr>
<td>
<div align="center"><a href="index.asp">查看全部</a>---<a href="guestbook/index.asp" target="_blank">留言板</a>---<a href="ad_log.asp">超级管理员入口</a></div>
</td>
</tr>
</table>
</body>
</html>
<%
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -