Question

asp如何增加和删除Access数据库记录

我要的是格式！
数据库名、表名、等用中文代替
VBS的

Answer 1

连接数据库的语句就不写了.

<%
'添加记录
'假设conn是你定义的数据库连接
conn.execute("insert into 表名(字段1,字段2...) values(值A,值B,...)")
'字段1 和 字段2 分别对应 值A 和 值B,字段与值的位置一一对应
conn.close
%>

<%
'删除记录
'假设conn是你定义的数据库连接
conn.execute("delete from 表名 where 字段=值")
'这个值,是你要删除的记录中所包含的一个值.
conn.close
%>

语句不分大小写,如果是一个值,要用"值"引着(就是shift键+Enter左边的那个).
如果是一个变量且该字段为文本,则要用'"& 变量名 &"'这样的格式(因为它在引号里).如果要写入该字段的变量是数值,则用"& 变量名 &"(把单引号删掉)

Answer 2

set rs=server.CreateObject("adodb.recordset")
sql="wenzhang"
rs.Open sql,conn,3,3
rs.addnew
rs("dianji")=dianji
rs("content")=content
rs.update
rs.close
set rs=nothing
response.Redirect("news_Manager.asp")

<%
dim phoid,rs,sql,id
id=request("phoid")
'zgid=session("zhigongid")
sql="delete from xhphotos where phoid="&id
conn.Execute sql
response.Write"<script language='javascript'>alert('删除成功！');location.href='photo_manager.asp'</script>"
%>

Answer 3

<%
'添加
dim rs,sql
sql="select * from [表名]"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,3,3
rs.addnew
rs("title")=request("title")
rs("Time")=Date()
rs("content")=request("content")
rs.update
rs.close
set rs=nothing

'删除
contentID=request("ID")
set rs=server.createobject("adodb.recordset")
sqltext="delete from [字段] where Id="& contentID
rs.open sqltext,conn,3,3
rs.close
set rs=nothing
%>
上面是一种方法了。用的时候注意过滤！