【導讀】二十一世紀是信息化時代。網絡化，信息化以成為一種必不可少的必備條件。礎教學與科研基地的高校自然走在行業(yè)的前列。全國高校都在建設和完善校園計算機網絡，校園網已成為各高校必備的重要信息基礎設施。數據庫是數據管理的最新技術，是計算機科學的重要分支。網絡數據庫，即應用于計。Inter本身就是世界范圍內龐大的信息數據庫,是Web，接口與數據。的結合，使得數據庫應用便于網絡的操作和控制——遠程數據庫的交互及管理。主要缺陷——不能持續(xù)連接，當查詢的結果被傳送到遠程客戶瀏覽器后，連接隨即斷開。因此數據庫的大小并不是夠成影響事物傳輸的關鍵因素。大致有文本數據庫、Web數據庫和大型數據庫幾個。數據庫接口是實現Web與數據庫的高。因此在此文中還對asp、access和iis進行了相關介紹。譯，容易編寫，可在服務器端直接執(zhí)行。在開發(fā)當中不可避免的存在或多或少的問題，希望大家諒解。據庫之間溝通的橋梁。用ActiveServerPages技術來開發(fā)動態(tài)網站，用

　　

【正文】 lements[39。author39。].value。 var manufacturer = [39。frmdata39。].elements[39。manufacturer39。].value。 var smallprice = [39。frmdata39。].elements[39。smallprice39。].value。 var largeprice = [39。frmdata39。].elements[39。largeprice39。].value。 var enabledate = [39。frmdata39。].elements[39。enabledate39。].value。 var expiredate = [39。frmdata39。].elements[39。expiredate39。].value。 if (!IsWhitespace(enabledate)) { if (!IsDate(enabledate)) { alert(出版日期 開始日期格式錯誤 !)。 26 return false。 } } if (!IsWhitespace(expiredate)) { if (!IsDate(expiredate)) { alert(出版日期 結束日期格式錯誤 !)。 return false。 } } var allNotEmpty = (!IsWhitespace(name)) || (!IsWhitespace(author)) || (!IsWhitespace(manufacturer)) || (!IsWhitespace(smallprice)) || (!IsWhitespace(largeprice))|| (!IsWhitespace(enabledate)) || (!IsWhitespace(expiredate))。 ‘ 如果查詢的 條件都為空 if (!allNotEmpty) { alert(必需輸入一個搜索條件 )。 return false。 } if (!IsWhitespace(smallprice)) { if (!checknumber(smallprice)) { alert(價格數據不合法 )。 return false。 } } if (!IsWhitespace(largeprice)) { if (!checknumber(largeprice)) { alert(價格數據不合法 )。 return false。 } } //判斷是否為數字的函數 function checknumber(str) { var i。 27 for(i=0。i。i++) { if ((i)0 || (i)9) { return false。 } } return true。 } if ((!IsWhitespace(enabledate)) amp。amp。 (!IsWhitespace(expiredate))) { if (enabledateexpiredate) { alert(出版日期范圍錯誤 )。 return false。 } } if ((!IsWhitespace(smallprice)) amp。amp。 (!IsWhitespace(largeprice))) { if (parseFloat(smallprice)parseFloat(largeprice)) { alert(價格范圍錯誤 )。 return false。 } }} /script 在使用 javascript對信息判斷正確后就執(zhí)行信息提交，進入查詢頁面 ,主要代碼如下 : ‘ 如果搜索條件為空 if = then call MsgBox(錯誤：沒有搜索條件 !,GoUrl,) end if set rs=() name=trim((name)) author=trim((author)) manufacturer=trim((manufacturer)) enabledate=trim((enabledate)) expiredate=trim((expiredate)) smallprice=trim((smallprice)) largeprice=trim((largeprice)) OrderField=trim((OrderField)) Order=trim((Order)) code=trim((code)) 28 if OrderField= then OrderField=adddate if Order= then Order=DESC sql=select pagenum,name,mark,id,author,productdate,price from content where 1=1 ‘ 如果查詢的圖書名不為空 if name then sql=sqlamp。and name like 39。%amp。nameamp。%39。 end if ‘ 如果查詢的作者不為空 if author then sql=sqlamp。and author like 39。%amp。authoramp。%39。 end if ‘ 如果查詢的出版社不為空 if manufacturer then sql=sqlamp。and mark like 39。%amp。manufactureramp。%39。 end if ‘ 如果查詢的圖書類別不為空 if code then sql=sqlamp。and categoryid like 39。%amp。codeamp。%39。 end if ‘ 如果查詢的價格最小值不為空 if smallprice then smallprice=CDbl(smallprice) sql=sqlamp。and price = amp。smallprice end if ‘ 如果查詢的價格最大值不為空 if largeprice then largeprice=CDbl(largeprice) sql=sqlamp。and price = amp。largeprice end if ‘ 如果查詢的時間下界不為空 if expiredate then expiredate=CDate(expiredate) sql=sqlamp。and productdate = 39。amp。expiredateamp。39。 end if ‘ 如果查詢的時間上界不為空 if enabledate then enabledate=CDate(enabledate) sql=sqlamp。and productdate = 39。amp。enabledateamp。39。 end if sql=sqlamp。 order by amp。OrderFieldamp。 amp。Order sql,conn,1,1 ‘ 如果未查詢到符合條件的數據 if 0 then 29 call MsgBox(數據庫中無數據 ,Back,None) end if b、借書 查詢到想借的書后點書的名稱就可以看到該圖書的詳細情況，如果該書已經借出了則不能再借，如果沒有借出，可以點借閱本書 ，然后系統(tǒng)提示借閱成功。 程序段為： if request(action)=islent then set rs=() select * from lent,conn,1,3 rs(username)=(cookieName)(username) rs(bookid)=request(id) rs(bookdata)=now() set rs=nothing set rs2=() select * from content where id=amp。id,conn,1,3 rs2(islent)=1 set rs2=nothing call MsgBox(借閱成功！ ,GoUrl,?id=amp。id) end if 程序實現過程中出現的問題及解決方法 ： a. 字符類型的判斷 會員在輸入查詢內容時可能會輸入錯誤的時間日期格式或者在價格輸入框未輸入數字，這樣程序會有錯誤發(fā)生，為避免這種情況的發(fā)生我們采用 javascript制作了幾個判別函數，如果有錯誤則及時在輸入頁面做提示。 a. 查詢的實施 由于有很多個查詢條件，假如我們從整體上去考慮會員提交了哪幾個查詢條件，那樣就非常麻煩了，現在我就是采用分步討論，就是對每個條件分開判斷，比如查詢圖書名稱非空那就執(zhí)行 sql=sqlamp。and name like 39。%amp。nameamp。%39。 ，這樣就非常的清楚明了。 分類查詢和綜合查詢代碼類似在這兒就不贅述了。 30 不正確 正確 是 否 圖 10—— 圖書查詢部分流程圖 圖書管理模塊： 圖書管理模塊包括圖書的添加修改和刪除三個部分。 數據表 content 情況如下： 字 段 名 數 據 類 型 id int name Nvarchar(255) author Nvarchar(50) introduce Nvarchar(255) productdate datetime content ntext price int categoryid Nvarchar(50) adddate datetime mark Nvarchar(255) type Nvarchar(255) pagenum Nvarchar(50) format Nvarchar(50) printed Nvarchar(50) detail ntext islent Nvarchar(50) i. 程序的基本描述： 用戶輸入 是否至少輸入一個檢索條件，日期價格數字類型是否輸入正確 重新輸入 查詢記錄集是否為空 提取數據 重新檢索 31 圖書的添加首先要判斷是否填入了必要的字段比如圖書名稱、作者、出版社、 ISBN、價格等，如果都填了則提交，否則出現提示。 程序段為： script language=JavaScript function checkpro() { //如果輸入的圖書名為空 if(==) {()。 alert(請輸入圖書名！ )。 return false。} //如果輸入的作者為空 if(==) {()。 alert(請輸入作者！ )。 return false。} //如果輸入的出版社名為空 if(==) { ()。 alert(請輸入出版社！ )。 return false。 } //如果輸入的 ISBN為空 if(==) {()。 alert(請輸入 ISBN！ )。 return false。 } //如果輸入的價格為空 if(==) { ()。 alert(請輸入價格！ )。 return false。 } } /script set rs=() sqltext=select * from content sqltext,conn,3,3 ‘ 添加記錄 rs(productdate)=request(productdate) rs(name)=request(name) rs(format)=request(format) rs(pagenum)=request(pagenum) rs(printed)=r