2010-12-12 69 views

回答

0

,您可以運行SQL或VBA查詢,例如:

Set db = CurrentDB 

sSQL="INSERT INTO Table2 (FKID, Stuff) VALUES (" & Me.ID & ",'" & Me.Stuff & "')" 
db.Execute sSQL, dbFailOnError 

MsgBox "Records inserted " & db.RecordsAffected 

或者,如果你已經建立了一個合適的查詢:

DoCmd.OpenQuery "QueryName" 

請注意,如果您要添加到表,因爲你想添加額外的項目到組合框列表中,搜索NotInList,你會發現一些建議。

0

的一種方式(出許多): - 在按鈕的單擊事件:

currentdb.execute "insert into table2 (col1, col2) select 'some_string', 12345;" 
+0

一個DAO .Execute不應該被稱爲沒有dbFailOnError開關和錯誤處理程序。 – 2010-12-13 00:08:49

相關問題