Ouverture base access via VB6

Merci pour ton aide François,

Cependant, je trouve ça quand très compliqué pour une base
access qui ne compte que quelques enregistrements. Y a t-
il une méthode plus allégée? Sinon pour des petites base,
ne vaut-il pas mieux utiliser Excel?

Merci d'avance.

-----Message d'origine-----
Bonjour/soir,

Je te conseille de lire le technopoche coonsacré à ADO et

de te référer aux

articles de la FAQ pour une aide supplémentaire:
http://www.microsoft.com/isapi/gosupport.asp?

target=/directory/worldwide/fr/technos/ado.doc

http://faq.vb.free.fr/index.php?rubrique=12

Tu trouveras également d'autres technopoches intéressants

à cette adresse:

http://www.microsoft.com/france/msdn/support/technopoches/

default.asp

Tu pourra aussi trouver de l'aide sur ce newsgroup si un

point précis te

pose problème.

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"cindy" <cindy1134@caramail.com> a écrit dans le message

de

news:07fb01c36b01$5ecb31a0$a601280a@phx.gbl

Bonjour à tous,

Je fais mes début en access. Je cherche un moyen

d'ouvrir

une base access pour enregistrer et lire des données qui
serai l'équivalent pour excel de workbooks.open

Merci d'avance pour votre aide.

Cindy

.

Allo Cindy,

Cela te semble peut-être compliqué mais c'est très simple une fois qu'on
comprend le système et ce n'est pas vraiment si lourd que ça.

Tu dois d'abord te déclarer une constante globale dans un module de ton
programme comme ceci par exemple :

Public ConBD as ADODB.Connection

Ensuite dans le form_load de ta première feuille qui s'affiche tu dois
initialisé ta connection à ta base Access de cette façon par exemple :

Set ConBD = New ADODB.connection

tu effectues la connexion avec une ConnectionString comme ceci :

ConBD.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:TaBaseAccess.mdb;Persist Security Infoúlse"

et finalement tu dois ouvrir ta connexion

ConBD.Open

Voilà ta connexion avec ta base Access est effectuée. Petit conseil, pour
être sûr de ne pas avoir d'erreur dans ta ConnectionString, le mieux est de
la récupérer à partir d'un contrôle comme un DataEnvironnement ou autre du
genre. Tu te crées simplement un DataEnvironnement, si tu sais comment
faire il va de soi, et ensuite une fois que tu as testé ta connexion dans
celui-ci, tu vas dans les propriétés faire un copier coller de ta
ConnectionString que tu viens ensuite placé dans ton code.

Une fois ta connexion établi il ne te reste plus qu'à y avoir accès chaque
fois que tu en auras besoin dans les différentes feuilles de ton
application. Pour se faire partout où tu en auras besoin tu dois te créer
un Recordset.

Tu déclares les variables nécessaires de cette façon:

Dim rcMonRecordSet as ADODB.Recordset
set rcMonRecordset = New ADODB.Recordset

rcMonRecordset.ActiveConnection = ConBD pour établir la connexion à ta
base
rcMonRecordset.CursorType = adOpenDynamic pour ouvrir celui-ci de façon
dynamique(voir MSDN pour la signification et les autres possibilités)
rcMonRecordset.LockType = adLockReadOnly pour l'ouvrir en lecture
seule(voir MSDN encore une fois pour les autres possibilités)

rcMonRecordset.Source = "Ta requête SQL selon tes besoins"
rcMonRecordset.Open pour ouvrir ton recordset

Maintenant tu fais ce que tu veux des données de ton recordset comme par
exemple remplir des zones de texte :

TextBox1.text = rcMonRecordset!nom correspond au champ nom que tu
aurais récupérer à partir de ta requête SQL
TextBox2.text = rcMonRecordset!adresse
et ainsi de suite. Ensuite tu termines en fermant ton recordset par

rcMonRecordset.Close
set rcMonRecordset = Nothing

J'espère que tout ceci ne te semble pas trop lourd et que tu comprends le
principe

Bonne chance pour la suite

Denis P


"Cindy" <cindy1134@caramail.com> a écrit dans le message de
news:090001c36b0c$ee1e5250$a601280a@phx.gbl...
Merci pour ton aide François,

Cependant, je trouve ça quand très compliqué pour une base
access qui ne compte que quelques enregistrements. Y a t-
il une méthode plus allégée? Sinon pour des petites base,
ne vaut-il pas mieux utiliser Excel?

Merci d'avance.

-----Message d'origine-----
Bonjour/soir,

Je te conseille de lire le technopoche coonsacré à ADO et

de te référer aux

articles de la FAQ pour une aide supplémentaire:
http://www.microsoft.com/isapi/gosupport.asp?

target=/directory/worldwide/fr/technos/ado.doc

http://faq.vb.free.fr/index.php?rubrique

Tu trouveras également d'autres technopoches intéressants

à cette adresse:

http://www.microsoft.com/france/msdn/support/technopoches/

default.asp

Tu pourra aussi trouver de l'aide sur ce newsgroup si un

point précis te

pose problème.

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"cindy" <cindy1134@caramail.com> a écrit dans le message

de

news:07fb01c36b01$5ecb31a0$a601280a@phx.gbl

Bonjour à tous,

Je fais mes début en access. Je cherche un moyen

d'ouvrir

une base access pour enregistrer et lire des données qui
serai l'équivalent pour excel de workbooks.open

Merci d'avance pour votre aide.

Cindy

.