Jag har problem att koppla ihop VB med två olika databaser. Man ska kunna själv kunna välja vilken databas man vill ansluta sig till.
Ett annat problem som jag har är att testa om kopplingen till respektive databas fungerar. Detta ska man kunna utföra manuellt. Tack på förhand.

Vad är problemet? Klistra in din kod här tillsammans med en beskrivning av ditt problem/felmeddelande så kanske någon kan hjälpa dej.

/Johan

Följande kod finns:

Private Sub Form_Load()
cboFil.AddItem "C:\Test.mdb"
cboFil.AddItem "C:\Test2.mdb"
End Sub

Private Sub cmdConnect_Click()
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Persist Security Info=False" & _
"Data Source=cboFil.Text;"
End Sub


Jag får inga felmeddeladen men får samtidigt ingen kontakt med databasen.
Hur kan man testa ifall kopplingen fungerar?
/Andrej

Hmm
Denna sub gör ingenting

>Private Sub cmdConnect_Click()
> "Provider=Microsoft.Jet.OLEDB.4.0;" & _
> "Persist Security Info=False" & _
>"Data Source=cboFil.Text;"
>End Sub

Du måste koppla den till något commando.
Skapa tex en ADODB connection. Gå in på project-references och skapa en refernece till ADODB-

Deklarera en Connection
Tex
Private Con as adodb.connection

I din sub :
Set con=new Adodb.connection
con.open " DIN CONNECTIONS STRING"

Hoppas detta löser ditt problem
//Nettan