>Can somebody help me with the proper syntax for the field commands in this sequence? (and the values for dbText and dbMemo)
>Thanks
>

>oAccess = createobject("Access.application")
>oAccess.visible= .t.
>
>newMDB = oAccess.NewCurrentDatabase("C:\accesstest")
>tdfnew = oAccess.CurrentDb.CreateTableDef('testtable')
>	
>with tdfnew
>.fields.append .CreateField("FirstName", "dbText")
>.fields.append .CreateField("LastName", "dbText")
>.fields.append .CreateField("Phone", "dbText")
>.fields.append .CreateField("Notes", "dbMemo")
>newMDB.TableDefs.append tdfnew
>endwith
>

I happen to know 10 from documentation. Documentation is so weak that I don't know what would it be if boolean, date ...

oAccess = createobject("Access.application")
oAccess.visible= .t.

oAccess.NewCurrentDatabase("C:\accesstest.mdb")
newMDB = oAccess.CurrentDb
tdfnew = oAccess.CurrentDb.CreateTableDef('testtable')
	
with tdfnew
.fields.append( .CreateField("FirstName", 10) )
.fields.append( .CreateField("LastName", 10) )
.fields.append( .CreateField("Phone", 10) )
.fields.append( .CreateField("Notes", 10) )
ENDWITH
newMDB.TableDefs.append( tdfnew )

Cetin