[VB.NET] champ datetime dans un datagrid

Version imprimable

01/12/2005, 15h46
HULK

[VB.NET] champ datetime dans un datagrid

Bonjour,

j'ai une prod stockée qui me genere une table avec un nombre de colonne qui peut varier

je rempli ensuite un datagrid avec cette table grace à une autre prod stockée

Ca marche bien à part que dans ma table j'ai des champs datetime, mais dans mon datagrid je n'ai que les dates mais pas les heures !

Comment faire pour avoir aussi les heure ?

Merci

PS : quand je fais un export vers excel de mon datagrid j'ai bien les dates et les heures !
01/12/2005, 16h12
neguib

si tu affectes un GridColumnStyle à cette colonne tu auras accès à une propriété Format il me semble pour choisir le Format DateTime que tu souhaites afficher
01/12/2005, 16h21
HULK

hé ouai mais je peut pas faire ca, je ne sais pas combien de colonnes il y aura dans mon datagrid et où les seront placées
01/12/2005, 16h24
HULK

je vois bien un truc, après avoir rempli mon datagrid, je fais un truc du style

Code:

for each colonnes de mon datagrid

si le nom de colonne commence par 'toto'
mets les données en type datetime
ca pourrais fonctionner ?

Editer par neguib pour l'ajout des balises |code|
01/12/2005, 16h26
HULK

ou dans le datatble plutot, parce que dans le datagrid, je sens que je pourrais le faire que pour les colonnes visible
01/12/2005, 18h00
neguib

Citation:

je rempli ensuite un datagrid avec cette table grace à une autre prod stockée

Met moi le code qui définit le DataSource et le DataMember de ton DataGrid
pour que je comprenne mieux ton processus
Sinon sur le principe une fois la DataTable générée, il n'est pas très compliqué de recupérer le type de données de chacune de ses colonnes donc il suffit de mapper la colonne de type DateTime avec le GridColumnStyle formatable :wink:
Ainsi juste avant d'attribuer le DataSource au DataGrid tu peux définir un TableStyle à celui-ci :)

Code:

1 2 3 4 5 6 7 8 9 Dim com As New SqlClient.SqlCommand("sp_Route_Status_Requete", con) com.CommandType = CommandType.StoredProcedure Dim da As New SqlClient.SqlDataAdapter(com) Dim dt As New DataSet("RouteStatus") dt.Clear() da.Fill(dt, "RouteStatus") Mondatagrid.SetDataBinding(dt, "RouteStatus")
mon datagrid pourra avoir 6 colonnes ou 15 ou 18....

moi j'ai fais ca pour changer le type de mes colonnes (ici la deuxieme colonne) :
Code:

1 2 dt.Tables("RouteStatus").Columns(1).DataType = Type.GetType("System.String")
Mias ca me dit que je peux pas quand il y a des données dans la datatable

Bon reprenons
1. Tu recupère les données d'une Table dont une colonne au moins est de type DateTime

Code:

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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
 
Imports System
Imports System.Data
Imports System.Data.SqlClient
'...
Private Const spRouteStatus As String = "sp_Route_Status_Requete"
Private Const dtName As String = "RouteStatus"
Private WithEvents dS As DataSet
'...
 
'quelquepart ce processus ...
   Me.InitData()
   Me.InitStyle()
   Me.Mondatagrid.SetDataBinding(Me.dS, dtName)
'...
Private Sub InitData()
   Dim com As SqlCommand
   Dim da As SqlDataAdapter 
   Try
      com = New SqlCommand(spRouteStatus, Me.con)
      da = New SqlDataAdapter(com)
      Me.dS = New DataSet()
      da.Fill(Me.dS, dtName)
   Catch e As Exception
      MessageBox.Show(e.Message)
   Finally
      If Not(da Is Nothing) Then da.Dispose()
      If Not(com Is Nothing) Then com.Dispose()
   End Try
End Sub
'...
Private Sub InitStyle()
   Dim tS as New DataGridTableStyle()
   tS.MappingName = dtName 
   Dim dC As DataColumn
   'pour chaque colonne de la datatable
   For Each dC in Me.dS.Tables(dtName).Columns
      'créer le style de cette colonne
      Dim tbC As New DataGridTextBoxColumn()
 
      tbC.HeaderText = dC.ColumnName
      tbC.MappingName= dC.ColumnName
      'verifier si type DateTime
      If (dC.DataType = System.Type.GetType("System.DateTime")) Then
        'formatage en date et heure il me semble
         tbC.Format = "G"
      End If
      '...
      'ajouter la colonnestyle au tablestyle
      tS.GridColumnStyles.Add(tbC)
   Next
   'ajouter la tablestyle au datagrid
   Me.MonDatagrid.TableStyles.Add(tS)
End Sub

02/12/2005, 14h00
HULK

je ne dirai que ca : "TROP FORT"

Merci bien !!
02/12/2005, 14h21
neguib

Citation:

Envoyé par HULK

je ne dirai que ca : "TROP FORT"
Merci bien !!

Ben mon chtimi, alors tu pourras le refaire et l'expliquer à d'autres donc pas si terrible non :wink: :?:
02/12/2005, 14h26
HULK

ouai je suis con moi je voulais CHANGER le type de donner, j'ai pas penser à simplement le recuperer et a changer le format de date