[ASP] asp对数据库的基本操作

一、添加记录

方法1:Connection对象的Execute方法

set con=Server.CreateObject("ADODB.Connection")
insertstr="insert into 表名(字段1,字段2,...) values(value1,value2,...)  '插入记录SQL语句
con.Open constr
con.Execute(insertstr)
con.close
set con=nothing
-------------------------------------------------------------------------------------------
方法二:RecordSet对象的AddNew方法

set con=Server.CreateObject("ADODB.Connection")
set rs =Server.CreateObject("ADODB.RecordSet")
querystr="select * from 表名"                '查询记录SQL语句
con.open constr
rs.open querystr,con,1,3

rs.AddNew
rs("字段1")=value1
rs("字段2")=value2
......
rs.Update

rs.close
set rs=nothing
con.close
set con=nothing

二、查询记录

set con=Server.CreateObject("ADODB.Connection")
set rs =Server.CreateObject("ADODB.RecordSet")
querystr="select 字段 from 表名 where ...."             '查询记录SQL语句
con.open constr
rs.open querystr,con,1,1

do while not rs.EOF do
'读取数据
  变量1=rs("字段1")
  变量2=rs("字段2")
  ...
loop

rs.close
set rs=nothing
con.close
set con=nothing

 三、修改记录

方法一:Connection对象的Execute方法

 set con=Server.CreateObject("ADODB.Connection")
 con.open constr
 updatestr="update 表名 set 字段1=value1，字段2=value2 where id=..."   '更新记录SQL语句
 con.Execute(updatestr)
 con.close
 set con=nothing
----------------------------------------------------------------------
方法二:RecordSet对象的Update方法
 
 set con=Server.CreateObject("ADODB.Connection")
 set rs= Server.CreateObject("ADODB.RecordSet")
 querystr="select 字段 from 表名 where ...."             '查询记录SQL语句
 con.open constr    
 rs.open  querystr,con,1,3
 rs("字段1")=value1
 rs("字段2")=value2
 ...
 rs.Update

 rs.close
 set rs=nothing
 con.close
 set con=nothing

四、删除记录

set con=Server.CreateObject("ADODB.Connection")
deletestr="delete from 表名 where id="&id          '删除记录SQL语句
con.open constr
con.Execute(deletestr)
con.close
set con=nothing