标题: 修改保存出错? [打印本页] 作者: JANDJ 时间: 2008-3-25 17:00 标题: 修改保存出错? 客户需求主表双击打开修改后无法保存(只能保存最近的一条记录)?
我看了一下这段代码(客户需求表中)
Private Sub 存()
Dim STemp As String
Dim STemp1 As String
Dim rs As ADODB.Recordset
Dim rs1 As ADODB.Recordset
Set rs = New ADODB.Recordset
Set rs1 = New ADODB.Recordset
STemp = "select * from 客户需求表"
STemp1 = "select * from 表1"
rs.Open STemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs1.Open STemp1, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
.........