Cuestión : Problema con el código A INSERTAR EN la tabla creada recientemente del acceso 2007

Estoy intentando crear una tabla (tblTopDate) e insertar un valor (dteTopDate) en la primera pieza creada recientemente de table.

The del trabajo del código (líneas 1-12) muy bien.  La tabla del tblTopDate es correctamente created.

I declarado una variable de fecha (dteTopDate) para seleccionar la más nueva fecha de la pieza del scond de la tabla tblSales.

The del código (línea 15) es seleccionar trabajos del código del dteTopDate
This también.  Agregué un msgbox para probar y demostrar el valor de dteTopDay.

However, cuando funciono con el código, consigo un valor de Paramater de la entrada que pide dteTopDate.
If que incorporo una fecha, esta fecha me inserto en la tabla.  Qué no puedo imaginar es porqué el dteTopDate no se inserta automáticamente en la ayuda de table.

Any será apreciado. class= " lineNumbers " >

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

Dbs déviles como base de datos, tbl como TableDef, fld como campo
dteTopDate dévil como fecha

DoCmd.SetWarnings falso
Fijar los dbs = CurrentDb
Fijar el tbl = dbs.CreateTableDef (el “tblTopDate”)
Fijar el fld = tbl.CreateField (“TopDate”, el dbDate)
fld del tbl. Fields.Append
tbl de dbs.TableDefs.Append
dbs.TableDefs.Refresh

'Fecha superior del hallazgo en la tabla existente de los tblSales
dteTopDate = DMax (“InvDate”,” [tblSales] ")

'Esto es una prueba para verificar que se está seleccionando la fecha máxima
dteTopDate de MsgBox

'Agregar la fecha superior a la tabla creada recientemente del tblTopDate
DoCmd.RunSQL “PARTE MOVIBLE EN [tblTopDate] ([TopDate]) los VALORES (dteTopDate)”

Submarino del extremo
class= > " claro " de 

  
  class= del 

Respuesta : Problema con el código A INSERTAR EN la tabla creada recientemente del acceso 2007

DoCmd.RunSQL “PARTE MOVIBLE EN [tblTopDate] ([TopDate]) VALORES (#” y dteTopDate y “#)”