Problem mit Access-Pfad

[sozialesAbseits]

Hallo allerseits.

Ich bin gerade dabei, in die DB-Programmierung mit VB6 einzusteigen.
Dazu hab ich jetzt eine kleine Frage, die hoffentlich leicht zu beantworten sein wird:

Ich habe in mein Projekt ein ADO-Steuerelement eingebunden und ihm mit Hilfe der ConnectionString-Eigenschaft unter anderem den Pfad der Datenbank mitgegeben (D:\testprojekt\db1.mdb) . Das klappt auch alles soweit.

Bei der Erstellung des Setups gebe ich nun aber an, dass die DB in den Applicationpfad abgelegt werden soll. Beim Starten der EXE meckert er jetzt natürlich, dass er die DB unter D:\testprojekt nicht finden kann.

Wie kann ich dieses Problem lösen? Er soll die DB jetzt quasi unter dem Applicationpfad finden.

Danke für zahlreiche Antworten!

 

[herberta]

Hi sozialesAbseits,

ich bin mir nicht sicher, wie Du das meinst. Du stellst eine Verbindung zu einer DB mit ADO her. Soviel verstehe ich. Aber wie soll ADO denn eine DB im Applikationspfad ablegen? ADO ermöglicht den Zugriff auf bestehende Datenbanken. Wenn es diese DB noch nicht gibt, was willst Du denn dann mit ADO?

 

[DevHB]

Hi,

wenn Du in die DB Programmierung einsteigen willst dann mache NIE "ADO-Steuerelement einbinden".
Die gebundenen Steuerelemente machen nur Ärger, Du verlierst die Kontrolle und weißt nie genau, was passiert.
Mach die DB - Anbindung mit Code und Du lernst noch was dabei.

ADO einbinden:
"Projekt->Verweise->MS Active Data Objects XXX".

Dann hast Du ein Connection und Recordset Objekt, mit denen Du arbeiten kannst.

Zum Problem mit dem Pfad.
Du hast einen absoluten Pfad angegeben!

Dim sPath  As String
sPath = App.Path

If (Right$(sPath,1)<>"\") Then
    sPath = sPath & "\"
End If

sPath = sPath & "db1.mdb"

So wird immer der Applikationspfad der Anwendung (der Exe) ausgelesen und der Name hinten dran gehangen, so dass sich die DB in dem Applikationspfad befinden muss (wie gewünscht).