
Is there a method in ADO similar to CreatDataBase in DAO ?
Quote:
>ADO doesn't provide much by way of DDL (Data Definition Language)
>functionality. It assumes you have an intelligent back-end server for such
>work, and so concentrates on DML tasks.
>In that sense, unlike with DAO, you can't create databases and the like on
>the fly. However you *can* execute arbitrary SQL with ADO, and the SQL can
>create a database, or whatever.
I find this to be an interesting statement as I'm using ADO 2.1 to completely
create an Access DB "on the fly" if it's not found. =)
The library you need is "Microsoft ADO Ext. for DDL and Security" (ADOX).
Below is the code I'm using to create the db and a single table...the project
is under development:
-Curtis Spendlove
-Solstice Software
-----
Private Const kMSJetOLEDB351 = "Microsoft.Jet.OLEDB.3.51;"
Private Sub cmdCreate_Click()
Dim cat As ADOX.Catalog
Dim tbl As ADOX.Table
Set cat = New ADOX.Catalog
cat.Create "Provider=" & kMSJetOLEDB351 & "Data Source=" & App.Path &
"\plnesage.mdb" & ";"
Set tbl = New ADOX.Table
tbl.Name = "tblUserMaster"
tbl.Columns.Append "um_id", adInteger
tbl.Columns.Append "um_uname", adVarChar, 20
tbl.Columns.Append "um_upswd", adVarChar, 20
tbl.Columns.Append "um_fname", adVarChar, 20
tbl.Columns.Append "um_lname", adVarChar, 20
cat.Tables.Append tbl
Set tbl = Nothing
Set cat = Nothing
Form_Load
End Sub
-----