前提:
set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source ="& Server.MapPath("数据.mdb")
更新记录
set rs=server.createobject("adodb.recordset")
sql="select * from gonghui where id='"&idid&"'"
rs.open sql,conn,3,3
rs("webname") =webname
rs.update
rs.close
set rs=nothing
增加新记录
set rs=server.createobject("adodb.recordset")
sql="select * from gonghui where id='"&idid&"'"
rs.open sql,conn,3,3
rs.addnew
rs("webname") =webname
rs.update
rs.close
set rs=nothing
删除记录:
IF Request("action")="del" Then
sql="delete from 表名 where id="&Request("id")
Conn.execute(sql)
End IF