begin process at 2012 02 16 20:26:06
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Langages dérivés

 > 

VBA

 > 

connexion BDD access


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

connexion BDD access

lundi 30 juillet 2007 à 09:35:16 | connexion BDD access

moudz84

salut, j'utilise actuellement le access 2002 je voudrai savoir si il y a des tuto pour les connexion au base de données, comment utiliser des tables de differentes bases, se connection a une base importer, ou un lien d'une base etc.

SVP aidez moi, c'est pour mon stage et je suis actuellement bloqué
lundi 30 juillet 2007 à 09:41:29 | Re : connexion BDD access

jrivet

Membre Club
Salut,
Je pense que tu peux essayer de regarder du côté d'ADO qui te permettras de faire tout ce que tu souhaites.

@+: Ju£i€n
Pensez: Réponse acceptée
lundi 30 juillet 2007 à 14:29:38 | Re : connexion BDD access

Nicko11

Salut,

allez, un petit exemple histoire de te montrer un peu à quoi ca ressemble:

Aller dans Outils puis référence et cochez MicroSoft Active Data Object 2.? (? = 5 ou plus).

Ensuite le code:


Dim acn As New ADODB.connection
Dim rs As New ADODB.recordset

acn.CursorLocation = adUseClient
acn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Chemin_DataSource 'Chemin du fichier .mdb
rs.Open "SELECT * FROM Nom_Table", acn, adOpenDynamic, adLockReadOnly  

Tu n'as plus qu'à remplacer le chemin et le nom de la table et c'est parti.
Par contre, si ta base est protegé avec un mode de passe, ca change la connexion.

Je pense qu'avec ca, tu peux partir avec une base.

Encore une chose, si tu codes en VBA Access (ton sujet) et dans la meme base que ta table, tu n'as plus besoin de la connexion, juste de :

rs.Open "SELECT * FROM Nom_Table", CurrentProject.Connction, adOpenDynamic, adLockReadOnly 


Enfin, j'attends que tu essaies ca.

A+ 

lundi 30 juillet 2007 à 15:10:18 | Re : connexion BDD access

moudz84

salut, merci pour vos reponse

une ptite question pour toi nicko11

je code en VBA Access et dans la meme base que ma table
il suffit donc de faire ce que t'as dit a la fin, mais comment je pourrait afficher le resultat dans une liste deroulante par exemple ( desolé je suis vraiment debutant dans access et vba)

lundi 30 juillet 2007 à 15:52:16 | Re : connexion BDD access

Nicko11

Alors la, c'est bien plus facile. Utilise ADO seulement pour des traitements un peu complexes ou pour des connexions a des bases externes.

