动态网页开发基础实训指导书第十二次实训.docx

<%'遍历表内容的代码

setrss=server.createobject（"adodb.recordset"）

sql="select*fromxx"

rss.opensql,conn,1,1

ifrss.recordcount<>0then

dowhilenotrss.eof

%>

<%=rss（"xh"）%>

<%=rss（"xm"）%>

<%=rss（"zy"）%>

<%

rss.movenext

loop

else

response.write"对不起，该数据库中还没数据！

"

endif

rss.close

%>

9.设置index.asp文件中的“查看部分”的超级链接的文件是：

ckbf.asp，ckbf.asp文件的运行结果如下：

ckbf.asp文件的设计视图如下：

ckbf.asp文件的代码视图如下：

--#includefile="conn.asp"-->

<%'遍历表内容的代码

setrss=server.createobject（"adodb.recordset"）

sql="select*fromxxwherexm='lisa'"

rss.opensql,conn,1,1

ifrss.recordcount<>0then

dowhilenotrss.eof

%>

<%=rss（"xh"）%>

<%=rss（"xm"）%>

<%=rss（"zy"）%>

<%

rss.movenext

loop

else

response.write"对不起还没信息更新！

"

endif

rss.close

%>

试对该网页的输出进行美化，并与ckqb.asp文件进行比较，重点查看其区别。

10.设置index.asp文件中的“站内搜索”的超级链接的文件是：

sosuomh.asp，该文件能够实现模糊搜索，sosuomh.asp文件的运行结果如下：

sosuomh.asp文件的设计视图如下：

sosuomh.asp文件主要包含一个表单，以提取用户输入的要查找的内容，该表单action属性的值为suomh.asp，该没有动态代码，代码视图略。

11.制作soumh.asp文件，输入“L”后该文件运行后的结果如下图所示：

该文件的设计视图如下：

该文件的代码视图如下：

--#includefile="conn.asp"-->

<%

xm=trim（request.form（"xm"））

setrss=server.createobject（"adodb.recordset"）

sql="select*fromxxwherexmlike'"&"%"&xm&"%"&"'"

rss.opensql,conn,1,1

ifrss.recordcount<>0then

dowhilenotrss.eof

%>

<%=rss（"xh"）%>

<%=rss（"xm"）%>

<%=rss（"zy"）%>

<%

rss.movenext

loop

else

response.write"对不起，没找到您要的信息！

"

endif

rss.close

%>

12．设置index.asp文件中的“分页查看”的超级链接的文件是：

fy.asp，该文件能够实现分页显示信息内容，fy.asp文件的运行结果如下：

fy.asp文件的设计视图如下：

fy.asp文件的代码视图如下：

--#includefile="conn.asp"-->

--

.STYLE1{

font-size:

x-large;

font-family:

"华文行楷";

}

-->

所有报名信息

学号

姓名

专业

<%'遍历表内容的代码

setrss=server.createobject（"adodb.recordset"）

sql="select*fromxx"

rss.opensql,conn,1,1

rss.pageSize=6

dimpageNo

pageNo=cint（request.queryString（"pageNo"））

ifpageNo<1orisnumeric（pageNo）=falsethenpageNo=1

ifpageNo>rss.pageCountthenpageNo=rss.pageCount

rss.absolutePage=pageNo

dimi

i=1

dowhilenotrss.eofandi<=rss.pageSize

%>

<%

ifimod2=0then

%>

<%=rss（"xh"）%>

<%=rss（"xm"）%>

<%=rss（"zy"）%>

<%else%>

<%=rss（"xh"）%>

<%=rss（"xm"）%>

<%=rss（"zy"）%>

<%endif%>

<%

i=i+1

rss.movenext

loop

%>

共<%=rss.recordCount%>条

当前页是:

<%=pageNo%>/<%=rss.pageCount%>

共<%=rss.pageCount%>页

<%ifpageNo<=1orrss.recordCount<=rss.pageSizethen%>

首页|

<%else%>

pageNo=1>首页|

<%endif%>

<%ifpageNo<=1orrss.recordCount<=rss.pageSizethen%>

上一页|

<%else%>

pageNo=<%=pageNo-1%>>上一页|

<%endif%>

<%ifpageno>=rss.pageCountthen%>

下一页|

<%else%>

pageNo=<%=pageNo+1%>>下一页|

<%endif%>

<%ifpageNo>=rss.pageCountthen%>

尾页|

<%else%>

pageNo=<%=rss.pageCount%>>尾页|

<%endif%>

window.open（'?

pageNo='+this.options[this.selectedIndex].value,'_self'）">

<%

dimpage

forpage=1torss.pageCount

ifpage=cint（pageNo）then%>

selected><%=page%>

<%else%>

><%=page%>

<%endif

next

%>