VB.net 2010 - Create Access database

See more:

VB

MS-Access

I've been working on a system that runs across multiple workstations, the server creates an access database that is processed by remote systems.

I have the database/table creation working, problem comes when the creation is complete, the server keeps the database opened which means the database can't be moved to the remote system.

Below is test code that will reproduce the same issue.

Dim Database As String = "C:\Database.mdb"
Do
    Try
        If File.Exists(Database) Then File.Delete(Database)
        Dim cat As New ADOX.Catalog()
        cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Database)
        cat = Nothing
    Catch ex As Exception
    End Try
    Sleep(5)  ' Code not displayed but does not put the app to sleep just a delay with application.doevents...
Loop

Checking to see if there is something I'm missing or if there is another way to create and release the database....?