Database Naming

[ukjock]

Hi everyone I have a small problem with my database creation.

 

I am trying to create a database in a direcotry as specified by the user, but I want to title the database myself.

 

So I have the following code:

 

       Dim database As String
       database = TextBox1.Text & "\mydb.mdb"

       Dim cat As Catalog = New Catalog

       cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & (database) & "Jet OLEDB:Engine Type=5")

       cat = Nothing

 

problem is that it names the database "mydb.mdbJet OLEDB".

 

I can see how and why it is doing this but I can not rectify how to stop it.

 

Any help appreciated.

 

Thanks

 

Chris

[PlausiblyDamp]

Just guessing but shouldn't it be something like

cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & (database) & ";Jet OLEDB:Engine Type=5")

note the extra semi-colon after the filename.

[ukjock]

Just guessing but shouldn't it be something like

cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & (database) & ";Jet OLEDB:Engine Type=5")

note the extra semi-colon after the filename.

 

 

Darn it! Your right, I must have overlooked that little blighter.

 

Thanks for your help

 

c