這是我自己的心得,給大家作個參考。
我的目的是讓開發變得簡單,儘可能少地考慮實現語句,更多地把精力用于思考商務邏輯。希望我的文章對大家有所啟發和協助。
好吧,讓我們進入正題:
先看以下例子:
以下為引用的內容: <% db_path = "database/cnbruce.mdb" Set conn= Server.CreateObject("ADODB.Connection") connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db_path) conn.Open connstr Set rs = Server.CreateObject ("ADODB.Recordset") sql = "Select * from cnarticle" rs.Open sql,conn,1,1 if rs.EOF and rs.BOF then response.write ("暫時還沒有文章") else Do Until rs.EOF response.write("文章標題是:"& rs("cn_title")) response.write("<br>文章作者是:"& rs("cn_author")) response.write("<br>文章加入時間是:"& rs("cn_time")) response.write("<br>文章內容是:"& rs("cn_content")) response.write("<hr>") rs.MoveNext Loop end if rs.close Set rs = Nothing conn.close set conn=Nothing %> |
嗯,這是一個典型的讀取資料並顯示的例子,參見:http://www.cnbruce.com/blog/showlog.asp?cat_id=26&log_id=448
嗯,確實簡單。從上至下,很容易明白。但是當你對多個表進行讀插刪改的時候,當你的代碼裡有很多HTML\js混雜的時候,你會有疑問:為什麼有這麼多東西要重複呢?
所以一般我們把一些簡單的操作獨立出來,寫成類或者函數放進包含檔案(include)。
那麼以上的操作我們可以使用兩個檔案來實現:
conn.asp
以下為引用的內容: <% db_path = "database/cnbruce.mdb" Set conn= Server.CreateObject("ADODB.Connection") connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db_path) conn.Open connstr %> |
showit.asp
以下為引用的內容: <!--#include file="conn.asp" --> <% Set rs = Server.CreateObject ("ADODB.Recordset") sql = "Select * from cnarticle" rs.Open sql,conn,1,1 if rs.EOF and rs.BOF then response.write ("暫時還沒有文章") else Do Until rs.EOF response.write("文章標題是:"& rs("cn_title")) response.write("<br>文章作者是:"& rs("cn_author")) response.write("<br>文章加入時間是:"& rs("cn_time")) response.write("<br>文章內容是:"& rs("cn_content")) response.write("<hr>") rs.MoveNext Loop end if rs.close Set rs = Nothing conn.close set conn=Nothing %> |
參考:http://www.cnbruce.com/blog/showlog.asp?cat_id=26&log_id=448
現在相對簡單多了,如果有多個操作頁面我們只要匯入串連檔案就可以了,不過還是不夠簡潔,哪裡不簡潔?
一直在建立server,一直在寫close,這樣很容易出錯,並且看起來與內容無關的太多。
共4頁: 上一頁 1 [2] [3] [4] 下一頁