【正文】
這次畢業(yè)設(shè)計(jì)過(guò)程中,得到了長(zhǎng)沙市工商職業(yè)中專學(xué)校的大力支持,給我提供了舒適的工作學(xué)習(xí)環(huán)境,也得到了科大老師、教授的精心指導(dǎo),在此表示衷心的感謝!23 / 23。.jpg/img 將記錄的數(shù)據(jù)用圖片顯示出來(lái) next set thisfile=(whichfile,1) (visit) set myfile=nothing 數(shù)字圖片我利用PHOTOSHOP中的文字特效制作了9個(gè)立方數(shù)字: 等 四.系統(tǒng)的使用說(shuō)明與安裝 4.1運(yùn)行環(huán)境要求 Windows98 Personal Web Server (PWS) Microsoft? Access 2000 () 4.2安裝設(shè)置 A. 將本網(wǎng)站拷貝到硬盤(pán)上的某一目錄下,如:拷貝至c:\y1下。代碼如下: whichfile=(pic\) set myfile=() 創(chuàng)建一個(gè) set thisfile=(whichfile) 組件對(duì)象 visit= visit=visit+1 記錄自加一次 length=len(visit) for i=1 to length img src=amp。 利用文件處理組件FILESYSTEM的強(qiáng)大功能來(lái)制作,比用Application對(duì)象計(jì)數(shù)器要好,Application計(jì)數(shù)器當(dāng)有20分鐘沒(méi)有人連上該網(wǎng)頁(yè)或關(guān)機(jī)時(shí),計(jì)數(shù)器會(huì)被歸零。配合 Table 表格的HTML語(yǔ)法,將結(jié)果填入表格的各單元格中。 ’ Set RS = (SQL) 若考試通過(guò),則顯示考試的結(jié)果,包括姓名、準(zhǔn)考證編號(hào)、總分和考試結(jié)果,分別由RecordSets 組件的RS(0)、RS(1)、RS(2)、RS(3)得到。 IF (ID1) THEN Set Conn = () (FILEDSN=c:\Program Files\Common Files\ODBC\Data Sources\ms access ) SQL = SELECT name,id,score FROM stud WHERE id=’ amp。先設(shè)定SQL指令,(ID1)的數(shù)據(jù),下個(gè)“Execute”指令,即可開(kāi)始執(zhí)行存取、查詢數(shù)據(jù)的動(dòng)作了。若ID1不為空時(shí),表示有表單輸入,開(kāi)始查詢數(shù)據(jù)庫(kù)。 3.4.2數(shù)據(jù)表的設(shè)計(jì) 與評(píng)優(yōu)系統(tǒng)共用STUd表,表設(shè)計(jì)同上。票% /big /font /center /td /tr %% %wend% 3.4達(dá)級(jí)考試在線查分系統(tǒng)與計(jì)數(shù)器的制作 3.4.1功能: 它提供了在線查看成績(jī)。 amp。URL= 顯示投票時(shí),我們采用了while循環(huán),把候選人及其得票數(shù),整齊地顯示在一個(gè)表格中,這種技術(shù)在數(shù)據(jù)庫(kù)查詢結(jié)果的顯示中也經(jīng)常用到。我們這里設(shè)定每隔30秒鐘自動(dòng)刷新一次?!?(sqq) if instr(vo,1) then (update stud set result=result+1 where name=’李寧’) end if if instr(vo,2) then (update stud set result=result+1 where name=’楊蘭’) end if if instr(vo,3) then (update stud set result=result+1 where name=’江道明’) end if if instr(vo,4) then (update stud set result=result+1 where name=’段啟文’) end if% 由于投票處理頁(yè)面已經(jīng)完成了絕大部分的工作,所以 顯示結(jié)果頁(yè)面就很簡(jiǎn)單了,其功能是從 Stud表文件中讀取候選人所得票數(shù),顯示在頁(yè)面上。’amp。 vo=request(cand) if len(vo)4 then% h2 align=center% 多選了,無(wú)效%/h2 然后根據(jù)所投的票將對(duì)應(yīng)候選人的投票結(jié)果字段加1,同時(shí)將該投票人的已投字段置為1。and yitu=0 set rs=(sql) if then% h2 align=center%你無(wú)權(quán)投票%/h2 本設(shè)計(jì)允許少選,不允許多選。request(passno)amp。 if request(passno) then sql=select * from stud where password=amp。故用復(fù)選框。頁(yè)面顯示如圖所示。 這個(gè)系統(tǒng)由3個(gè)部分組成—— ,處理投票結(jié)果的腳本,顯示投票頁(yè)面 。 % If Session(Manager) = 1 then %A HREF=../html/?title=% RSBooks(Title) %amp。 借這本書(shū)/A 如果圖書(shū)已經(jīng)借出,就創(chuàng)建一個(gè)不同的消息,并將鏈接設(shè)置為指向Library menu 頁(yè)面: LinkText = A HREF=../html/圖書(shū)已出借,返回主菜單。BookID= _ amp。 where BookID = _ amp。 CheckedOutTo = amp。代碼如下: % Do Until % TR VALIGN=top ALIGN=left TD WIDTH=40% height=20B書(shū)名:/B A HREF=../html/?BookID=% RSBooks(BookID) %% RSBooks(Title) %/A/TD td width=20% height=20B著者:/B % RSBooks(Author) %/td td width=30% height=20B主題:/B % RSBooks(Subject) % /td % Loop % 圖書(shū)頁(yè)面 圖書(shū)頁(yè)面的代碼顯示圖書(shū)的有關(guān)信息,以及管理圖書(shū)的出借操作。這一點(diǎn)類似于ACCESS中的符號(hào)*。 (SearchCriteria) amp。 (SearchField) amp。 搜索頁(yè)面上的表單包含一個(gè)選擇控件和一個(gè)文本控件。代碼如下: 先用一個(gè)記錄集來(lái)填充父類別選擇控件: set RSCategories = (select CategoryName from LibCategories order by CategoryName) 再用下列循環(huán)語(yǔ)句: % Do Until % OPTION VALUE=% RSCategories(CategoryName) %% RSCategories(CategoryName) %/OPTION % Loop % 遍歷RSCategories記錄集中的每個(gè)記錄,并作為一個(gè)選項(xiàng)添加到列表中,而記錄集中CategoryName 同時(shí)作為顯示值和傳遞值: 本頁(yè)面還包含一個(gè)指向添加圖書(shū)頁(yè)面的鏈接。Request(BOOKID1) end if 頁(yè)面中的添加新的種類部分包含一個(gè)文本