Discussion :

[liquid]

Requete:

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT Salaries.MatriculeSal, Salaries.NomSal, Salaries.PrenomSal, Emploi.LibelleEmploi, Services.LibelleServ, Elements_Absences.NumeroAbs, Elements_Absences.DateAbsDeb, Elements_Absences.DuréeAbs, Elements_Absences.EtatAbsence, Types_Absences.LibelleTypeAbs FROM Types_Absences, Elements_Absences, Services, Salaries, Emploi WHERE Types_Absences.NumeroTypeAbs = Elements_Absences.NumeroTypeAbs AND Elements_Absences.MatriculeSal = Salaries.MatriculeSal AND Services.NumeroServ = Salaries.NumeroServ AND Salaries.NumEmploi = Emploi.NumEmploi AND (YEAR(Elements_Absences.DateAbsDeb)= ?) AND (Salaries.MatriculeSal = ?)

et j'ai le code suivant derrière un bouton:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
On Error GoTo gesterror
Dim annee As String
Dim mat As String
DataReport4ListeAbsenceUnSalarie.ConnectionSalar.Open
annee = InputBox("Entrer l'année :", "Liste des employés absents pendant l'année")
mat = InputBox("Entrer le matricule du salarie:", "Absence d'un employé pendant l'année")
DataReport4ListeAbsenceUnSalarie.Orientation = rptOrientLandscape
DataEnvironmentServices.CmdUnSal1anne(annee, mat)
DataReport4ListeAbsenceUnSalarie.CmdUnSal1anne.Close

gesterror:
If Err.Number = 3704 Then
DataEnvironmentServices.ConnectionSalar.Close
End If

le problème se trouve au niveau de la partie en rouge ou je doit normalement rentrer 2 variables differentes notamment: annee et mat

[NAIMA2]

bonjour, , tu peux éclaircé ton code .car j ai l habitude de travailler avec des requete a plusieurs paramétres mais j arrive pas a comprendre ta requete pour t aider .
merci d avance .

[liquid]

c'est bon j'ai trouvé la requete:

DataEnvironmentServices.CmdUnSal1anne(annee),(mat)