Questione : Problema con il codice DA INSERIRE nella tabella di recente creazione di accesso 2007

Sto provando a generare una tabella (tblTopDate) ed ad inserire un valore (dteTopDate) nella prima parte di recente creazione di table.

The del lavoro di codice (linee 1-12) benissimo.  La tabella del tblTopDate è correttamente created.

I dichiarato una variabile di data (dteTopDate) per selezionare la più nuova data a partire dalla parte dello scond della tabella tblSales.

The del codice (linea 15) è di selezionare gli impianti di codice del dteTopDate
This anche.  Ho aggiunto un msgbox per provare e mostrare il valore di dteTopDay.

However, quando faccio funzionare il codice, ottengo un valore di Paramater di introduzione che chiedo dteTopDate.
If che entro in una data, questa data sono inserito nella tabella.  Che cosa non posso calcolare fuori è perché il dteTopDate non è inserito automaticamente nell'aiuto di table.

Any sarà apprezzato. class= " lineNumbers " >

1 del >
Private " codeBody " " del prettyprint " ()

Dbs fiochi come base di dati, tbl come TableDef, fld come campo
dteTopDate fioco come data

DoCmd.SetWarnings falso
Regolare i dbs = CurrentDb
Regolare il tbl = dbs.CreateTableDef (“tblTopDate„)
Regolare il fld = tbl.CreateField (“TopDate„, dbDate)
fld del tbl. Fields.Append
tbl di dbs.TableDefs.Append
dbs.TableDefs.Refresh

'Data superiore del ritrovamento nella tabella attuale dei tblSales
dteTopDate = DMax (“InvDate„,„ [tblSales] ")

'Questa è una prova per verificare che la data massima stia selezionanda
dteTopDate di MsgBox

'Aggiungere la data superiore alla tabella di recente creazione del tblTopDate
DoCmd.RunSQL “INSERTO [tblTopDate] ([TopDate]) NEI VALORI (dteTopDate)„

Sommergibile dell'estremità
class= > " libero " di 

  
  class= del 

Risposta : Problema con il codice DA INSERIRE nella tabella di recente creazione di accesso 2007

DoCmd.RunSQL “INSERTO [tblTopDate] ([TopDate]) NEI VALORI (#„ & dteTopDate & “#)„