Bonjour,
Je cherche à récupéré les informations d'une requête.
Je ne cherche pas d'élément graphique, juste une structure pour récupérer le résultat de la requête avant leur manipulation.
Il semble que le Dataset remplirait cette fonction.
Cependant je ne sais pas comment utiliser cette élément depuis un SqlDataReader.
Voici le code que j'ai actuellement pour l'appel à ma Procédure Stockée :
Je continue met recherche.
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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38 Public Sub PS_Select_Employee_Production_Daily_Assignment_fct_periode() Dim DateDuJour As String Dim LundiDuJour As String Dim DateDuJourPlusNbSem As String If dateJ.Text <> "" Then DateDuJour = dateJ.Text Else DateDuJour = DateTime.Now.Date End If LundiDuJour = lundiSemDateJour(DateDuJour) DateDuJourPlusNbSem = DatePlusNbSem(LundiDuJour, nbSemaine) maCmd = maCnx.CreateCommand maCmd.CommandType = CommandType.StoredProcedure maCmd.CommandText = "PS_Select_Employee_Production_Daily_Assignment_fct_periode" maCmd.Parameters.Add(New SqlParameter("@date_debut", SqlDbType.DateTime)) maCmd.Parameters.Add(New SqlParameter("@date_fin", SqlDbType.DateTime)) maCmd.Parameters("@date_debut").Value = LundiDuJour maCmd.Parameters("@date_fin").Value = DateDuJourPlusNbSem maCmd.ExecuteNonQuery() Try Dim curseur As SqlDataReader = maCmd.ExecuteReader Dim DataS As DataSet() curseur.Close() Catch ex As Exception End Try End Sub
Si quelqu'un à une idée je suis preneur.
++
Partager