自考“计算机及应用”专业论文参考范文（6） -自考串讲笔记

　　2、信息查询

　　<%

　　dim strsql，conn，rs

　　set conn=server.createobject（“ADODB.connection”）

　　conn.open （“DSN=information；UID=；PWD=；”）

　　set rs=server.createobject（“ADODB.Recordset”）

　　strsql=“select * from infor where name= '” & request（“name”） &“'”//利用SQL建立查询

　　rs.open strsql，conn

　　%>

　　<table width=“1205” border=“1” align=“left” bordercolor=“#6600CC”>

　　<tr> //本行写上要显示的字段的相应的中文名

　　<td width=“69”><div align=“center”><font size=“2”>姓名</font></div></td>

　　<td width=“46”><div align=“center”><font size=“2”>性别</font></div></td>

　　<td width=“122”><div align=“center”><font size=“2”>出生年</font></div></td>

　　<td width=“46”><div align=“center”><font size=“2”>学历</font></div></td>

　　<td width=“91”><div align=“center”><font size=“2”>政治面貌</font></div></td>

　　<td width=“91”><div align=“center”><font size=“2”>专业</font></div></td>

　　<td width=“50”><div align=“center”><font size=“2”>班级</font></div></td>

　　<td width=“69”><div align=“center”><font size=“2”>班主任</font></div></td>

　　<td width=“122”><div align=“center”><font size=“2”>入学时间</font></div></td>

　　<td width=“146”><div align=“center”><font size=“2”>联系电话</font></div></td>

　　<td width=“337”><div align=“center”><font size=“2”>联系地址</font></div></td>

　　</tr>

　　<% while Not rs.eof %> //循环语句控制符合条件的记录输出

　　<tr> //本行根据循环条件可以重复输出

　　<td><div align=“center”><font size=“2”><%=rs（“name”）%></font></div></td>

　　/*输出数据库中符合条件的name字段的值*/

　　<td><div align=“center”><font size=“2”><%=rs（“sex”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“birth”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“xl”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“zzmm”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“career”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“class”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“teach”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“date”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“tel”）%></font></div></td>

　　<td><div align=“center”><font size=“2”><%=rs（“add”）%></font></div></td> </tr>

　　<% rs.movenext

　　Wend

　　rs.close

　　conn.close

　　%>

　　</table>

　　3、信息修改

　　<%

　　set conn=server.createobject（“adodb.connection”）

　　conn.open “DSN=information；UID=；PWD=；”

　　set rs=server.CreateObject（“adodb.recordset”）

　　username=request（“name”） // 取得name表单的值赋给username

　　strsql=“select * from infor where name='”&username&“'” //建立SQL查询

　　rs.open strsql，conn，3，3

　　%>

　　<form action=“zhuce.asp” method=“post”>

　　// 以POST方式将修改的记录通过zhuce.asp页面的程序保存到数据库当中

　　<table width=“75%” border=“1” align=“center” bordercolor=“#663399”>

　　<tr>

　　<td width=“18%”><div align=“right”><font size=“2”>姓 名：</font></div></td>

　　<td width=“36%”><font size=“2”>

　　<input name=“name” type=“text” id=“name” value=“<%=rs.fields（”name“）%>”>

　　</font></td> //显示符合查询条件的数据库当中name字段的值，供修改

　　<td width=“15%”><div align=“right”><font size=“2”>入学时间：</font></div></td>

　　<td width=“31%”><input name=“time” type=“text” id=“time” value=“<%=rs.fields（”date“）%>”></td>

　　</tr>

　　<tr>

　　<td height=“20”><div align=“right”><font size=“2”>性 别：</font></div></td>

　　<td><p>

　　<label>

　　<input name=“sex” type=“radio” value=“<%=rs.fields（”sex“）%>” checked>

　　男</label>

　　<label>

　　<input type=“radio” name=“sex” value=“<%=rs.fields（”sex“）%>”>

　　女</label>

　　<br>

　　</p></td>

　　<td><div align=“right”><font size=“2”>专业：</font></div></td>

　　<td><input name=“career” type=“text” id=“career” value=“<%=rs.fields（”career“）%>”></td>

　　</tr>

　　<tr>

　　<td><div align=“right”><font size=“2”>出生年月：</font></div></td>

　　<td><font size=“2”>

　　<input name=“birthday” type=“text” id=“birthday” value=“<%=rs.fields（”birth“）%>”>

　　</font></td>

　　<td><div align=“right”><font size=“2”>班级：</font></div></td>

　　<td><input name=“class” type=“text” id=“class” value=“<%=rs.fields（”class“）%>”></td>

　　</tr>

　　<tr>

　　<td><div align=“right”><font size=“2”>政治面貌：</font></div></td>

　　<td><select name=“zz” id=“zz”>

　　<option value=“团员”>团员</option>

　　<option value=“党员”>党员</option>

　　<option value=“其他”>其他</option>

　　</select></td>

　　<td><div align=“right”><font size=“2”>班主任：</font></div></td>

　　<td><input name=“teach” type=“text” id=“teach” value=“<%=rs.fields（”teach“）%>”></td>

　　</tr>

　　<tr>

　　<td><div align=“right”><font size=“2”>学历：</font></div></td>

　　<td><font size=“2”>

　　<select name=“xl” id=“xl”>

　　<option value=“初中”>初中</option>

　　<option value=“高中”>高中</option>

　　<option value=“大专”>大专</option>

　　<option value=“本科”>本科</option>

　　<option value=“研究生”>研究生</option>

　　<option value=“其他”>其他</option>

　　</select>

　　</font></td>

　　<td><div align=“r