|
我把ACCESS数据库,转为SQL2000后就出现以下错误了!
Private Sub 列表36_AfterUpdate()
Dim Rst As Recordset
Set Rst = CurrentDb().OpenRecordset("tabRight")
Rst.Index = "PrimaryKey" '<----------------------这里报错,说:行运时错误'3251':这种对象类型不支持该操作.请问老师用什么代码替换呢
Rst.Seek "=", Me.列表38, Me.列表36
If Rst.NoMatch Then
Me.复选53 = False
Me.复选56 = False
Else
If Rst![Right] = 1 Then
Me.复选53 = True
Me.复选56 = False
Else
If Rst![Right] = 2 Then
Me.复选53 = False
Me.复选56 = True
Else
Me.复选53 = False
Me.复选56 = False
End If
End If
End If
End Sub
在些先谢过...
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|