ASP操作数据库常用简单代码

其实ASP，PHP等语言对数据库的操作语法都是一样的，掌握一种方法，就能明白看明白其他语言对数据库的操作。

<%
dim db,conn,connstr
Db="data/online.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
 connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(Db)
conn.Open connstr
%>

以上是数据库链接代码，存储为conn.asp

=============================
要用到数据库的页就在页面引用
=============================
<!–#include file="conn.asp"–>

=======================
数据库记录查询
=======================
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from [数据表] "
rs.open sql,conn,1,1
或
set rs=conn.execute("select * from [数据表] ")
注:记录存放到rs中
引用值: rs("字段名")

=======================
添加数据库新记录
=======================
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from [数据表] "
rs.open sql,conn,1,3
rs.addnew
rs("字段1")=trim(Request.Form("表单域名称1"))
rs("字段2")=trim(Request.Form("表单域名称2")
rs.update
rs.close
或
sql="insert into [数据表](字段1,字段2,字段3,字段4) values(‘"&变量1&"’,’"&变量2&"’,"&变量3&",’"&变量14&"’)"
conn.execute(sql)
注:变量3为数值型,所以不用两个单引号包含. 例: ‘变量2’ 变量3

=======================
修改数据库记录
=======================
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from [数据表] where ID="&Request.Query("ID")
rs.open sql,conn,1,3
rs.update
rs("字段1")=trim(Request.Form("表单域名称1"))
rs("字段2")=trim(Request.Form("表单域名称2")
rs.update
rs.close
或
sql="update [数据表] set 字段1=’"&变量1&"’,字段2=’"&变量2&"’,字段3="&变量3&",字段4=’"&变量4&"’ where ID="&Request.Query("ID")
conn.execute(sql)
注:变量3为数值型,所以不用两个单引号包含. 例: 字段2=’变量2′ 字段3=变量3

在必要时清除记录集及连接(页面执行完毕后,ASP会自动清除)
set rs=nothing
set conn=nothing