云上運(yùn)維及應(yīng)用實(shí)踐教程（第2版） 教案 21 實(shí)驗(yàn)七 搜索功能制作

教案序號(hào)：.課題實(shí)驗(yàn)七搜索功能制作授課形式□理論□理實(shí)一體√實(shí)訓(xùn)(驗(yàn))□其它：學(xué)時(shí)安排本單元總學(xué)時(shí)：2（其中：理論學(xué)時(shí)、實(shí)踐2學(xué)時(shí)）教學(xué)內(nèi)容及目標(biāo)掌握新聞搜索功能前臺(tái)界面的設(shè)計(jì)后臺(tái)ASP代碼的編寫方法。教學(xué)重點(diǎn)及難點(diǎn)重點(diǎn)、難點(diǎn)：搜索功能ASP代碼編寫方法授課對(duì)象學(xué)情分析學(xué)生接觸網(wǎng)站建設(shè)的相關(guān)內(nèi)容時(shí)間不長，雖然有網(wǎng)頁制作的基礎(chǔ)，但基礎(chǔ)較差，需要在講授過程中，教師進(jìn)行巡回指導(dǎo)或同學(xué)間小組討論。教學(xué)媒介機(jī)房授課地點(diǎn)5405教學(xué)過程及設(shè)計(jì)：實(shí)驗(yàn)七搜索功能制作一、實(shí)驗(yàn)?zāi)康?/p>

通過本實(shí)驗(yàn)掌握新聞搜索功能前臺(tái)界面的設(shè)計(jì)與后臺(tái)ASP代碼的編寫方法。二、實(shí)驗(yàn)內(nèi)容

1、新聞搜索功能實(shí)現(xiàn)需要涉及到哪些頁面？2、要求新建以data命名的數(shù)據(jù)庫?數(shù)據(jù)表的名稱用xwb表示，xwb表中各字段分別為：id,title(標(biāo)題),author(作者),dep(部門),cat(類別)，content(內(nèi)容),addtime(添加的時(shí)間)。3、新聞搜索功能實(shí)現(xiàn)的ASP代碼？三、實(shí)驗(yàn)指導(dǎo)1、完成conn..asp的頁面：<%setconn=server.CreateObject("adodb.connection")conn.open"driver=microsoftaccessdriver(*.mdb);dbq="&server.MapPath("data/wzjs.mdb")%>2、完成新聞功能實(shí)現(xiàn)的ASP代碼。<% gjc=request.form("gjc") ifgjc<>""then session("gjc")=gjc elseifrequest.form("gjc")=""then session("gjc")=gjc endif %><% setrs=server.CreateObject("adodb.recordset") ifrequest("page")<>""then page=clng(request("page")) endif ifpage<1then page=1 endif pagesize=10 b="selectcount(*)ascfromnewswherexwbtlike'%"&session("gjc")&"%'" rs.openb,conn,1,3 d=rs("c") pagecount=cint(d/10+0.5) rs.close %> <% ifpage=1then setrs=server.CreateObject("adodb.recordset") a="selecttop10*fromnewswherexwbtlike'%"&session("gjc")&"%'orderbyiddesc" else a="selecttop10*fromnewsandwhereidnotin(selecttop"&cstr(pagesize*(1))&"idfromnewswherexwbtlike'%"&session("gjc")&"%'orderbyiddesc)andxwbtlike'%"&session("gjc")&"%'orderbyiddesc" endif rs.opena,conn ifrs.eofandrs.bofthen %>三、小結(jié)本次實(shí)驗(yàn)主要是要求學(xué)生掌握新聞搜索功能制作