ASP程序高手请进
6、程序设计题:请按照题目要求将程序代码补充完整(”_____”部分),并回答问题。(本题15分)
某高校已录取的新生数据库为DATA..mdb,其中student_info表的结构为:
字段名称 数据类型 说 明
Id 自动编号 主键
Sfzh 文本 身份证号
Number 文本 学号
name 文本 姓名
zf 数字 总分
完成ASP程序,实现通过输入学号或者身份证号任意一个正确的内容来查询出某个学生的全部信息。
主要程序如下:
Search.asp(表单提交页)
——————————————————————————————————————
<FORM method="post" name="formDis" action="s_info.asp">
<INPUT name="ding1" type="text">
<INPUT name="ding2" type ="text">
<input type="submit" name="Submit" value="提交" >
</FORM>
s_info.asp(查询结果页)
——————————————————————————————————————
<%
Set conn=server.CreateObject("ADODB.connection")
Provider="Provider=Microsoft.Jet.OleDb.4.0;Data Source=" & Server.MapPath("________") ‘填空区域
conn.open Provider
%>
<%
dim number,sfzh
number=_________________________‘填空区域
sfzh=_________________________ ‘填空区域
_________________________ ‘填空区域(判断提交的表单信息是否为空)
response.Write("<script>alert('错误原因:没有输入任何内容,无法查询!(确定返回)')</script>")
response.Write("<meta http-equiv='refresh' content='0;URL=search.asp'>")
response.end
end if
%>
<%
Set rs=Server.CreateObject("ADODB.recordset")
sqlcmd="select * from student_info where number = '"&number&"' and sfzh='"&sfzh&"'"
rs.open sqlcmd,conn,1,1
%>
<%
if rs.bof or rs.eof then
response.write"NO information!"
response.end()
end if
%> ‘灰色区域的这段程序代码的作用是什么?
<%do while not rs.eof%>
<tr>
<td><%____________%></td> ‘填空区域(显示身份证号)
<td><%____________%></td> ‘填空区域(显示学号)
<td><%____________%></td> ‘填空区域(显示姓名)
<td><%____________%></td> ‘填空区域(显示总分)
</tr>
<%
rs.movenext
loop
%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
问题:灰色区域的这段程序代码的作用是什么?
答案:1:data.mdb
2.trim(request("ding1"))
3.trim(request("ding2"))
4.if len(number)=0 or len(sfzh)=0 then
5.=rs("sfzh")
6.=rs("number")
7.=rs("name")
8.=rs("zf")
其他:<%
if rs.bof or rs.eof then
response.write"NO information!"
response.end()
end if
%> ‘灰色区域的这段程序代码的作用是什么?
表示没有找到数据库记录,这样网页上会显示“NO information!”
上一个:所有访问数据库的asp程序(文件)都必须打开连接对象吗?不同的asp页面文件可以打开不同的连接对象吗?
下一个:ASP程序高手请进