通過ASP與ACCESS數(shù)據庫建立連接（附源碼）(2)

我要評論 2009/04/06 01:02:21 來源：綠色資源網編輯：佚名 [大中小] 評論:0 點擊:1233次

（三）關鍵部分：建立與數(shù)據庫的聯(lián)系并將表單中收集到的信息添加到ACCESS數(shù)據庫中。

ASP代碼放在〈%和%>之間。

<%
CompanyName = Request("CompanyName")
CName = Request("CName")
City = Request("City")
Tel = Request("Tel")

以上，首先取得表單中填寫的數(shù)據，使用ASP的Request對象非常容易可以實現(xiàn)數(shù)據的收集。雙引號中的就是上一步建立的各個項目的名字（NAME）。所以今后為每個項目起名字是個好習慣，盡管有時候并不一定用得到。這樣取得的數(shù)據就保存在等號坐側的變量中了。

If CompanyName = "" Or CName = "" Or City = "" Or Tel = "" Then
'Response.Write "<html><body><center>請將資料填寫完整。</center></body></html>"
Response.Redirect "error.htm"
Response.End
End If

這里是檢測各個項目是否輸入了東西，如果為空則不往下繼續(xù)執(zhí)行，顯示錯誤信息。注意：你可以使用兩種方法。我都列出了。方法一：使用Response.Write方法寫一個出錯頁面，類似于javascripts的document.write寫法，只是ASP使用Response.write罷了。方法二：使用Response.Redirect方法導向出錯頁面error.htm。我在方法一的代碼前加上單引號表示注釋。（ASP中表示注釋用單引號'）。

set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("customer.mdb")
dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

（1）建立Connection對象：dbconnection，建立一個連接(Connection)是數(shù)據庫存取的開始。我們使用ASP的內建對象方法Server.Createobject建立與數(shù)據庫的連接。ADODB是ASP的數(shù)據庫存取組件，不必擔心只要有ASP就有它了，是內置的。
（2）使用dbconnection.open方法打開數(shù)據庫customer.mdb。driver參數(shù)語法： driver={Microsoft Access Driver (*.mdb)}必須這么寫。告訴系統(tǒng)使用ACCESS ODBC驅動處理。dbq參數(shù)用來指定打開的數(shù)據庫文件，它必須是完整的路徑。例如"c:inetpubwwwrootcustomercustomer.mdb"，我們使用Server.MapPath的方法取得數(shù)據庫的完整路徑。

Set rs = Server.CreateObject("ADODB.Recordset")

建立Recordset對象rs。Connection僅僅是建立了與數(shù)據庫間的連接，要存取數(shù)據還應該再建立Recordset對象。

rs.Open "客戶", dbconnection, adOpenDynamic, 3

打開數(shù)據庫中的表"客戶"（客戶是表名）。語法：

rs.open 數(shù)據表名或SQL指令，已經建立的Connection對象（這里是dbconnection）, 鎖定類型

rs.AddNew
rs("公司名稱") = CompanyName
rs("聯(lián)絡人姓名") = CName
rs("所在城市") = City
rs("電話號碼") = Tel
rs.Update

用AddNew向數(shù)據庫請求添加數(shù)據。最后用Update寫入。注意：等號右側的變量保存著用Request取得的表單數(shù)據。雙引號內的就是數(shù)據庫的字段，應該與數(shù)據庫的一致啊。否則會出錯的。這樣變量內的數(shù)據就寫入了數(shù)據庫對應的字段內了。

Response.Write "<html><body><center>祝賀，您的數(shù)據已經添加進數(shù)據庫了！"
Response.Write "<a href='viewdatabase.asp'>查看數(shù)據</a>"
Response.Write "</center></body></html>"

寫入成功后顯示祝賀信息并建立查看數(shù)據庫記錄的連接。

%>
<html>

<head>
<title></title>
</head>

<body>
</body>
</html>