我试了还是不行,请版主检查
Private Sub Command5_Click()
'判断是否选择了表中的一行
If Adodc4.Recordset.EOF = True Or Adodc4.Recordset.BOF = True Then
MsgBox "请选择做检查人员的列"
Exit Sub
End If
With Adodc4
.Recordset.Fields("TFSign") = 1
'修改数据值
'.Recordset.Fields("sendtime") = Now()
'修改数据
On Error Resume Next
.Recordset.Update
'刷新纪录
.Recordset.Requery
End With
With Adodc6
.Recordset.Requery
End With
With Adodc5
.Recordset.Requery
End With
End Sub
以前是修改时出现报错,要求调试,但可以修改成,现加上后还是出现报错误:
“DataGrid控件 键列信息不足或不正确,更新影响到多行。“
点第一次时可以修改,以后反复出现以上提示并不能修改数据,
最好是将以上提示给屏避并可多次修改,
请版主再抽出时间帮个忙看一看,先谢了。