Creating Tables with ADO

[LeoKoach]

Hello again,
I am here with anopther easy(!) question for most. What am I going to select from references to creat Access Table with ADO 2.7?

Thanks a mil...

Leo

[dinesh123]

Dim conn as new adodb.connection

conn.execute "Create Table tt ( [Fileds1] number,[Field2] text(25))"

[JeffB]

Should also work with 2.7 ( mine with ADO 2.5)

Private Sub Command1_Click()
    Dim db As ADODB.Connection
    
    Set db = New ADODB.Connection
    
    db.ConnectionString = Adodc1.ConnectionString
    db.Open
    
    
    db.Execute ("CREATE TABLE TableToto(NameOfMyField1 TEXT, NameOfMyField2 TEXT)")
    
    db.Close
    
    
End Sub

JeffB - hope it helps

[LeoKoach]

Thanks