建站
咨詢
售后
建站咨詢
新聞中心
在ASP開發(fā)中，數(shù)據(jù)庫無疑是不可或缺的。不管是SQL SERVER還是MySQL，都屬于常規(guī)的數(shù)據(jù)庫類型，但有時(shí)候我們并不需要那么大的數(shù)據(jù)庫，只是想存儲一些簡單的數(shù)據(jù)。這時(shí)，我們可以選擇使用Excel數(shù)據(jù)庫。
創(chuàng)新互聯(lián)公司是一家專業(yè)提供尚義企業(yè)網(wǎng)站建設(shè),專注與成都網(wǎng)站建設(shè)、成都網(wǎng)站制作、html5、小程序制作等業(yè)務(wù)。10年已為尚義眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專業(yè)網(wǎng)站建設(shè)公司優(yōu)惠進(jìn)行中。
Excel表格作為電子表格軟件的代表，幾乎每個(gè)人都能夠操作它。它不像其他數(shù)據(jù)庫需要專門的軟件來管理，而是以表格的形式存儲，簡單易用。下面，我們來學(xué)習(xí)一下如何在ASP中使用Excel數(shù)據(jù)庫。
一、創(chuàng)建Excel表格
我們需要?jiǎng)?chuàng)建一個(gè)Excel表格來存儲數(shù)據(jù)，新建一個(gè)Excel表格，并在之一行填寫字段名，如下圖所示：
在之一個(gè)工作表中，填寫好數(shù)據(jù)，如下圖所示：
二、連接Excel數(shù)據(jù)庫
在ASP開發(fā)中，使用Excel數(shù)據(jù)庫需要安裝訪問Excel數(shù)據(jù)庫的驅(qū)動(dòng)程序，常見的驅(qū)動(dòng)程序有Jet和ACE。這里我們使用Jet驅(qū)動(dòng)程序。Jet可以連接各種類型的數(shù)據(jù)庫，包括Excel數(shù)據(jù)庫。
在頁面中引用ADODB對象，使用如下代碼打開Excel數(shù)據(jù)庫：
“`asp
Dim conn
Set conn = Server.CreateObject(“ADODB.Connection”)
conn.Provider = “Microsoft.Jet.OLEDB.4.0”
conn.Properties(“Jet OLEDB:Database Password”) = “”
conn.Open “Excel 8.0;HDR=Yes;IMEX=1;DataBase=” & Server.MapPath(“data.xls”)
“`
其中，IMEX=1表示強(qiáng)制將所有列的數(shù)據(jù)類型轉(zhuǎn)換為文本類型，即可以讀寫單元格中的文本或數(shù)字。
三、查詢Excel數(shù)據(jù)庫
查詢Excel數(shù)據(jù)庫和查詢其他類型的數(shù)據(jù)庫基本相同，只需要通過SQL語句來實(shí)現(xiàn)。例如，查詢學(xué)生id為1的記錄：
“`asp
Dim rs
Set rs=Server.CreateObject(“ADODB.Recordset”)
rs.ActiveConnection=conn
rs.Source=”SELECT * FROM [Sheet1$] WHERE 學(xué)生id=1″
rs.Open
“`
四、操作Excel數(shù)據(jù)庫
增加記錄：
“`asp
conn.Execute “INSERT INTO [Sheet1$] VALUES (‘4′,’小D’,’女’,’20’)”
“`
修改記錄：
“`asp
conn.Execute “UPDATE [Sheet1$] SET 年齡=’21’ WHERE 學(xué)生id=’4′”
“`
刪除記錄：
“`asp
conn.Execute “DELETE FROM [Sheet1$] WHERE 學(xué)生id=’4′”
“`
五、關(guān)閉連接
在ASP開發(fā)中，不要忘記在使用完數(shù)據(jù)后關(guān)閉連接，釋放資源?？梢允褂靡韵麓a來關(guān)閉連接：
“`asp
rs.Close
Set rs=Nothing
conn.Close
Set conn=Nothing
“`
六、完整代碼
下面給出一個(gè)完整的ASP頁面，用來演示如何通過ASP使用Excel數(shù)據(jù)庫：
“`asp
<%
Dim conn
Set conn = Server.CreateObject(“ADODB.Connection”)
conn.Provider = “Microsoft.Jet.OLEDB.4.0”
conn.Properties(“Jet OLEDB:Database Password”) = “”
conn.Open “Excel 8.0;HDR=Yes;IMEX=1;DataBase=” & Server.MapPath(“data.xls”)
Dim rs
Set rs=Server.CreateObject(“ADODB.Recordset”)
rs.ActiveConnection=conn
rs.Source=”SELECT * FROM [Sheet1$]”
rs.Open
Response.Write “
Response.Write “
For i=0 to rs.Fields.Count-1
Response.Write “
“
Next
Response.Write “
“
rs.MoveFirst
Do While Not rs.EOF
Response.Write “
For i=0 to rs.Fields.Count-1
Response.Write “
“
Next
Response.Write “
“
rs.MoveNext
Loop
Response.Write “
| “&rs.Fields(i).Name&” |
| “&rs.Fields(i).Value&” |
“
conn.Execute “INSERT INTO [Sheet1$] VALUES (‘4′,’小D’,’女’,’20’)”
rs.Close
conn.Close
Set rs=Nothing
Set conn=Nothing
%>
“`
七、
通過本文的學(xué)習(xí)，我們了解了如何在ASP中使用Excel數(shù)據(jù)庫。Excel表格雖然沒有其他數(shù)據(jù)庫那么大的容量和功能，但對于存儲一些簡單數(shù)據(jù)來說，使用Excel表格作為數(shù)據(jù)庫是一個(gè)不錯(cuò)的選擇。同時(shí)，在ASP中，我們需要注意關(guān)閉連接，釋放資源，以提高程序的性能。
成都網(wǎng)站建設(shè)公司-創(chuàng)新互聯(lián),建站經(jīng)驗(yàn)豐富以策略為先導(dǎo)10多年以來專注數(shù)字化網(wǎng)站建設(shè),提供企業(yè)網(wǎng)站建設(shè),高端網(wǎng)站設(shè)計(jì),響應(yīng)式網(wǎng)站制作,設(shè)計(jì)師量身打造品牌風(fēng)格,熱線:028-86922220求ASP代碼按將EXCEL文件導(dǎo)入數(shù)據(jù)庫，調(diào)試成功后報(bào)答50分！
先通過asp讀取EXCEL
————————————————
Dim Conn,Driver,DBPath,Rs
‘ 建立Connection對象
Set Conn = Server.CreateObject(“ADODB.Connection”)
Driver = “Driver={Microsoft Excel Driver (*.xls)};”
DBPath = “DBQ=” & Server.MapPath( “test.xls” )
‘調(diào)用Open 方法打開數(shù)據(jù)庫
Conn.Open Driver & DBPath
然后再用asp的insert對數(shù)據(jù)庫插入 具體插入方式因數(shù)據(jù)庫類型有一定的差異性
照著我的思路去做 應(yīng)該沒問題
我試過用execl-文本–數(shù)據(jù)庫
你可以反過來,把數(shù)據(jù)庫導(dǎo)出為網(wǎng)頁,看看是些什么代碼,再修改
一分都沒有??？想要代碼就上分吧，我給你代碼！！這類型的東西我做過N次了??！
關(guān)于asp 實(shí)戰(zhàn)excel數(shù)據(jù)庫的介紹到此就結(jié)束了，不知道你從中找到你需要的信息了嗎 ？如果你還想了解更多這方面的信息，記得收藏關(guān)注本站。
成都網(wǎng)站建設(shè)選創(chuàng)新互聯(lián)(?:028-86922220),專業(yè)從事成都網(wǎng)站制作設(shè)計(jì),高端小程序APP定制開發(fā),成都網(wǎng)絡(luò)營銷推廣等一站式服務(wù)。
分享文章：ASP實(shí)戰(zhàn)：使用Excel數(shù)據(jù)庫(asp實(shí)戰(zhàn)excel數(shù)據(jù)庫)
文章源于：http://www.5511xx.com/article/dhppjdp.html
