通過ASP與ACCESS資料庫建立串連(附源碼)(2)

來源:互聯網
上載者:User

三)關鍵區段:建立與資料庫的聯絡並將表單中收集到的資訊添加到ACCESS資料庫中。

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

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

以上,首先取得表單中填寫的資料,使用ASP的Request對象非常容易可以實現資料的收集。雙引號中的就是上一步建立的各個項目的名字(NAME)。所以今後為每個項目起名字是個好習慣,儘管有時候並不一定用得到。這樣取得的資料就儲存在等號坐側的變數中了。

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

這裡是檢測各個項目是否輸入了東西,如果為空白則不往下繼續執行,顯示錯誤資訊。注意:你可以使用兩種方法。我都列出了。方法一:使用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)是資料庫存取的開始。我們使用ASP的內建對象方法Server.Createobject建立與資料庫的串連。ADODB是ASP的資料庫存取組件,不必擔心只要有ASP就有它了,是內建的。
(2)使用dbconnection.open方法開啟資料庫customer.mdb。driver參數文法: driver={Microsoft Access Driver (*.mdb)}必須這麼寫。告訴系統使用ACCESS ODBC驅動處理。dbq參數用來指定開啟的資料庫檔案,它必須是完整的路徑。例如"c:\inetpub\wwwroot\customer\customer.mdb",我們使用Server.MapPath的方法取得資料庫的完整路徑。 

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

建立Recordset對象rs。Connection僅僅是建立了與資料庫間的串連,要存取資料還應該再建立Recordset對象。

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

開啟資料庫中的表"客戶"(客戶是表名)。 文法:

rs.open 資料表名或SQL指令,已經建立的Connection對象(這裡是dbconnection), 鎖定類型


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

用AddNew向資料庫請求添加資料。最後用Update寫入。注意:等號右側的變數儲存著用Request取得的表單資料。雙引號內的就是資料庫的欄位,應該與資料庫的一致啊。否則會出錯的。這樣變數內的資料就寫入了資料庫對應的欄位內了。

Response.Write "<html><body><center><font size=5>祝賀,您的資料已經添加進資料庫了!<p>"
Response.Write "<a href='viewdatabase.asp'>查看資料</a>"
Response.Write "</font></center></body></html>"

寫入成功後顯示祝賀資訊並建立查看資料庫記錄的串連。

%>
<html>

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

<body>
</body>
</html>
 
 



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。