VB6 connessioni ADO

[gyonny]

ciao raga

piccolo problemino per chi conosce la soluzione, grande rottura di scatole che mi crea VB

in un form uso una connessione ado da codice

db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=db1.mdb"

la connessione funziona finche da visualbasic non accedo ai file delle sulle varie unita del pc.
dopo che richiamo o salvo form la connessione va in errore, visualbasic cerca per default il database in c:\programmi\microsoft visual studio\vb98\db1.mdb

come posso ovviare?

by
gyonny

[xegallo]

devi mettere il percorso completo del db esempio
c:\documenti\miodb.mdb

se è nella cartella dell'eseguibile app.path & "\mio mdb"

[gyonny]

xe
il percorso completo c'era ed è sato tolto per il fatto che il cliente può installare il pr in cartelle diverse.

ho provato a creare l'eseguibile e installarlo su altri pc in altre cartelle, funziona benissimo.

il mio più che un problema è una rottura di scatole, sto lavorando a un pr molto grande e ogni volta per vedere il debug devo cambiare path nei vari form e resettarli dopo.

ho provato con app.path e con una variabile ma mi da errore

db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=app.path
&"\db1.mdb"

dim datag as string
datag = cstr(app.path &"\db1.mdb")
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source= datag"

dovrei solo capire dove visual si setta le dir di default e modificarla.

by
gyonny

[lufo5]

Originariamente inviato da gyonny
xe
il percorso completo c'era ed è sato tolto per il fatto che il cliente può installare il pr in cartelle diverse.

ho provato a creare l'eseguibile e installarlo su altri pc in altre cartelle, funziona benissimo.

il mio più che un problema è una rottura di scatole, sto lavorando a un pr molto grande e ogni volta per vedere il debug devo cambiare path nei vari form e resettarli dopo.

ho provato con app.path e con una variabile ma mi da errore

db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=app.path
&"\db1.mdb"

dim datag as string
datag = cstr(app.path &"\db1.mdb")
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source= datag"

dovrei solo capire dove visual si setta le dir di default e modificarla.

by
gyonny

magari se la scrivi così funziona:

db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" & app.path & "\db1.mdb"