Requete select pour access sous VBA
Fermé
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
-
28 juil. 2003 à 15:05
james59200 - 3 sept. 2008 à 17:50
james59200 - 3 sept. 2008 à 17:50
j'arrive pas a exécuter une requete select pour access sous visual basic
A voir également:
- Select vba access
- Please select boot device - Forum Windows
- Please select boot device - Forum Matériel & Système
- Select boot device première utilisation ✓ - Forum Windows
- Access appdata - Guide
- Excel compter cellule couleur sans vba - Guide
8 réponses
maily
Messages postés
7556
Date d'inscription
lundi 26 juin 2000
Statut
Contributeur
Dernière intervention
23 juin 2023
453
28 juil. 2003 à 17:00
28 juil. 2003 à 17:00
Bon, suis pas très douée sous vba et access, mais oriente toi vers l'objet command! A mon avis c'est possible....
tiens, j'ai trouvé ça:
ftp://ftp2.developpez.be/developps/vb/VB-ADOX.pdf
bon courage
Maily :-))))
tiens, j'ai trouvé ça:
ftp://ftp2.developpez.be/developps/vb/VB-ADOX.pdf
bon courage
Maily :-))))
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
9
28 juil. 2003 à 15:31
28 juil. 2003 à 15:31
j'ai oublie de vous remercier d'avance.
Merci
Lionel
Merci
Lionel
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
9
28 juil. 2003 à 16:31
28 juil. 2003 à 16:31
Ressalut
En fait, ce que je voudrais savoir c'est d'une maniere generale comment exécutons une requete SQL sous VBA???
Par exemple je veux éxecuter la requetes suivante:
SELECT period_id FROM period WHERE period_id=2;
Et si possible comment fais t'on pour récuperer le resultat??
merci
Lionel
En fait, ce que je voudrais savoir c'est d'une maniere generale comment exécutons une requete SQL sous VBA???
Par exemple je veux éxecuter la requetes suivante:
SELECT period_id FROM period WHERE period_id=2;
Et si possible comment fais t'on pour récuperer le resultat??
merci
Lionel
sergeszebe
Messages postés
180
Date d'inscription
mardi 15 novembre 2005
Statut
Membre
Dernière intervention
8 octobre 2009
2
23 févr. 2006 à 11:50
23 févr. 2006 à 11:50
salut !
moi je viens de voir une question précise !comment excécuter une requette sous vbs? supposons que tu as ta requette qui s'appele sqlinfos.
tu la declare:
dim sqlinfos As String
sqlinfos="select blonde,brune,black,metis From fille"
sur clic:
sur click()
DoCmd.RunSQL (sqlInfos)
moi je viens de voir une question précise !comment excécuter une requette sous vbs? supposons que tu as ta requette qui s'appele sqlinfos.
tu la declare:
dim sqlinfos As String
sqlinfos="select blonde,brune,black,metis From fille"
sur clic:
sur click()
DoCmd.RunSQL (sqlInfos)
Bonjour a toi DarkMan972,
Si tu n'as toujours pas trouvé la solution à ton probléme, voila un test que tu pourrais essayer de réalisé :
Voici ta requete:
SQL_rs202 = "select Period_id,period_desc2 from period " & _
"where Period_id >= " & period_id1 & " And Period_id <= " & period_id2 & ""
Voici ce donc je te propose de faire et tester:
SQL_rs202 = "select Period_id,period_desc2 from period " & _
"where Period_id >= '" & period_id1 & "' And Period_id <= '" & period_id2 & "'"
la modification apporté étant le rajout d'une simple guillemet autour de & period_id1 & avant et apres t double guillemet ce qui donne :
'" & period_id1 "'
et fait la même chose pour " & period _id2 & " et ensuite termine ta requete avec ta double guillement
Voila esperons que cela marche................
Si tu n'as toujours pas trouvé la solution à ton probléme, voila un test que tu pourrais essayer de réalisé :
Voici ta requete:
SQL_rs202 = "select Period_id,period_desc2 from period " & _
"where Period_id >= " & period_id1 & " And Period_id <= " & period_id2 & ""
Voici ce donc je te propose de faire et tester:
SQL_rs202 = "select Period_id,period_desc2 from period " & _
"where Period_id >= '" & period_id1 & "' And Period_id <= '" & period_id2 & "'"
la modification apporté étant le rajout d'une simple guillemet autour de & period_id1 & avant et apres t double guillemet ce qui donne :
'" & period_id1 "'
et fait la même chose pour " & period _id2 & " et ensuite termine ta requete avec ta double guillement
Voila esperons que cela marche................
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
9
28 juil. 2003 à 15:28
28 juil. 2003 à 15:28
oui excusez moi.
Bonjour
donc je précise.
J'ai une base donnée sous access et j'ai creer un bouton dans un formulaire et je voudrais que lorsque je clique sur ce bouton he bien cela m'exécute une requete . Voila ce ke je fais mais j'ai un message d'erreur qui me dit la methode OpenRecordset n'existe pas et c vrai. Elle existait dans l'ancienne version de access mais pas dans celle la et je trouve pas l'equivalent:
Dim dbs
Dim rs As Recordset
Dim rs2 As Recordset
Dim SQL_rs202
Dim P1
Set dbs = CurrentDb
SQL_rs202 = "select Period_id,period_desc2 from period " & _
"where Period_id >= " & period_id1 & " And Period_id <= " & period_id2 & ""
'Set rs = dbs.OpenRecordset(SQL_rs202)
'Set rs = DoCmd.OpenQuery
rs.Filter = "Period_id = " & period_id1 & " "
Set rs2 = rs.OpenRecordset
rs.Open rs.Filter, dbs
P1 = rs2("period_desc2")
rs2.Close
Bonjour
donc je précise.
J'ai une base donnée sous access et j'ai creer un bouton dans un formulaire et je voudrais que lorsque je clique sur ce bouton he bien cela m'exécute une requete . Voila ce ke je fais mais j'ai un message d'erreur qui me dit la methode OpenRecordset n'existe pas et c vrai. Elle existait dans l'ancienne version de access mais pas dans celle la et je trouve pas l'equivalent:
Dim dbs
Dim rs As Recordset
Dim rs2 As Recordset
Dim SQL_rs202
Dim P1
Set dbs = CurrentDb
SQL_rs202 = "select Period_id,period_desc2 from period " & _
"where Period_id >= " & period_id1 & " And Period_id <= " & period_id2 & ""
'Set rs = dbs.OpenRecordset(SQL_rs202)
'Set rs = DoCmd.OpenQuery
rs.Filter = "Period_id = " & period_id1 & " "
Set rs2 = rs.OpenRecordset
rs.Open rs.Filter, dbs
P1 = rs2("period_desc2")
rs2.Close
maily
Messages postés
7556
Date d'inscription
lundi 26 juin 2000
Statut
Contributeur
Dernière intervention
23 juin 2023
453
28 juil. 2003 à 15:35
28 juil. 2003 à 15:35
quelles sont les versions d'access?
Maily :-))))
Maily :-))))
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
9
>
maily
Messages postés
7556
Date d'inscription
lundi 26 juin 2000
Statut
Contributeur
Dernière intervention
23 juin 2023
28 juil. 2003 à 15:47
28 juil. 2003 à 15:47
la derniere c'est access 2000 et l'ancienne c'etait access 97.
Voila.
merci
Lionel
Voila.
merci
Lionel
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
9
28 juil. 2003 à 21:11
28 juil. 2003 à 21:11
merci beaucoup je regarde
darkman972
Messages postés
90
Date d'inscription
lundi 19 mai 2003
Statut
Membre
Dernière intervention
24 octobre 2005
9
29 juil. 2003 à 10:45
29 juil. 2003 à 10:45
merci beaucoup maily ca fonctionne.
maily
Messages postés
7556
Date d'inscription
lundi 26 juin 2000
Statut
Contributeur
Dernière intervention
23 juin 2023
453
29 juil. 2003 à 10:50
29 juil. 2003 à 10:50
Je t'en pris...
Maily :-))))
Maily :-))))
maily
Messages postés
7556
Date d'inscription
lundi 26 juin 2000
Statut
Contributeur
Dernière intervention
23 juin 2023
453
28 juil. 2003 à 15:12
28 juil. 2003 à 15:12
Tout d'abord bonjour...
Comment veux tu qu'on t'aide si c'est tout ce que tu nous dis!
elle est où la question exactement??
Lis ça:
http://www.commentcamarche.net/ccmguide/ccmcharte.php3
bonne journée
Maily :-))))
Comment veux tu qu'on t'aide si c'est tout ce que tu nous dis!
elle est où la question exactement??
Lis ça:
http://www.commentcamarche.net/ccmguide/ccmcharte.php3
bonne journée
Maily :-))))