嘗試將值插入到Access數據庫中的操作無效

Question

我在下面有這段代碼，當我嘗試運行它時，它在代碼的最後一行上顯示錯誤消息「Invalid Operation」，並崩潰。所有的語法看起來都正確。我究竟做錯了什麼？所以你不應該使用.OpenRecordset運行它

PCycle = PreviousCycle(CurrentCycle(Me.cobMainType.Value), mainType(Me.cobMainType.Value)) 

SQL = "INSERT INTO tblVehMainType (MainID, PartID, VehTypeID)" 
SQL = SQL & " Select " & Me.cobMainType & ", PartID, VehTypeID" 
SQL = SQL & " From tblVehMainType " 
SQL = SQL & " WHERE vehTypeID = " & Me.cobVehType & " AND MainID = " & PCycle & ";" 

Set rst = CurrentDb.OpenRecordset(SQL) 

Answer 1

的INSERT語句不返回記錄集。您應該改用.Execute。