计算机软件开发专业中,每一种语言的开发都离不开数据库的应用,所为学习编程重点在于数据库的应用及灵活的编程思想。以下向大家介绍一下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%>
