ACCESS數據庫在ASP中的應用

　　本人是計算機軟件開發專業的,根據本人總結:覺得每一種語言的開發都離不開數據庫的應用,所為學習編程重點在于數據庫的應用及靈活的編程思想。以下本人向大家介紹一下ASP語言中ACCESS數據庫的連接及其幾個操作：

數據庫的連接：
<%
datafile="data.mdb"
set rs=server.createobject("adodb.connection")
conn="DRIVER={Microsoft Aclearcase/" target="_blank" >ccess Driver (*.mdb)}; data source=" & server.mappath(""& datafile &"")
rs.open conn
%>

添加數據：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename"　　@#tablename為數據中表的名稱
rs.open sql,conn,1,1
rs.addnew
rs("data1")="new1"
rs("data2")="new2"
rs("data3")="new3"
……
rs("datan")="newn"
rs.update
rs.close
conn.close
set rs=nothing
set sql=nothing
%>

刪除數據：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename where del=del"　@#第二個del為你想要刪除的數據
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "數據不存在"
else
rs.delete
response.write "數據已經刪除"
end if
%>

數據查詢：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename where data=data"　@#第二個del為你想要查詢的數據,也可為多個，用“，”號分開
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "數據不存在"
else
rs.delete
response.write rs("data")　@#如果有多個相同的數據，這可用for ……next 循環語句
end if
%>

數據顯示：
<%
set rs=server.createobject("adodb.recordset")
sql="select*from tablename"　　
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "數據庫中沒有數據"
else
while not rs.eof
response.write rs("data1")　
response.write rs("data2")
response.write rs("data3")
……
response.write rs("datan")
rs.movenext
wend
end if%>

原文轉自：http://www.kjueaiud.com