| View previous topic :: View next topic |
| Author |
Message |
Avis
Junior Poster
Joined: 07 Oct 2003
Posts: 510
Location: India
|
|
| Back to top |
|
pradeep
Newbie
Joined: 08 Oct 2003
Posts: 14
Location: INDIA
|
 Posted: Oct 18th, 2003 06:16 AM Post subject: |
 |
|
| Code: |
'DAO
Sub DAOCreateDatabase()
Dim db As DAO.Database
Set db = DBEngine.CreateDatabase(".\TempDB.mdb", dbLangGeneral)
End Sub
'ADOX
Sub ADOCreateDatabase()
Dim cat As New ADOX.Catalog
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=.\TempDB.mdb;"
End Sub
|
|
|
| Back to top |
|
|
