📄 update_form.asp
字号:
<!--#INCLUDE FILE="odbc_connection.asp"-->
<html>
<head>
<title>修改成员</title>
<link rel="stylesheet" href="all.css">
</head>
<body>
<h2 align="center">请修改您的资料：</h2>
<%
'根据change.asp存放到Session里的id值，显示相应成员的信息
strSql ="Select * From users where id=" & Session("id")
Set rs=db.Execute(strSql)
%>
<center>
<form method="post" action="update.asp">
<table border="0" width="80%" >
<tr>
<td>姓名：</td><td><input type="text" name="name" size="20"
value="<%=rs("name")%>">**(带**的内容必须输入)</td>
</tr><tr>
<tr>
<td>密码：</td><td><input type="password" name="password" size="20"
value="<%=rs("password")%>">**</td>
</tr><tr>
<td>电话：</td><td><input type="text" name="tel" size="20"
value="<%=rs("tel")%>"></td>
</tr><tr>
<td>手机：</td><td><input type="text" name="handtel" size="20"
value="<%=rs("handtel")%>"></td>
</tr><tr>
<td>email：</td><td><input type="text" name="email" size="50"
value="<%=rs("email")%>"></td>
</tr><tr>
<td>主页：</td><td><input type="text" name="web" size="50"
value="<%=rs("web")%>">(别忘了http://)</td>
</tr></tr>
<td>住址：</td><td><input type="text" name="home" size="50"
value="<%=rs("home")%>"></td>
</tr><tr>
<td>简介：</td><td><textarea name="intro" rows="4" cols="50"
wrap="soft"><%=rs("intro")%></textarea></td>
</tr><tr>
<td>朋友类型：</td><td>
<select name="ftype">
<% if rs("ftype")="内部人员" then%>
<option value="内部人员" selected>内部人员</option>
<%else%>
<option value="内部人员">内部人员</option>
<%end if%>
<% if rs("ftype")="来客" then%>
<option value="来客" selected>来客</option>
<%else%>
<option value="来客">来客</option>
<%end if%>
<% if rs("ftype")="其它朋友" then%>
<option value="其它朋友" selected>其他朋友</option>
<%else%>
<option value="其它朋友">其他朋友</option>
<%end if%>
</select>
</td>
</tr>
<table>
<p align="center"><input type="submit" value=" 确 定 ">  <input type="reset" value=" 重 填 ">
</form>
</center>
<%
rs.Close
Set rs=nothing
db.Close
Set db=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -