str_Req = "SELECT HISTORIQUE.ID_MATERIEL, LIB_SOUS_FONCTION, INDICE_DEF, ACTION, DESIGNATION, HISTO_DATE, HISTO_HEURE, DATE_RETOUR,"
str_Req = str_Req & "NOM_INGENIEUR & ' ' & PRENOM_INGENIEUR as INGENIEUR, LIB_ETAT, LIB_LOCALISATION, MOTIF, COMMENTAIRE, NUM_PIECE, UTILISATEUR_BDD "
str_Req = str_Req & "FROM ((SOUS_FONCTION RIGHT JOIN (MATERIEL RIGHT JOIN (LOCALISATION RIGHT JOIN HISTORIQUE ON "
str_Req = str_Req & "LOCALISATION.ID_LOCALISATION = HISTORIQUE.ID_LOCALISATION) ON MATERIEL.ID_MATERIEL = "
str_Req = str_Req & "HISTORIQUE.ID_MATERIEL) ON SOUS_FONCTION.ID_SOUS_FONCTION = MATERIEL.ID_SOUS_FONCTION) LEFT "
str_Req = str_Req & "JOIN ETAT ON HISTORIQUE.ID_ETAT = ETAT.ID_ETAT) LEFT JOIN INGENIEUR ON HISTORIQUE.ID_INGENIEUR "
str_Req = str_Req & "= INGENIEUR.ID_INGENIEUR WHERE HISTORIQUE.ID_MATERIEL = " & IIf(Cb_Materiel.Text = "", 1, Cb_Materiel.Text) & " ORDER BY HISTO_DATE"
Partager