Bonjour forum
je bloque sur une requête comme mentionnée dans le titre de la discussion.
Je souhaiterais obtenir la liste des postes de direction vacant pour l'année scolaire mentionnée dans la photo ci-dessous. voici donc mon script:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Sub AlimenterDGV() Conn.Open() 'Requete = "Select Ecoles,Postes_Vacants From Table_Postes_vacants" Requete = "Select Service,NbreClasse From " & CraieEnMain & " Where Type_Fonction='DIRECTEUR' And Annee_Depart='" & AnneeScolaire & "'" Dim Da As New OleDbDataAdapter(Requete, Conn) Dim Dt As New DataTable Da.Fill(Dt) DGV_Poste.DataSource = Dt For k As Integer = 0 To Dt.Rows.Count - 1 Dim Somme As Integer = Dt.Rows(k).Item(1) + Somme L_Poste.Text = "Postes vacants " & Somme Next Conn.Close() End Sub
la variable AnneeScolaire prend le même texte qui se trouve dans la zone de recherche. En principe, le résultat devrait être effectif dans la Datagridview mais nous constatons que la zone reste vide.
j'ai essayé de tripler les quotes mais j'ai obtenu le même résultat.
Une aide svp...
Partager