Question

vb ado 删除

我的数据库是D:\123.mdb
表名：员工
字段：id name
________________________________
有一个文本框 text1.text
比如说text1.text =" 张三"
我想删除数据库里的张三是一项怎么写呢？

如果数据库里有多个 "张三" 是不是写法一样呢？
谢谢！
一楼的为什么会提示
试着不先使用“BeginTrans而提交或退回事务。呢？

Answer 1

可以用SQL语句删除或者用recordset对象删除，1楼的是用SQL语句来删除记录的。。用recordset对象删除应该是定位到要删除的记录然后rs.delete
如果要删除多个张三的记录，用语句可以删除所有符合条件的记录，用rs.delete则要循环删除。。

Answer 2

dim cn as adodb.connection
dim rs as adodb.recordset
dim tsql as string
set cn=new adodb.connection
cn.open "driver={microsoft access driver (*.mdb);dbq=d:\123.mdb}","admin",""
set rs=new adodb.recordset
tsql="select * from 员工 where name='"+trim(text1.text)+"'"
rs.open tsql,cn,1,3
if rs.recordcount>0 then
cn.execute "delete from 员工 where name='"+trim(text1.text)+"'"
end if
cn.execute "commit"
set rs=nothing
set cn=nothing

如果表中有多个“张三”，你删除时可以根据员工表的ID来操作，一般来说每个ID不会重复。