在这个按钮的click事件过程中,用(如为MSSQL): delid=5 sqlstr="delete from tb1 where id=" & delid & "; delete from tb2 where id=" & delid conn.execute(sqlstr) 如果你能管理数据库,还可以在一个表上建一个触发器,在触发器中创建一段程序,删除另一个表的相同记录.
没关系的,可以删。假定你的仪器编号是唯一的。否则,你在 Where 子句中要再加条件。With ADODC1.Recordset .ActiveConnection.Execute "DELETE FROM 第二张表 WHERE 仪器编号='" & .Fields("仪器编号") & "'" .ActiveConnection.Execute "DELETE FROM 第一张表 WHERE 仪器编号='" & .Fields("仪器编号") & "'" .Requery End With
delid=5
sqlstr="delete from tb1 where id=" & delid & "; delete from tb2 where id=" & delid
conn.execute(sqlstr)
如果你能管理数据库,还可以在一个表上建一个触发器,在触发器中创建一段程序,删除另一个表的相同记录.
报语法错误!!!
可能是我没说清楚!!
我将access数据库中的一个表数据(另一个表中包含相同的数据记录)显示在DATAGRID中,我设置了一个按钮控件,点击删除datagrid中的某一行,希望同时删除上面两个表中包含的记录!!
谢谢望再次解答!!!!!!!
数据是通过adodc控件得到的,直接在其属性列表里设置的connectstring及recordset属性设置的;
datagrid的datasource属性设置了adodc
你的ADODB是连接着一个表的,而另一个表与它无关.在ACCESS里又不能创建触发器.
或许在ACCESS里能用模块解决.建议到ACCESS版去问一下.
没关系的,可以删。假定你的仪器编号是唯一的。否则,你在 Where 子句中要再加条件。With ADODC1.Recordset
.ActiveConnection.Execute "DELETE FROM 第二张表 WHERE 仪器编号='" & .Fields("仪器编号") & "'"
.ActiveConnection.Execute "DELETE FROM 第一张表 WHERE 仪器编号='" & .Fields("仪器编号") & "'"
.Requery
End With