Donc, oui, la derniere solution est envisageable mais la meilleur (si tu t'y connais) est de créer des requetes SQL.

Pour la mettre en source de ta liste, tu vas dans le mode création de ton formulaire.

Tu vas dans les propriétés de ta liste et tu choisis Table/requete pour la propriété Origine Source.
Ensuite tu tapes la requete SQL dans la propriété Contenu:
"SELECT Champ1, Champ1 AS toto, Champ1 AS tata FROM Ta_Table''

Faut remplacer le nom des champs que tu veux affichier (* pour  tous les champs) et le nom de la table.
Le AS ... sert a modifier les entetes de colonnes dans la liste (si propriété Entete colonne a OUI).


Est ce que cette méthode te convient ou tu veux vraiment passer par ADO ?
lundi 30 juillet 2007 à 16:14:28 | Re : connexion BDD access

moudz84

euh peut tu me dire comment passer par ado: mettre la requete dans le code vba
req= "select * from A"???
lundi 30 juillet 2007 à 16:52:54 | Re : connexion BDD access

moudz84

desolé pour ce double poste, mais j'aimerai aussi savoir comment faire pour recuperer la valeur selectionner dans une liste deroulante...
mardi 31 juillet 2007 à 08:32:01 | Re : connexion BDD access

Nicko11

Tu as aussi le choix de faire:

SQL = "select * from A"

DoCmd.RunSQL  SQL

Si tu veux passer par un recordset, c'est la premiere solution que je t'ai donnée


Dim acn As New ADODB.connection
Dim rs As New ADODB.recordset

acn.CursorLocation = adUseClient
acn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Chemin_DataSource 'Chemin du fichier .mdb
rs.Open "SELECT * FROM Nom_Table", acn, adOpenDynamic, adLockReadOnly

La requete est en gras, mais je vois pas pourquoi tu veux passer par ADO dans ce cas, contrairement a ta precedante reponse.

 

Pour reccupérer l'item selectionner de ta liste, soit tu fais,

Nom_Controle_Liste.Value (remplacer par le mon du controle)

Soit cherché une propriété de ton controle du genre Sel ou Selected.

mardi 31 juillet 2007 à 09:25:30 | Re : connexion BDD access

moudz84

en fait, je doit mettre deux liste deroulante , qd je change la premiere la deuxieme doit changer... la premiere liste est la liste du departement et la deuxieme est la ville

si je prend la premiere solution, je ne pourrai changer la requete , alors que je peux placer la deuxieme requete dans le onchange de la premiere.

qd je fais le        rs.Open "SELECT * FROM Nom_Table", acn, adOpenDynamic, adLockReadOnly

comment je fait pour placer tout ces ligne dans la liste deroulante???

merci beaucoup nicko pour tout ton aide

mardi 31 juillet 2007 à 10:49:48 | Re : connexion BDD access

Nicko11

Je ne comprends pas exactement la facon de faire que tu recherches. Je te preposes de faire par requete car c'est bien plus simple que de passer par ADO.

"comment je fait pour placer tout ces ligne dans la liste deroulante???"

Regarde mon post du "30/07/2007 15:52:16" et tu auras ta reponse.

Ensuite pour la 2eme liste tu fais la meme chose en rajoutant une clause Where.

"SELECT ville FROM A WHERE departement =[Nom_De_la_premiere_liste];"

1 2

Cette discussion est classée dans : access, base, connexion, bdd, actuellement


Répondre à ce message

Sujets en rapport avec ce message

Connexion BDD Access ne se ferme pas apres multiple vérifications. [ par Vega62000 ] Bonjour, Voila je traite une base de donnée access qui est très imposante (4 millions d'enregistrements, 700Mo...) je doit donc réaliser un programme Recherche dans une BDD access [ par Diaw8com ] Salut j'ai crée une base de donnée Access et j'ai la connexion avec Adodc dans vb6 et je n'arrive pas à faire une recherche dans la la base. merci de Conseil BDD VB [ par belbibiche ] Bonjour,Je suis en train de développer avec VB 2008 une application qui sera disponible sur plusieurs ordi avec des comptes personnalisés. J'utilise u bdd access sur ftp [ par olkain ] Bonjour à toutes et à tous, J'aimerai savoir si c'est possible dans et premier temps de se connecter à une base de donnée Access stocké sur un FTP? connexion a une base access 97 via vba 6.3 [ par sourire45 ] bonjour tout le monde!!!Voila je suis nouvelle dans le forum et débutante en vba..j ai un eapplication créer avec excel 97 et qui fait appel a une bas CONNEXION INTERNET BASE ACCESS [ par vbsmohamed ] Bonjour,si  vous permettez je veux me connecter avec une base de donnee accesse 2003 via internet apartir de vb.NET 2005SI quelqu'un peut m'aider et m connexion a deux base de donnes access [ par 13emevirus ] salut a tous! j'ai un probleme de connexion a deux bases de donnees access. A l'execution mon application se connecte automatiquement a la base princi Connexion à une base access [ par Niangoran ] J ai conçu une application clien serveur sous visual basic 6 avec une base de données access 2003.je veux verouiller la base de données pour cause de La connexion a une base access [ par amsdiop ] "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Environment.CurrentDirectory & "\Sample.mdb"<font color="#0000ff" size=


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,217 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales