Bonjour à tous,
J'utilise Excel depuis quelques mois pour récupérer des informations sur diverses BDD.
J'aimerais aujourd'hui créer une application avec Visual Basic Express 2010
Sur excel j'utilisais
Le problème est que dans Visual Basic DAO.OpenDatabase, db.Openrecordset n'existent pas.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Dim db As DAO.database Dim Rs As DAO.Recordset PathSource = "C:\Program Files\...." 'Ouvrir le fichier Source FileNumS = FreeFile() Open PathSource For Input As #FileNumS 'lire le fichier Source Line Input #FileNumS, TmpStr 'Fermer le fichier Close #FileNumS db = DAO.OpenDatabase(TmpStr, False, False) Strsql = "SELECT .... FROM ...." Rs = db.OpenRecordset(Strsql, DAO.dbOpenSnapshot)
De même pour Open PathSource For, Line Input et #FileNumS dans la partie
J'ai pourtant bien ajouté la librairie DAO 3.6, et DAO.Database et DAO.recordset son reconnus.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Open PathSource For Input As #FileNumS 'lire le fichier Source Line Input #FileNumS, TmpStr 'Fermer le fichier Close #FileNumS
Auriez vous une solution?
Merci
Partager