[Access] Bug et Requète avancée

Bug et Requète avancée [Access] - SQL/NoSQL - Programmation

Marsh Posté le 15-01-2007 à 12:16:50    

Bonjour à tout les hfrien(ne)s,
 
ci dessous mon code sur un bouton.
A savoir que 'seleccomp' est une Zone de liste.
 
 

Code :
  1. Private Sub LTA_Libre_Click()
  2. Dim SQL As String
  3. SQL = "SELECT Table1.* FROM Table1 WHERE (((Table1.Ref_CA)=seleccomp)) AND ((Table1.Date) Is Null) AND ((Table1.DSSR_JFH) Is Null) AND ((Table1.Exploitant) Is Null) AND ((Table1.Colis) Is Null) AND ((Table1.Poids) Is Null) AND ((Table1.Destination) Is Null) AND ((Table1.Commentaire) Is Null);"
  4. Me.SousFormulaire.Form.RecordSource = SQL
  5. End Sub


 
Ce code fonctionne mais ( oui il y a toujour le fameux mais :D ), si je fait une sélection dans ma seleccomp puis que je click sur le "LTA_LIBRE_Click" sa me renvoie le bon résultat dans SousFormulaire. jusque là c'est bon ! mais si par la suite je change la sélection dans seleccomp ( je click sur une autre valeur) le nouveau résultat s'execute sans que je click sur LTA_Libre_Click.
 
Des solutions ????
 
Par la suite j'aimerai faire un ajout dans mon résultat, après avoir fait la manip décrite ci dessus, j'aimerai avoir que le premier "enregistrement" avec différent champs pré-remplis ( Date, ... )
est-ce possible? jusqu'a présent sa m'afficher tout les résultats soit X enregistrement correspondant a ma requete (normal).
 
Des idées ????
 
Merci pour votre aide et bonne app à tous  :hello:  

Reply

Marsh Posté le 15-01-2007 à 12:16:50   

Reply

Marsh Posté le 15-01-2007 à 15:14:06    

Bonsoir,
As-tu essayé de mettre  
Private Sub LTA_Libre_Click()
Dim SQL As String
AAA=seleccomp
'je ne sais pas ce qu'est seleccomp
SQL = "SELECT Table1.* FROM Table1 WHERE (((Table1.Ref_CA)=AAA)) AND ((Table1.Date) Is Null) AND ((Table1.DSSR_JFH) Is Null) AND ((Table1.Exploitant) Is Null) AND ((Table1.Colis) Is Null) AND ((Table1.Poids) Is Null) AND ((Table1.Destination) Is Null) AND ((Table1.Commentaire) Is Null);"
Me.SousFormulaire.Form.RecordSource = SQL  
End Sub
Cordialement
 
Je viens de voir que c'est une zone de liste


Message édité par seniorpapou le 15-01-2007 à 15:16:39
Reply

Marsh Posté le 15-01-2007 à 15:15:21    

Personne à d'idée ?
 
si je ne suis pas assez clair sur un point hésité pas j'approfondirai !
 
Cordialement,
Zorh.

Reply

Marsh Posté le 15-01-2007 à 15:16:14    

seniorpapou,
 
Merci de ta réponse je vais essayer ça desuite !
 
EDIT: seleccomp est une list de valeur (panneau déroulant par exemple)
 
Seleccomp = Table2
Table2 = Air France, Air Caraïbe, Air ....
 
Table1 j'ai un champs Ref_CA qui contient  Air France , Air Cara....


Message édité par Zorh le 15-01-2007 à 15:29:47
Reply

Marsh Posté le 15-01-2007 à 15:21:38    

seniorpapou,
 
Ton Code m'ouvre une boite de dialogue pour lui AAA = seleccomp ( as string ) et non comme zone de liste.


Message édité par Zorh le 15-01-2007 à 15:28:47
Reply

Marsh Posté le 15-01-2007 à 15:29:09    

Re,
OUah, il faut concaténer :"SELECT Table1.* FROM Table1 WHERE (((Table1.Ref_CA)=" & AAA & "....
 
et s'il est tétu:
 quote= "'"
"SELECT Table1.* FROM Table1 WHERE (((Table1.Ref_CA)=" & quote & AAA & quote & ".....


Message édité par seniorpapou le 15-01-2007 à 15:29:33
Reply

Marsh Posté le 15-01-2007 à 15:32:33    

Nikel !!
 
t'es un chef seniorpapou ! :p
 
tu aurai pas une solution pour la deuxième question ? j'avoue je ne suis pas développeur :p
 
merci :)

Reply

Marsh Posté le 15-01-2007 à 15:43:20    

re,re,

Citation :

tu aurai pas une solution pour la deuxième question ? j'avoue je ne suis pas développeur


moi non plus, mais je m'amuse beaucoup.
 
De mémoire, j'avais une solution en créant une table, avec un premier record de mon cru et en ajoutant le résultat du sql derrière
 
Mais je suis sûr qu'un spécialiste en SQL (un vrai) doit avoir une solution plus élégante


Message édité par seniorpapou le 15-01-2007 à 15:43:45
Reply

Marsh Posté le 15-01-2007 à 15:48:30    

Re,re,re
Regardes un peu du côté des requètes UNION

Reply

Marsh Posté le 15-01-2007 à 15:48:44    

lol barbare :p
 
merci quand sa me donne une piste :D
 
EDIT: je vais voir ça! merci.


Message édité par Zorh le 15-01-2007 à 15:49:40
Reply

Marsh Posté le 15-01-2007 à 15:48:44   

Reply

Marsh Posté le 15-01-2007 à 15:57:53    

je viens de voir la requete UNION et je ne pense pas que cela convienne.
 
il faut savoir que dans ma table j'ai déja 2 champs remplis.
apres avoir fait la requête au dessus j'aimerai qu'il me sélectionne dans le résultat obtenu un record le premier disponible tant qu'a faire et qui  remplisse automatiquement le champs DATE et EXPLOITANT ( date() et %username% ) ??
 
PS: je veu faire comme ça pour évite les doublons au cas ou.


Message édité par Zorh le 15-01-2007 à 15:59:04
Reply

Marsh Posté le 15-01-2007 à 16:24:08    

As-tu essayé de faire ta mise à jour du premier record au niveau du sous-formulaire?
 
sinon: sql création de table( par exemple: toto), openrecodset.de toto. edit du premier record, update..
et ...recordsource=toto

Reply

Marsh Posté le 15-01-2007 à 16:49:54    

bon je dois avouer que je ne comprend pas tout se que tu me dit, je te propose de voir ça demain j'ai encore pas mal d'autre chose a faire.
 
je te remercie pour ton aide et si tu as un exemple un peu plus parlant pour moi par rapport a mon exemple
 
merci bcp,
Zorh.

Reply

Sujets relatifs:

Leave a Replay

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