ASP操作ACCESS数据库
操作数据库请按照下面的步骤来操作。
一、建立一个ACCESS数据库，使用设计器设计一个表，加一个字段，字段名为ID，数据类型为自动编号，再增加一个字段，名字为NAME，数据类型为文本，然后保存，保存表名为BOOK。关闭数据库，然后并把这个数据库文件名改为book.mdb。
二、建立一个文本文件，在里面输入如下信息
<%
' 连接数据库
dim ConnStr,Conn,rs,i
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("book.mdb")
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnStr
If Err Then
Err.Clear
Set Conn = Nothing
response.write "数据库连接失败..."
Response.End()
End If
'查询数据库
Sql="select * from book order by id desc"
Set Rs = Server.CreateObject("Adodb.RecordSet")
Rs.Open Sql,Conn,1,1
f then
response.write "还没有数据"
else
for i=0 dcount
f then exit for
response.write "ID:"&RS("id")&" 名字："&RS("name")&""&chr(10)
next
rs.close
conn.close
set rs=nothing
set conn=nothing
end if
%>
三、将这个文本文件保存并改成index.asp，再打开刚才的数据库，打开表book，在name字段里面输入一些字符，然后关闭。
四、将index.asp和book.mdb上传到服务器，访问www.你的域名/index.asp，将会看到你刚才在数据库里输入的字符。
以下是一些数据库操作的简单代码
---------------------------------------------------
第一步
确定已经连接数据库了
开始--查询，修改、删除等操作，代码如下
<%
'查询数据库
asp数据'刚才上面已经有了
'添加数据
Sql="select * from book"
Set Rs = Server.CreateObject("Adodb.RecordSet")
Rs.Open Sql,Conn,1,2
RS.addnew
rs("name")="你想要添加的数据" '可以用表单形式提交，用request("name")形似获取表单中的数据
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
'数据更新
Sql="select * from book where id=1" '更新ID=1的数据，具体条件你自己设置
Set Rs = Server.CreateObject("Adodb.RecordSet")
Rs.Open Sql,Conn,1,2
rs("name")="你想要更改的信息" '可以用表单形式提交，用request("name")形似获取表单中的数据
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
'删除数据
set ute("detele * from book where id=1") '删除ID=1的数据，具体条件你自己设置！
%>

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。