Microsoft Access運行時錯誤DoCmd.GoToRecord，acNext

爲了簡化用戶，我一直試圖在表單下獲取一組按鈕。只有我通過腳本獲得的問題是我無法獲得下一個記錄按鈕才能工作。這裏我得到一個運行時錯誤2105.Microsoft Access運行時錯誤DoCmd.GoToRecord，acNext

它應該做的是隻顯示下一個存在的記錄，而是給出運行時錯誤並跳過所有其他記錄並轉到最後一個。

任何想法我做錯了什麼？

If Me.ActiveXBestEl92.Enabled = False Then 
    Me.ActiveXBestEl92.Enabled = True 
    End If 

With Recordset 
    If .AbsolutePosition = .RecordCount Then 


    Me.ActiveXBestEl93.Enabled = False 
     Else 


DoCmd.GoToRecord , , acNext 


    End If 
End With 

Exit_Next_Record: 
    Me.ActiveXBestEl93.Enabled = False 

Exit Sub 

Err_Next_Record: 

MsgBox Err.Description 
Resume Exit_Next_Record

在此先感謝

來源

2015-08-25 DoomLuk

試試這個：

With Me.RecordsetClone 
    If .AbsolutePosition = .RecordCount Then 
     Me!ActiveXBestEl93.Enabled = False 
    Else 
     .MoveNext 
    End If 
End With

或本：

With Me.RecordsetClone 
    If Me.CurrentRecord = .RecordCount Then 
     Me!ActiveXBestEl93.Enabled = False 
    Else 
     .MoveNext 
    End If 
End With

來源

2015-08-25 12:15:50 Gustav

對不起，但它沒有工作，現在的問題是不同勢..它會顯示所有記錄並自動轉到下一個記錄。對於每條記錄，絕對位置保持-1。所以錯誤給出錯誤3021，沒有當前記錄 – DoomLuk

然後嘗試使用CurrentRecord，如上所示。 – Gustav

它不像.MoveNext，所以我把整個概念放在一起。現在它似乎可以處理超過1000條記錄而沒有問題 – DoomLuk

Microsoft Access運行時錯誤DoCmd.GoToRecord，acNext

回答

相關問題