vb ado 删除

来源:百度知道 编辑:UC知道 时间:2024/05/02 09:42:11
我的数据库是D:\123.mdb
表名:员工
字段:id name
________________________________
有一个文本框 text1.text
比如说text1.text =" 张三"
我想删除数据库里的张三是一项怎么写呢?

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

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

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不会重复。