ACCESS資料庫在ASP中的應用

access|資料|資料庫

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

資料庫的串連：
<%
datafile="data.mdb"
set rs=server.createobject("adodb.connection")
conn="DRIVER={Microsoft Access 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%>