Access + VB

Julgood Messages postés 8 Date d'inscription   Statut Membre Dernière intervention   -  
 Worm -
Bonjour,
J'ai une base de donnée Access, et j'aimerai récupérer les infos contenus dans une zone de texte et dans un combobox à partir de visual basic pour les insérer dans une requête SQL mais je n'y arrive pas qqun peut m'aider svp?
A voir également:

8 réponses

blux Messages postés 27119 Date d'inscription   Statut Modérateur Dernière intervention   3 359
 
salut,

ta zone de texte possède l'attribut 'value', il suffit d'y faire référence.

Tu construis ta requête avec ça :
Str="select toto, tata from tab1 where toto='" & mazone.value & "';"

C'est tout !

A+ Blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
0
Julgood Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
pour executer la ligne SQL g fai comment ?
j'ai essayé DoCmd.RunSQL Str mais ca marche pas :-(
0
blux Messages postés 27119 Date d'inscription   Statut Modérateur Dernière intervention   3 359
 
tu veux la lancer quand ta requête ?
quand on appuie sur un bouton, quand on ouvre le formulaire, quand on a saisit quelque chose dans une zone ?

A+ Blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
0
Julgood Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
qd on appuie sur un bouton
0
boun
 
Crée d'abord ta requete (ex : ma requete)
Précise le parametre (=zone de texte) au niveau du critere du champ concerné :
=Forms![monformulaire]![mazone]
Sur l'action double-click de ton bouton :
DoCmd.OpenQuery marequete

Normalement ca marche. A plus.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
fleuristin Messages postés 1 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Je suis interesse par le probleme. Comment faire pour ouvrir un fichier access sur visual basic. Code ? ou SQL ?
Merci de me repondre.
0
Worm
 
Créez un objet DataBase et attribuez lui un Set.

Set bd=OpenDatabase("toto.mdb")

Ensuite, utilisez un objet Recordset pour recup :

Dim Jeu As Recordset

Set Jeu = bd.openrecordset(maSQL)
If Jeu.EOF = False Then
'Accès aux lignes vie !Fields(FieldName)
'Déplacement via .Seek ou .MoveNext, .MoveLast etc...

Attention, si vous utilisez Vb, mettez une reference au moteur Jet!

A bientot

Question con : j'ai un probleme un peu inverse dans une combobox, mais c'est un probleme de format. Si je fais une requete sur du numerique, puis du texte, j'ai un propbleme de format et j'ai beau dbidouiller, il est intraitable.
Solutions?
0
said
 
tyr
0
Worm
 
Pardon?
0