Syntax Error In CREATE TABLE

[Terri Hdokins]

I finally figured out how to delete a table and then create a new one. I am now stuck with not being able to add any more columns. My formula doesn't want to allow me to add any fields with the value as DATETIME.
I would greatly appreciate any suggestions. As you can tell I am very new to programming.
Thanks,
Terri Hodkins

On Error GoTo cmdDetailActual_Err

Dim strSQL As String

DoCmd.Echo True, ""
DoCmd.DeleteObject acTable, "tblDetailActual"

strSQL = "CREATE TABLE tblDetailActual" & "(LotNumber TEXT(10),Commodity TEXT(100),RanchPlot TEXT(100),Invoice LONG,TotalAmount CURRENCY)"
DoCmd.RunSQL strSQL

Exit Sub

 

[Jack Cowley]

Terri -

This code worked for me:

strSQL = "CREATE TABLE tblDetailActual (LotNumber TEXT(10),Commodity TEXT(100),MyDate DATETIME,RanchPlot TEXT(100),Invoice LONG,TotalAmount CURRENCY)"
DoCmd.RunSQL strSQL