[ACCESS] éditer une requête en VB [DONE]

éditer une requête en VB [DONE] [ACCESS] - SQL/NoSQL - Programmation

Marsh Posté le 10-02-2003 à 16:38:37    

Bonjour,
 
savez-vous comment éditer une requête créée avec l'assistant en Visual Basic sous Access 2000 ?
 
Merci. :jap:


Message édité par Mad666 le 12-02-2003 à 11:09:06
Reply

Marsh Posté le 10-02-2003 à 16:38:37   

Reply

Marsh Posté le 10-02-2003 à 17:00:44    

Sous Access, tu cliques sur le bouton SQL dans l'assistant de création de requete (le 1er de la barre d'outils), puis tu fais un copier/coller dans VB.
 
Si j'ai répondu à coté de la plaque, merci d'être plus clair dans la formulation de ta question ! (qu'appelles tu "Editer" ?)


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 10-02-2003 à 22:56:12    

Harkonnen a écrit :

Sous Access, tu cliques sur le bouton SQL dans l'assistant de création de requete (le 1er de la barre d'outils), puis tu fais un copier/coller dans VB.
 
Si j'ai répondu à coté de la plaque, merci d'être plus clair dans la formulation de ta question ! (qu'appelles tu "Editer" ?)


 
Merci mais oui tu es à côté de la plaque ! ;)
 
Ce que je veux c'est modifier la requête SQL contenue par la requête ACCESS (le bordel) par code. Par exemple, remplacer "SELECT * FROM maTable;" par "SELECT * FROM taTable;" mais le faire par code.
 
Ou encore, une méthode plus séduisante serait de pouvoir mettre une variable VB en critère ("WHERE" ) d'une requête SQL contenue dans une requête ACCESS. Peut-on faire ça ?
Par exemple, ça donnerait : "SELECT * FROM maTable WHERE monChamp=" & maVariable & ";" Mais ça c'est du VB et moi je veux ça dans la requête.  
 
Je sais pas très bien comment m'expliquer autrement. Si tu ne saisis toujours pas, redis le, j'essaierai de reformuler avec screenshots pour illustrer. [:ocolor]

Reply

Marsh Posté le 11-02-2003 à 08:58:51    

A ma connaissance, il n'y a pas de possibilité de récupérer des variables VBA en SQL Access. Mais je peux me tromper...
 
Mais... mais... C'EST QUOI CETTE SIGNATURE ???? :fou:


---------------
J'ai un string dans l'array (Paris Hilton)
Reply

Marsh Posté le 11-02-2003 à 15:49:56    

Tu peux utiliser la propriété Recordsource...


---------------
« Lorsque le bûcheron pénétra dans la forêt avec sa hache, les arbres se dirent : ne nous inquiétons pas, le manche est des nôtres. » | Gérez votre collection de BD en ligne !
Reply

Marsh Posté le 11-02-2003 à 20:30:03    

Harkonnen a écrit :

Mais... mais... C'EST QUOI CETTE SIGNATURE ???? :fou:


 
euh... elle ne te plait pas ? [:zerod]
 
En fait, c'est parce qu'on vient toujours me déranger quand j'analyse du code et donc je reprends toujours mon analyse dans une boucle. spamafote :o  :kaola:
 
edit : ah nan c'est pour le :o ?  :whistle: ...dsl :p


Message édité par Mad666 le 11-02-2003 à 20:31:27
Reply

Marsh Posté le 11-02-2003 à 20:30:33    

latruffe a écrit :

Tu peux utiliser la propriété Recordsource...


 
 :jap: je regarderais ça demain, merci.  [:napalm57]

Reply

Marsh Posté le 12-02-2003 à 09:16:58    

latruffe a écrit :

Tu peux utiliser la propriété Recordsource...


 
bon, je ne vois pas cette propriété. C'est celle d'un recordset, d'un querydef, ... ? Peux-tu m'éclairer d'avantage stp ?
 
edit : je travaille en DAO


Message édité par Mad666 le 12-02-2003 à 10:50:28
Reply

Marsh Posté le 12-02-2003 à 11:08:36    

bon j'ai trouvé la solution :sol: :
 

Code :
  1. Dim db As DAO.Database
  2. Dim rst As DAO.QueryDef
  3. Set db = CurrentDb
  4. Set rst = db.QueryDefs("grpLignes" )
  5. rst.SQL = "SELECT DISTINCT Lignes.Nom,Lignes.Ligne FROM (Lignes INNER JOIN Parcours ON Lignes.Ligne=Parcours.Ligne) INNER JOIN Sections ON Parcours.Parcours=Sections.Parcours WHERE Sections.Lieu_fin_section=" & choix_arret.Value & ";"

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed