connexion à une base de données Access 2007

Version imprimable

Voir 40 message(s) de cette discussion en une page

06/07/2011, 13h30
hpascal

Bonjour

J'ai vu plusieurs messages concernant OLEDB
Windev comprend un accès natif Access alors pourquoi s'orienter vers OLEDB ?

L'accès natif n'est pas compatible avec les bases au format 2007 ?
06/07/2011, 15h10
miripesage

Citation:

Envoyé par aldama

Je crois que j'ai trouvé le problème.

C'est Microsoft.jet.olede.4.0 qui n'est pas installé sur mon poste. J'ai cherché à le téléchargé toute la nuit sans succès.

Bonjour, télechargement de Microsoft.jet.olede.4.0 pour xp sp2 : http://support.microsoft.com/kb/239114
06/07/2011, 15h26
mail.spam

Citation:

Envoyé par hpascal

Bonjour

J'ai vu plusieurs messages concernant OLEDB
Windev comprend un accès natif Access alors pourquoi s'orienter vers OLEDB ?

L'accès natif n'est pas compatible avec les bases au format 2007 ?

Bonjour Hpascal,
j'ai lu le sujet en diagonale mais je ne pense pas que l'accès natif de Windev 10 reconnaisse Access 2007 (il n'étais pas encore sortie, on a aussi le cas avec W14 et excel 2007).

Sinon pourquoi ne pas faire un test de source de donnée (DSN - Panneaux de configuration - outils d'administration - source de donnée ODBC) ainsi on saura déjà si windows arrive à se connecter sur la base access2007.
06/07/2011, 15h30
hpascal

Merci mail.spam

Effectivement, je n'avais vu que c'était Windev 10
06/07/2011, 15h57
aldama

Citation:

Bonjour, télechargement de Microsoft.jet.olede.4.0 pour xp sp2 : http://support.microsoft.com/kb/239114

Oui j'y suis allé mais aucun des pilotes proposés n'était compatible à mon système.

je veux créer une base. Mais avec Access 2007, est-il possible de créer une base en Access2000?
Si oui, comment?

merci
06/07/2011, 16h43
EDM-TAHITI
Hello,
Tout à fait possible en utilisant 'enregistrer sous...'. Deux options possibles:
- Soit enregistrer sous access 2002-2003
- Soit enregistrer sous access 2000
Donc, à priori, tu devrais pouvoir réaliser ta connexion ensuite (tests) et nous dire si cela fonctionne.
A te lire

Oiu, j'ai pu créé ma base en Access 2000. Mais je suis toujour pas sortie d'affaire car là encore on me demande Microsoft.jet.OLEDE.4.O

Voici le code utilisé
Code:

1 2 3 4 5 6 7 8 HDécritConnexion("MaConnexion", "", "", "G:\GEst_Loyer\Database" ,"Test.mdb", hOledbAccess2000, hOLectureEcriture, "") SI HOuvreConnexion("MaConnexion") HChangeConnexion("OLE DB", "MaConnexion") Info("Connexion OK") SINON Erreur("Erreur connexion : " + HErreurInfo()) FIN
Et voici le code d'erreur:

Citation:

Erreur de connexion: Erreur de l'accès OLE DB
N° erreur: 170124

06/07/2011, 17h47
EDM-TAHITI
Hello,
Bon, on n'avance pas (grrrrr^10)
Pourrais-tu aller dans l'analyse de ton projet, puis connexion, puis créer une nouvelle connexion en utilsant les choix proposés:
- Cliquer sur le plus vert (+)
- type = access
- chemin = chemin de ta base
- Nom d'utilisateur (celui que tu as
- Mot de passe (si il existe)
Une fois ceci réalise, tu as un bouton test pour voir si tu te connectes.
a te lire
06/07/2011, 19h01
aldama

J
'ai créé une nouvelle connexion à partir de l'analyse avec une connexion par Access2000.
et voici le chemin de la source:

Citation:

G:\GEst_Loyer\Database\Test.mdb

.
Lorsque je je fais le test, tout marche bien.
J'ai le message "connexion réussie"

Citation:

Envoyé par aldama

Oiu, j'ai pu créé ma base en Access 2000. Mais je suis toujour pas sortie d'affaire car là encore on me demande Microsoft.jet.OLEDE.4.O

Voici le code utilisé

Code:

1
2
3
4
5
6
7
8
HDécritConnexion("MaConnexion", "", "", "G:\GEst_Loyer\Database" ,"Test.mdb", hOledbAccess2000, hOLectureEcriture, "")
 
SI HOuvreConnexion("MaConnexion") 
HChangeConnexion("OLE DB", "MaConnexion")
Info("Connexion OK")
SINON
Erreur("Erreur connexion : " + HErreurInfo())
FIN

Et voici le code d'erreur:

Bonjour, dans ce cas, essaye le code déja proposé pour acces et dis-nous ce que ça donne

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
NumConnexion est un entier
NomSource est une chaîne
NomUtilisateur est une chaîne = ""
PasseUtilisateur est une chaîne = ""
TypeBase est une chaîne

// Connexion à une source de données spécifique via l'accès natif MS ACCESS
NomSource = " G:\GEst_Loyer\Database\Test.mdb"
TypeBase = "Access"
NumConnexion = SQLConnecte(NomSource, NomUtilisateur, PasseUtilisateur, "", TypeBase)
SI NumConnexion <> 0 ALORS
info("La connexion s'est bien passée")
SINON
// La connexion a échoué : affichage d'un message explicatif

SI Position(RC + Majuscule(SQLListeSource("BASE")) + RC, ...
RC + Majuscule(TypeBase) + RC) = 0 ALORS
// Type de source non trouvé
Erreur("L'accès natif" + TypeBase + "n'est pas correctement installé.", ...
"Vérifiez la présence des DLL WinDev correspondantes" + ...
"(WDxxxACC.DLL pour Access)")

06/07/2011, 19h13
EDM-TAHITI

Hello,

Citation:

Envoyé par aldama

J
'ai créé une nouvelle connexion à partir de l'analyse avec une connexion par Access2000.
et voici le chemin de la source: .
Lorsque je je fais le test, tout marche bien.
J'ai le message "connexion réussie"

Ahhhhhhhhhhhhhhhhhhh! enfin une bonne nouvelle, suis le code de miripesage et normalement, dans les 30 minutes, c'est :resolu:
06/07/2011, 20h52
aldama

:ccool: Je crois que je suis heureux. Enfin ca marche. Merci à vous tous qui m'avez aider pour résoudre ce problème. Mille merci à vous tous.

Aimablement, aldama:mouarf:
06/07/2011, 23h06
EDM-TAHITI

Hello,
Il aurait été intéressant d'avoir ton code posté pour permettre à d'autre de ne pas refaire les mêmes erreurs.
Juste comme cela, en passant... la contribution des uns permet aux autres d'y arriver... et inversement...
D'avance merci...

Voici le code utilisé

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
NumConnexion est un entier
NomSource est une chaîne
NomUtilisateur est une chaîne = ""
PasseUtilisateur est une chaîne = ""
TypeBase est une chaîne
 
// Connexion à une source de données spécifique via l'accès natif MS ACCESS
NomSource = " G:\GEst_Loyer\Database\Gest_Loyer.mdb"
TypeBase = "Access"
NumConnexion = SQLConnecte(NomSource, NomUtilisateur, PasseUtilisateur, "", TypeBase)
 
 
SI NumConnexion <> 0 ALORS
	Info("La connexion s'est bien passée")
SINON
 La connexion A échoué : affichage d'un Message explicatif
 
SI Position(RC + Majuscule(SQLListeSource("BASE")) + RC, ...
RC + Majuscule(TypeBase) + RC) = 0 ALORS
 Type de source Non trouvé
Erreur("L'accès natif" + TypeBase + "n'est pas correctement installé.", ...
"Vérifiez la présence des DLL WinDev correspondantes" + ...
"(WDxxxACC.DLL pour Access)")
FIN
FIN

07/07/2011, 01h13
EDM-TAHITI

Hello
Merci pour tous ceux qui liront ce post :ccool:

Voici plutôt le code final.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
NumConnexion est un entier
NomSource est une chaîne
NomUtilisateur est une chaîne = ""
PasseUtilisateur est une chaîne = ""
TypeBase est une chaîne
 
// Connexion à une source de données spécifique via l'accès natif MS ACCESS
NomSource = " G:\GEst_Loyer\Database\Gest_Loyer.mdb"
TypeBase = "Access"
NumConnexion = SQLConnecte(NomSource, NomUtilisateur, PasseUtilisateur, "", TypeBase)
 
 
// Connexion à une source de données spécifique via l'accès natif MS ACCESS
NomSource = " G:\GEst_Loyer\Database\Test.mdb"
TypeBase = "Access"
NumConnexion = SQLConnecte(NomSource, NomUtilisateur, PasseUtilisateur, "", TypeBase)
 
// Connexion à une source de données spécifique via l'accès natif MS ACCESS
SI NumConnexion <> 0 ALORS
	Info("La connexion s'est bien passée")
SINON
	// La connexion a échoué : affichage d'un message explicatif
 
	SI Position(RC + Majuscule(SQLListeSource("BASE")) + RC, ...
	RC + Majuscule(TypeBase) + RC) = 0 ALORS
	// Type de source non trouvé
	Erreur("L'accès natif" + TypeBase + "n'est pas correctement installé.", ...
	"Vérifiez la présence des DLL WinDev correspondantes" + ...
	"(WDxxxACC.DLL pour Access)")
 
	FIN
FIN

Il y a une erreur dans le code précédent. J'avais mal copié pour le coller ici.

Toute mes excuses:roll:

Voir 40 message(s) de cette discussion en une page