我想在表一添加(或删除)学号的同时,表二的学号能否也能自动添加(或删除)该新的学号
我在ACESS2000的数据库DB1里建了两张表,表一和表二,两张表的第一的字段都是学号,该字段的索引均为有无重复的!我想在表一添加(或删除)学号的同时,表二的学号能否也能自动添加(或删除)该新的学号?
我是用ADODB.Connection来连接ACESS2000的数据库的!
Private Conn As ADODB.Connection
Private Rst As New ADODB.Recordset
其添加按钮的代码如下:
Private Sub ADD_Click()
'Set Rst = CreateObject("ADODB.Recordset")
If (Rst.State = adStateOpen) Then
Rst.Close
End If
Rst.CursorLocation = adUseClient
Rst.Open "Select * From zymc1", Conn, adOpenKeyset, adLockPessimistic
Rst.AddNew
Rst.Fields("dm").Value = Text1.Text
...
...
Rst.Update
MsgBox "添加成功!"
...
...
End Sub