錯誤3219-無效操作

我嘗試在我的Access項目中編寫一個查詢，但是這個運行時錯誤發生在SQL查詢所在的行中。這是我的代碼：錯誤3219-無效操作

Private Sub Befehl80_Click() 

    Dim rst As DAO.Recordset 
    Set rst = CurrentDb.OpenRecordset("SELECT DISTINCT tb_KonzeptDaten.DFCC, tb_KonzeptDaten.OBD_Code AS Konzept_Obd,tb_KonzeptDaten.DFC INTO Test_Table FROM tb_KonzeptDaten", dbOpenDynaset) 

    Me.txtDs = rst.RecordCount 

End Sub

你能告訴我我該如何解決這個問題，爲什麼這個錯誤發生？

來源

2012-09-04 Kabi

sql是一個動作查詢，它創建一個表。您無法從動作查詢中打開記錄集。如果你想運行動作查詢，你可以說：

Set db=CurrentDB 
ssql="SELECT DISTINCT tb_KonzeptDaten.DFCC, " _ 
    & "tb_KonzeptDaten.OBD_Code AS Konzept_Obd,tb_KonzeptDaten.DFC " _ 
    & "INTO Test_Table FROM tb_KonzeptDaten" 
db.Execute ssql, dbFailOnerror 

RecordsUpdated=db.RecordsAffected

來源

2012-09-04 09:01:48 Fionnuala

和我應該用什麼來代替？ – Kabi

我已經添加了關於運行動作查詢的註釋，但我不太確定你想要做什麼。 – Fionnuala

謝謝Remou，你回答了我的問題 – Kabi

錯誤3219-無效操作

回答

相關問題