Create Access table with vb/net then insert

[adebiasio]

I have a procedure that uses ADOX to create a database with a table.
That works fine. I then need to populate that table with a record but
the code is not working. I believe that the database is still locked.

Dim lcat as New ADOX.Catalog
Dim ltbl As New ADOX.Table

lcat.Create(connection)

' Code to create table.

ltbl = Nothing
lcat = Nothing

In the same procedure, I create a connection to execute a INSERT
command, but an error is generated on the lcnn.open()

Dim lcnn As Data.OleDb.OleDbConnection

lcnn = New Data.OleDb.OleDbConnection(lstrConnection)
lcnn.Open()

Thanks!

 

[Cor Ligthert [MVP]]

adebiasio,

Have a look at this sample, it uses only the ADOX to create the database and
than for the table and columns ADONET.

In the way that the last is done you can also do it with your insert
statements in the executenonquery.

http://www.vb-tips.com/default.aspx?ID=e76b8450-4c8a-4662-8f41-d6dda3c888c8

I hope this helps,

Cor

 

[Paul Clement]

On 5 Dec 2005 13:52:35 -0800, (e-mail address removed) wrote:

¤ I have a procedure that uses ADOX to create a database with a table.
¤ That works fine. I then need to populate that table with a record but
¤ the code is not working. I believe that the database is still locked.
¤
¤ Dim lcat as New ADOX.Catalog
¤ Dim ltbl As New ADOX.Table
¤
¤ lcat.Create(connection)
¤
¤ ' Code to create table.
¤
¤ ltbl = Nothing
¤ lcat = Nothing
¤
¤ In the same procedure, I create a connection to execute a INSERT
¤ command, but an error is generated on the lcnn.open()
¤
¤ Dim lcnn As Data.OleDb.OleDbConnection
¤
¤ lcnn = New Data.OleDb.OleDbConnection(lstrConnection)
¤ lcnn.Open()


You might want to post your code and identify the error and where it is occurring.


Paul
~~~~
Microsoft MVP (Visual Basic)

 

[adebiasio]

Thanks for your help. Sometimes the simplist error is ignored. I had
a syntax error in the INSERT.

Thanks!