ایجاد table در موقع اجرا

[j_n_0229]

سلام
با چه دستوری می توانم در حین اجرای یک برنامه table جداگانه با فیلدهای مشخص بسازم(در VB6).
وقتی creat Table - name table را داخل پرانتز نام فیلد و نوع فیلد را میزنم خطا می گیرد؟

create table nametable (namefiled tapefield) وقتی دستور فوق را وارد می کنم خطا می گیرد؟

[mortez maya]

با سلام خدمت این دوست عزیز اولا به خاطر اینکه فارسی رو پاس داشتید و به جای کلمه ناهمگون "ارور" از خطا استفاده کردید ممنونیم.
دوم بگید که چه خطایی می ده؟
و سوم اینکه از طریق دستورات SQL این کار به راحتی امکان پذیره اگه خواستید می تونم راهنمایی تون کنم./

[sjj]

Private Sub CreateNewTable_Rasmi()

Dim DBSRasmi As Database
Dim NewTable As TableDef
Set DBSRasmi = OpenDatabase(App.Path + "ListRasmi.mdb", True, False)
Set NewTable = DBSRasmi.CreateTableDef(TableName) 'TableName
With NewTable
.Fields.Append .CreateField("EmpID", dbText) 'Field Name and Size
.Fields.Append .CreateField("FName", dbText)
.Fields.Append .CreateField("LName", dbText)
.Fields.Append .CreateField("Salary", dbLong)
End With
DBSRasmi.TableDefs.Append NewTable 'Append The Table Into DataBase File
DBSRasmi.Close

End Sub

[mortez maya]

این sjj از بچه های گل روزگاره من به جای j_n_0229 ازش تشکر می کنم.