Pytanie : Problem z kod W nowostworzony Dostęp 2007 stół

I próbować stół (tblTopDate) i wartość (dteTopDate) w the nowostworzony table.

The pierwszy część the kod (linia 1-12) praca świetnie.  The tblTopDate stół być stosownie created.

I oznajmiać daktylowy zmienna (dteTopDate) the nowy data od the stół tblSales.

The scond część the kod (linia 15) być dteTopDate
This kod także praca.  I dodawać msgbox i the wartość dteTopDay.

However, gdy I biegać the kod, I dostawać Wchodzić Do Paramater Wartość dla dteTopDate.
If I wchodzić do data, ten data wkładać w the stół.  Co I móc co być dlaczego dteTopDate automatycznie wkładać w the table.

Any pomoc doceniać.

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23:

Private Okręt podwodny cmdImportSales_Click () Ciemnawy dbs Jako Baza danych, tbl Jako TableDef, fld Pole Ciemnawy dteTopDate Data DoCmd.SetWarnings Fałszywy Ustalony dbs = CurrentDb Ustalony tbl = dbs.CreateTableDef ("tblTopDate") Ustalony fld = tbl.CreateField ("TopDate", dbDate) tbl. Fields.Append fld dbs.TableDefs.Append tbl dbs.TableDefs.Refresh 'Znalezisko wierzchołek data w the istniejący tblSales stół dteTopDate = DMax ("InvDate"," [tblSales] ") 'Data być test że the maksymalny data wybierać MsgBox dteTopDate 'Dodawać the Odgórny Data the nowostworzony tblTopDate stół DoCmd.RunSQL "WSZYWKA W [tblTopDate] ([TopDate]) WARTOŚĆ (dteTopDate)" Końcówka Okręt podwodny

Odpowiedź : Problem z kod W nowostworzony Dostęp 2007 stół

DoCmd.RunSQL "WSZYWKA W [tblTopDate] ([TopDate]) WARTOŚĆ (#" & dteTopDate & "#)"