網(wǎng)站開(kāi)發(fā)綜合實(shí)訓(xùn)實(shí)訓(xùn)指導(dǎo)書(shū)

網(wǎng)站開(kāi)發(fā)綜合實(shí)訓(xùn)實(shí)訓(xùn)指導(dǎo)書(shū)電子商務(wù)專(zhuān)業(yè)適用孫鈾編寫(xiě)大連職業(yè)技術(shù)學(xué)院信息技術(shù)系電子商務(wù)教研室目錄實(shí)訓(xùn)一利用 ASP 技術(shù)實(shí)現(xiàn)網(wǎng)絡(luò)簡(jiǎn)易投票系統(tǒng) 2實(shí)訓(xùn)二篩選排序例 912實(shí)驗(yàn)（訓(xùn)）利用ASP技術(shù)實(shí)現(xiàn)網(wǎng)絡(luò)簡(jiǎn)易投票系統(tǒng)一、利用網(wǎng)頁(yè)制作軟件 DreamWeaver或FrontPage制作投票系統(tǒng)的靜態(tài)頁(yè)面（標(biāo)題 前不空格，標(biāo)題后換行）（小四號(hào)，加粗）（一）插入表單容器并設(shè)置提示文本，表單樣式1單擊“插入面板”中的“表單”標(biāo)簽2. 插入提示文本（可以在紅色虛線框內(nèi)插入）伽 ired 曲mw刪吃-優(yōu)|UhoJeil-2*|姉I刪踰飆刪S齢itp-3 tai勵(lì)也0DdO i應(yīng)賊iuq毗遛如上圖3. 設(shè)置單選按鈕的外框架樣式，插入 4*2的“0”邊框表格（1）單擊“插入面板”中的“常用”標(biāo)簽（2）確認(rèn)光標(biāo)在“？ ”后面，單擊“表格”標(biāo)簽（3）按下圖進(jìn)行設(shè)置4合并最后一行的兩個(gè)單元格，如下圖chi&cc.htm Vntitled-2 +Qo 打for.) Stable) <tr>格式町卜辱認(rèn)那石樂(lè) 冰平0頸刊寬 I斗世譽(yù)i選單元札 飆蹴IB不撫行（0）勰歆額色 ni|邊権匚（二）插入提示文本和表單元素（提交按鈕）并設(shè)置其屬性 i 插入提示文本，如下圖所示你最喜歡哪種球委？liMacromedia Dre入d文件編輯（自*（V）直入修改的文本（D命令站點(diǎn)窗口 （魴幫助1圓曙1日0釦雪標(biāo)題：無(wú)標(biāo)童文檔肛（空10L 謚2 單擊“插入面板”中的“表單”標(biāo)簽，點(diǎn)擊“單選按鈕”在對(duì)應(yīng)位置插入 個(gè)單選按鈕，如下圖MacrMYiedia Dreamwe3設(shè)置這三個(gè)單選按鈕的屬性（1）（2）（3）點(diǎn)擊第一個(gè)單選按鈕, 點(diǎn)擊第二個(gè)單選按鈕, 點(diǎn)擊第三個(gè)單選按鈕,設(shè)置組名稱為設(shè)置組名稱為設(shè)置組名稱為ball”ball”ball”，值為“ 0”（為數(shù)組元素下標(biāo)），值為“1”（為數(shù)組元素下標(biāo)），值為“ 2”（為數(shù)組元素下標(biāo)）j丈件 漏雷（D 童看辿質(zhì)扎（D修改迥）文本【D命潑 站直窗口曾輜助 軌空 儒屈吊局rs無(wú)表榕【痼才表單瀨扳字箝iwT文件頭陽(yáng)疳jsf值用程岸廠 O|e 2口|畫(huà)可冒|凰爲(wèi)|團(tuán)口 口 |曰口| <> & 1胡單哪什販題 C <?> L你最哥歡吒腫球暫；、旨、*、W WS y a,、* a、wv x、*、*、x 1,、衍生、Ml塑標(biāo)題：無(wú)嫌壑3堂抵UCL童用 布局文本恚格框剽蔻單（WTW蘇匡再奐.腳本：門(mén)f應(yīng)甬程事廠 | E NC?|畫(huà)叵I目|團(tuán)送|國(guó)口 口|日口牡最喜次哪種璉芙了Macromedia Dream we3丈件（曰查看w 插入 修改固 文本 命令g 站點(diǎn) 宙口働 幫瞅幽Q)odjr)(fflfm(Ulla) (tr(td) G nput卜i性I |單選按曲ii定値（y） |am9槌中辿|（三）設(shè)置表單屬性1 .點(diǎn)擊“ <form> ”標(biāo)簽Fl義車(chē)名秫動(dòng)作i o目掠Hfoml方詵TOST3MIK慕型rirl2.設(shè)置“方法”為“ get”（標(biāo)題前空兩格，標(biāo)題后空一格連續(xù)編輯）= uh *-1 表單名稱動(dòng)隹一|目標(biāo)1 form!方法|做3rae裘型3.設(shè)置“動(dòng)作”為“ end.as0 （此處為表單處理程序的文件名及路徑）4妙表單名稱動(dòng)作2一 ASp二）目標(biāo)5J1方法GET蚪MIME奠型甲二、根據(jù)靜態(tài)頁(yè)面來(lái)制作動(dòng)態(tài)頁(yè)面 en d.asp（一）理解讀寫(xiě)文本文件的方法及原理1. FileSystemObject 對(duì)象（1） 在ASP程序中，想要存取文件，必須先建立FileSystemObject對(duì)象（2） 利用這個(gè)對(duì)象調(diào)用 OpenTextFile （打開(kāi)文件）或CreateTextFile （創(chuàng)建文件） 建立File對(duì)象（3）最后才調(diào)用File對(duì)象的WriteLine及ReadLine存取文件（4）語(yǔ)法：set FileSystemObject名=server.createobject(Scripting.filesystemobject”例：set fso=server.createobject(scripting.filesystemobject”2. set file 對(duì)象名=filesystemobject 名.opentextfile(文件完整的路徑，IO 模式，是 否自動(dòng)創(chuàng)建文件 )set file對(duì)象名=filesystemobject名.createtextfile(文件完整的路徑，是否覆蓋原文 件)參數(shù)含義：文件完整的路徑：欲取得文件的完整路徑，應(yīng)調(diào)用服務(wù)器對(duì)象的mappath方法， 例如想取得目前目錄”gbbook.txt”的完整路徑，使用的方法是 “filepath=server.mappath(“gbbook.txt”)”IO 模式：可設(shè)置成 ForReading(=1)或 ForAppending(=8),若設(shè)置成 ForReading, 則打開(kāi)文件是只讀的，若設(shè)置成 Appe nding，則打開(kāi)的文件是追加的，不能讀。 可省略，若省，表示 ForReading。是否自動(dòng)創(chuàng)建文件：可設(shè)置成True或False,設(shè)置成True則當(dāng)文件不存在時(shí)，會(huì) 自動(dòng)建立一個(gè)新文件，若設(shè)置成False，當(dāng)文件不存在時(shí)，會(huì)產(chǎn)生錯(cuò)誤。可省略，若省略，表示 False。(二)編輯表單處理程序 end.asp1. 得到靜態(tài)表單傳來(lái)的數(shù)據(jù)，ball=request("ball")2. 把傳來(lái)的數(shù)據(jù)轉(zhuǎn)為數(shù)值型，count=cint(ball)3. 得到選票記錄的文本文件test.txt的完整物理路徑，fo=server.mappath("test.txt")4. 得到操作的文件對(duì)象，并設(shè)置成文件屬性為可讀，set fs=server.createobject("scripting.filesystemobject")set fn=fs.opentextfile(fo,1)5. 循環(huán)讀出文本文件中的記錄數(shù)for i=lbound(sum) to ubound(sum)sum(i)=fn.readline6. 把記錄數(shù)讀至U application變量中，application(sum(i)=sum(i)7. 判斷用戶選擇的球類(lèi)并記錄下來(lái)，if count=i thenapplication.lockapplication(sum(i)=application(sum(i)+1application.unlock8. 得到記錄總數(shù)， all=all+application(sum(i)9. 得到選票的百分比f(wàn)or i=lbound(sum) to ubound(sum) per(i)=application(sum(i)/all*100 next10. 給出反饋?lái)?yè)面足球：<%=application(sum(0)%>人 百分比：<%=csng(per(0)%>% <br>籃球：<%=application(sum(1)%>人 百分比：<%=csng(per(1)%>% <br>排球：<%=application(sum(2)%>人 百分比：<%=csng(per(2)%>%<br>11. 把得到的記錄數(shù)記錄再寫(xiě)到文本文件中 set fn=fs.createtextfile(fo,true)for i=lbo un d(sum) to ubo un d(sum) fn.writeline application(sum(i) n ext12. 防止重復(fù)投票if isempty(sessi on ("c onn eted") the n。sessi on ("c onn eted")=true、在相同文件夾下建立文本文件test.txt創(chuàng)建文本文件test.txt命令憬示苻!.1附件區(qū)一|越 1 畫(huà)|Micrascrft ExcelMicrosoft FrontpageMicrosoft WordAutodesk含金陣頭Y-RALLV Multiplayer Championship Edition 5uprerrteC*emo快捷方式劃nbainJava VJeb StartApache Tomcat 4.1JspbccdMicraeoft 5QL Server炒纓畐用基本文車(chē)Jtest.txt格式下進(jìn)行指-E目吋應(yīng)換貝） 汗內(nèi)容.在黑（一）輸入原始文本“ 0”3無(wú)標(biāo)盞-記事本立用日褊卷（自恪式倒圣看囪幫肋（也B0G（二）保存該文本文件test.txt俁存在d）： p豳書(shū)圓P Q t *-田我輦近的文趨桌面3呱難 37,txt 3-S.txt 3-12.txtH衣的電摑網(wǎng)上部屠teat, "t丈本文襠敘3七）5AHSI文件名:傑存樊型（I）：鏑碼樂(lè)）；保薦取消實(shí)驗(yàn)（訓(xùn)）二篩選排序例、利用Access創(chuàng)建數(shù)據(jù)庫(kù)及建表（一）打開(kāi)Access數(shù)據(jù)庫(kù)回 MicrosoftMicrosoft ExcelMicrosoft Wordutodek倉(cāng)金弾頭5-RALLV Multiplayer Championship Edition A uprerrieDenno 快捷方畫(huà)到ntiawinJtiva.Web StartApache Tomcat 4.1J spacedMicrosoft SQL Serv&rMacromedia（二）創(chuàng)建數(shù)據(jù)庫(kù)并保存1 單擊“文件”選擇“新建”丈禪 躺輯 視團(tuán)迪 插入 工具（I）國(guó)口遣）幫助洋打開(kāi)辺 菇璃汁胡黔熔（5）|丟邊Ctrl+OH澡壽 另仔為 1辱tt （E）.Ctrl+3I頁(yè)倉(cāng)支盍助一雖打印預(yù)垃如 星打印 .Ctz-l+P1 CTOSYRSSAFLE2 C. Eocuriien.ts utd St ti rLjs.AJlMy3 CMIIlSWU4 CWE-JlDVWOKES|退出囲|口.丁1 +N2 保存數(shù)據(jù)庫(kù)文件新妾議揭?guī)觳俅嫖皇譗： |口 SUUKCE二4 SJ空 匚昌”王具6八a歷史affly JoctmerLtEEl皇面A B? TArAr34 5 67890 l z n- -H- u n- o o o 1 1 1- KHIlttHIHIHIHIHHH c c c c c 匚 E c 匚 uCHF二_JCK14LjckisZckit_jCK1Soris 巴 CH2CI_j醐EXCELSWDBJTKTSlRSSAMrLE. MDB立件名（W| dbl .： IL二s_懈薦梵型: |ttjcrosoft Accssi 數(shù)據(jù)庫(kù)（水一 md"b）取消1（三）創(chuàng)建、設(shè)計(jì)數(shù)據(jù)表并添加數(shù)據(jù)1創(chuàng)建表聒打幵址設(shè)計(jì)迦答新逹 |X fin A庫(kù)雪住.用嵐計(jì)理創(chuàng)甜黑囂:霍囂爲(wèi) 綣貝制心Jr一 可置屈性迥另存為 導(dǎo)出1).發(fā)送添至組 創(chuàng)律快捷方式.X刪曉臺(tái)命名CMJ2 設(shè)計(jì)表G3廠字段窯稱數(shù)據(jù)類(lèi)型數(shù)寺姓名文*語(yǔ)文數(shù)芋英語(yǔ)數(shù)宇數(shù)學(xué)數(shù)孚3. 添加數(shù)據(jù)表數(shù)據(jù)并保存ii學(xué)號(hào)數(shù)學(xué)|k際邇一907T96650302董光全託76756503C3西生妙41144450304王為全筆57arS503C5李正道596&srS5O3O6金正荀656972瀬:口000、利用DreamWeaver創(chuàng)建篩選的靜態(tài)頁(yè)面(一) 插入表單容器并設(shè)置提示文本，表單樣式1單擊“插入面板”中的“表單”標(biāo)簽"曠曠幅 OfpdTfwve* -S85I6 (IHifrJ-?1),脫艇W釧熬L堪)君強(qiáng)韻也st17 nG Hl IU國(guó)節(jié)旦門(mén)如上圖2 插入3*2的“0”邊框表格(1) 單擊“插入面板”中的“常用”標(biāo)簽(2) 單擊“表格”標(biāo)簽(3) 按下圖進(jìn)行設(shè)置SAW1&1髒單擊“插入面板”中的“表單”標(biāo)簽 在對(duì)應(yīng)表格單元格插入表單元素行鮫3單元格埴充：|口|列數(shù)：2單無(wú)郵距：b|職消寬蜃：300|邊植：0擦素 M3合并最后一行的兩個(gè)單元格，如下圖格式I無(wú)訶 蓋 獻(xiàn)*宇體鏈接0亙大小西勺口| |目標(biāo)二冋 水平懺認(rèn).弓寬 世拶選單元晅性用酬向1QQ 標(biāo)題4). r58色| !8框厲)匚|(二)插入提示文本和表單元素(單行文本輸入框)并設(shè)置其屬性 插入提示文本，如下圖所示2.插入表單元素7|常用怖局戈本康格:框架【表單隈規(guī) 序I?媒悴戈件頭【制本缶打應(yīng)用程序 | C hJ 口 |畫(huà)圖國(guó)|團(tuán)召|(zhì)國(guó)同|冋口稔能靄|殷|融：氐標(biāo)題文檔幽一 < C ?>(L臥提交3.設(shè)置表單元素屬性(1) 單擊“插入面板”中的“表單”標(biāo)簽(2) 在對(duì)應(yīng)表格單元格插入表單元素Unit i tJ-色 &一 1*(bod!y> <form> <t able> <tr> CtdXiiipaLtitcFi ter i a>文本域cri tri a屋性宇符競(jìng)度類(lèi)型 單行容行血 _密碼最夭孚科數(shù)初貽值II換iilUMZAl * |body> <&rn>>Ctable><tr> <td> <inpulfort>KMn /(三)設(shè)置表單屬性1. 點(diǎn)擊“ <form> ”標(biāo)簽Cbo 如Cfor-”1表單名輔林：| Q 目標(biāo)T一forml前去TOST|孫WIH5類(lèi)型32.設(shè)置“動(dòng)作”為“ shaipai.asp(一) WEB數(shù)據(jù)庫(kù)的工作原理及使用的方法1 .建立一個(gè) Connection 對(duì)象：connSet conn=server.createobjectADODB.Co nn ecti on ”2 .調(diào)用conn.open方法如打開(kāi) Advworks.mdb數(shù)據(jù)庫(kù)Conn. open”drive=MicrosoftAccessDrive(*.mdb);dbq= ”&Server.mappath( Advwor ks.mdb”參數(shù)中含有“ drive=Microsoft的內(nèi)容，表示我們要透過(guò) Access的ODBC驅(qū) 動(dòng)程序來(lái)存取數(shù)據(jù)庫(kù)，dbq參數(shù)則用來(lái)指定欲打開(kāi)的數(shù)據(jù)庫(kù)文件，它必須是完整 的路徑名稱。3.調(diào)用 conn.execute函數(shù)建立 recordset對(duì)象：rs,女口Set rs=c onn .executeCustomerg”(二) 編寫(xiě)輸出記錄集方法過(guò)程<%將Recordset輸出成HTML的 表格”Sub RsToTable( rs )Part I:輸出數(shù)據(jù)庫(kù)的 表頭”Respo nse.Write "<CENTER><TABLE BORDER=1>"Respo nse.Write "<TR BGCOLOR=#OOFFFF>"For i=0 to rs.Fields.Cou nt-1Respo nse.WRITE "<TD>" & rs.Fields(i).Name & "</TD>"NextRespo nse.Write "</TR>"Part II:輸出數(shù)據(jù)庫(kù)的 內(nèi)容”While Not rs.EOFRespo nse.Write "<TR>"For i=0 to rs.Fields.Cou nt-1Respo nse.WRITE "<TD>" & rs.Fields(i).Value & "</TD>"NextRespo nse.Write "</TR>"rs.MoveNextWendResponse.Write "</TABLE></CENTER>"End Sub%>(三) 編輯表單處理程序 shaipai.asp1 得到靜態(tài)表單傳來(lái)的數(shù)據(jù)， criteria=request("criteria"),sort=request(“sort”)2 默認(rèn)的 sql 值， sql=”select * from 成績(jī)單 ”3 得到篩選和排序條件if criteria<> ”thensql=sql& ”where”&criteriaend ifif sort<> ”t”hensql=sql& ”order by”&sortend if4 得到記錄集set rs=conn.Excute(sql)5輸出篩選和排序的記錄集RsToTable rs