📄 modifychildren.asp
字号:
<% @language=vbscript%>
<!--#include file="conn.asp"-->
<%
log_name=Request.Cookies("name") '读cookie
if log_name="" then
error_str="你还没登录！"
conn.close
Response.write error_catchh&error_str&error_catcht
Response.End
end if
%>
<%
if Request.Form("Submit")<>""then
id=Request("id")
c_name=trim(Request.Form("c_name"))
c_sex=Request.Form("c_sex")
c_born=trim(Request.Form("c_born"))
c_nation=trim(Request.Form("c_nation"))
c_home=trim(Request.Form("c_home"))
c_level=trim(Request.Form("c_level"))
c_work=trim(Request.Form("c_work"))
c_id=trim(Request.Form("c_id"))
c_link=trim(Request.Form("c_link"))
c_unit=trim(Request.Form("c_unit"))
str="update children set c_name='"&c_name&"',c_sex='"&c_sex&"',c_born='"&c_born&"',c_nation='"&c_nation&"',c_home='"&c_home&"',c_level='"&c_level&"',c_work='"&c_work&"',c_id='"&c_id&"',c_link='"&c_link&"',c_unit='"&c_unit&"'"&_
"where id="&id
conn.execute str
Response.write "<font color=red>成功！</font><br>"
end if
masid=Request("id")
set rs=Server.CreateObject("ADODB.recordset")
str="select * from children where c_masid="&masid
rs.PageSize=1 '设定rs分页参数,最好在此处设定
rs.OPEN str,Conn,1,1 '必须用此方式打开记录
if not rs.EOF then
'////////////////////////////////////////////////////////////////////////////////////////////////////
page=trim(Request("page")) '接受分页参数page，
if not isnumeric(page) then page=1 end if 'page不为数字时的处理
if page="" then page=1 end if 'page为空时的处理
page=cint(page) '转化
if page<1 then page=1 end if 'page为<1时的处理
if page>rs.PageCount then page=rs.PageCount end if 'page为>总分页数的处理
rs.AbsolutePage=page
id=rs.Fields("c_masid")
%>
<html>
<head>
<title>户口管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<p> </p>
<hr width="90%">
<div align="center">更改此户主子女信息<br>
</div>
<hr width="90%">
<div align="center">共找到 <%=rs.RecordCount%> 条符合条件的记录</div>
<br>
<%
i=0
do while not rs.eof
i=i+1
if i="2" then exit do
%>
<form name="form1" method="post" action="modifychildren.asp?id=<%=masid%>">
<table width="720" border="1" height="725" align="center">
<tr>
<td width="229" height="54">
<div align="right">姓名：</div>
</td>
<td width="475" height="54">
<div align="center">
<input type="text" name="c_name" maxlength="6" value=<%=rs.fields("c_name")%>>
</div>
</td>
</tr>
<tr>
<td width="229" height="52">
<div align="right">性别：</div>
</td>
<%
select case rs.fields("c_sex")
case "男"
a="checked"
case "女"
b="checked"
end select
%>
<td width="475" height="52">
<div align="center">男：
<input type="radio" name="c_sex" value="男" <%=a%>>
女：
<input type="radio" name="c_sex" value="女" <%=b%>>
</div>
</td>
</tr>
<tr>
<td width="229" height="51">
<div align="right">出生年月：</div>
</td>
<td width="475" height="51">
<div align="center">
<input type="text" name="c_born" maxlength="20" value=<%=rs.fields("c_born")%>>
</div>
</td>
</tr>
<tr>
<td width="229" height="55">
<div align="right">民族：</div>
</td>
<td width="475" height="55">
<div align="center">
<input type="text" name="c_nation" maxlength="10" value=<%=rs.fields("c_nation")%>>
</div>
</td>
</tr>
<tr>
<td width="229" height="71">
<div align="right">籍贯：</div>
</td>
<td width="475" height="71">
<div align="center">
<textarea name="c_home" ><%=rs.fields("c_home")%></textarea>
</div>
</td>
</tr>
<tr>
<td width="229" height="55">
<div align="right">文化程度：</div>
</td>
<td width="475" height="55">
<div align="center">
<%
select case rs.fields("c_level")
case "大学以上"
a="checked"
case "专科"
b="checked"
case "高中"
c="checked"
case "初中"
d="checked"
case "小学"
e="checked"
case "文盲"
f="checked"
end select
%>
<select name="c_level">
<option value="大学以上" <%=a%>>大学以上</option>
<option value="专科" <%=b%>>专科</option>
<option value="高中" <%=c%>>高中</option>
<option value="初中" <%=d%>>初中</option>
<option value="小学" <%=e%>>小学</option>
<option value="文盲" <%=f%>>文盲</option>
</select>
</div>
</td>
</tr>
<tr>
<td width="229" height="55">
<div align="right">职业：</div>
</td>
<td width="475" height="55">
<div align="center">
<input type="text" name="c_work" maxlength="255" value=<%=rs.fields("c_work")%>>
</div>
</td>
</tr>
<tr>
<td width="229" height="56">
<div align="right">身份证号：</div>
</td>
<td width="475" height="56">
<div align="center">
<input type="text" name="c_id" maxlength="25" value=<%=rs.fields("c_id")%>>
</div>
</td>
</tr>
<tr>
<td width="229" height="62">
<div align="right">联系方式：</div>
</td>
<td width="475" height="62">
<div align="center">
<textarea name="c_link" ><%=rs.fields("c_link")%></textarea>
</div>
</td>
</tr>
<tr>
<td width="229" height="72">
<div align="right">工作单位：</div>
</td>
<td width="475" height="72">
<div align="center">
<textarea name="c_unit"><%=rs.fields("c_unit")%></textarea>
</div>
</td>
</tr>
<tr>
<td width="229">
<div align="right">
<input type="submit" name="Submit" value="更改">
</div>
</td>
<td width="475">
<div align="center">
<input type="reset" name="Submit2" value="重置">
</div>
</td>
</tr>
</table>
</form>
<div align="center"> <a href=delchildren.asp?id=<%=rs.fields("id")%>> 删除此记录</a> </div>
<%
rs.movenext
loop
%>
<form name="form1" method="post" action="modifychildren.asp?id=<%=masid%>">
<p align="center">共<font color=#000000> <%=rs.RecordCount%> </font>条 | 分<font color=#000000> <%=rs.PageCount%> </font>页 | 第<font color=#000000> <%=page%> </font>个 |
<a href=modifychildren.asp?page=<%=page-1%>&id=<%=masid%>>上一个</a> | <a href=modifychildren.asp?page=<%=page+1%>&id=<%=masid%>>下一个</a> |
<a href=modifychildren.asp?page=1&id=<%=masid%>>首个</a> | <a href=modifychildren.asp?page=<%=rs.PageCount%>&id=<%=masid%>>末个</a> | 跳到:
第
<input type="text" name="page" maxlength=3 style="width:20;background-color:rgb();">
个
<input type="submit" name="Submit1" value="go" style="width:20;background-color:rgb(100,100,245)">
</form>
<p> </p>
<p> </p>
<%else%>
暂无！
<% end if %>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -