您现在的位置：程式碼之家 >> 編程語言 > >> 網頁程式設計 >> ASP 程式設計 >> ASP 入門教學

ASP 入門教學：網路書局管理系統完整實作

編輯：ASP 入門教學

系統功能架構

本範例實作完整網路書局核心功能：圖書分頁顯示、購物車加入/移除/清空、結帳流程、會員註冊。採用框架頁面架構：

<frameset rows="80,*" cols="*" frameborder="NO" border="0" framespacing="0">
  <frame src="top.htm" name="topFrame" scrolling="NO" noresize >
  <frame src="booklist.asp" name="mainFrame">
</frameset>

資料庫連線模組

統一連線字串管理，所有資料頁面引用 Conn.asp：

<% 
Set Conn = Server.CreateObject("ADODB.Connection")
strSQL = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("bookshop.mdb")
Conn.Open(strSQL)
%>

圖書列表分頁邏輯

Booklist.asp 示範 ADO Recordset 分頁技術：設定 PageSize、計算 PageCount、透過 AbsolutePage 定位當前頁，配合 Do While 迴圈輸出記錄，For 迴圈產生頁碼連結：

rs_booklist.PageSize = 7
page_total = rs_booklist.PageCount
If Request.QueryString("page_nonce") <> "" Then
    page_nonce = CInt(Request.QueryString("page_nonce"))
Else
    page_nonce = 1
End If
rs_booklist.AbsolutePage = page_nonce

Do While Not rs_booklist.Eof And I > 0
    ' 輸出書號、書名、數量、加入購物車連結
    rs_booklist.MoveNext
    I = I - 1
Loop

For j = 1 To page_total
    If j = page_nonce Then Response.Write j
    Else Response.Write "<a href='booklist.asp?page_nonce=" & j & "'>" & j & "</a>"
Next

完整程式碼包含資料連線、記錄集操作、HTML 表格輸出與資源釋放，展示經典 ASP 應用開發模式。