|
我把ACCESS數(shù)據(jù)庫,轉(zhuǎn)為SQL2000后就出現(xiàn)以下錯誤了!
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
|