Base de données 2

MSI - 20 sept. 2000 à 21:24
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 - 31 juil. 2007 à 15:43
Travaillant sur une base de données ACCES, mon programme utilise un
controle ADO Data.
Ma base de données MABASE est amenée a être utilisée en reseau et donc à
se trouver n'importe où dans n'importe quel repertoire d'un ordinateur
du reseau.
Comment dois je paramétrer le ConnectionString du controle ADODC1 pour
qu'il aille chercher la base là où elle sera installée.

En dehors du contôle ADO je fais rechercher MABASE par un petit code du
style:

'Recherche le chemin de la base de données MABASE.MDB
Dim Chemin As String
Open App.Path & "Supervi.txt" For Input As 1
'Le fichier Supervi.txt se touve dans le repertoire de mon appli et
contient le path où se trouve MABASE.
Do While Not EOF(1)
Input #1, Chemin
Loop
Close #1
Dim Base As String
Dim Test
Test = Chemin Like "*MABASE.mdb"
Base = Chemin

'Ouvre la Base MABASE
Set db = OpenDatabase(Base)
Q = "SELECT*FROM MATABLE"
Set RC = db.OpenRecordset(Q, dbOpenDynaset)

Mais comment me servir de ça dans un contrôle ADO Data ??

Encore Merci

François

1 réponse

cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 9
31 juil. 2007 à 15:43
Cette discussion a été cloturée. Veuillez lancer une nouvelle discussion si votre question est toujours d'actualite.

Merci

E.B.
0
Rejoignez-nous