> Dim cn1 As New ADODB.Connection > Dim cm1 As New ADODB.Command > cn1.Open "Driver=Microsoft Visual Foxpro Driver;UID=;SourceType=DBF;Deleted=YES;Null=NO;SourceDB=D:\" > cm1.ActiveConnection = cn1 > cm1.CommandType = adCmdUnknown > cm1.CommandText = "CREATE TABLE mytable.dbf (Value1 C(12),Value2 C(11),Value3 C(30))" > cm1.Execute >I didn't tried it but can the "ALTER TABLE" do the job?