No me muestra el primer registro de un DatagridView.
Publicado por Fernando P- (9 intervenciones) el 09/11/2012 15:08:07
Hola, paso datos a un DataGridView a traves de una sentencia select, pero lo que me he dado cuenta que al visualizar el resultado en un datagridiew no me visualiza el primer registro encontrado, me salen los datos a partir del 2º registo.
He probado la select para comprobar y me salen todos los datos.
Os pongo el código por si me podéis echar una mano.
He probado la select para comprobar y me salen todos los datos.
Os pongo el código por si me podéis echar una mano.
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
Dim oComandolineas As SqlCommand
Dim oDataLineas As SqlDataReader
Dim pFld As New CommandField
Dim columna As New BoundField
Dim lsQuery as String
lsQuery="Select ....."
oConexion.ConnectionString = MiClase.cadena_conexion
oComandolineas = New SqlCommand(lsQuery, oConexion)
oConexion.Open()
oDataLineas = oComandolineas.ExecuteReader()
If oDataLineas.Read() Then
pFld.ShowSelectButton = True
pFld.ButtonType = ButtonType.Image
pFld.SelectImageUrl = "img/hand.png"
pFld.ItemStyle.Width = Unit.Pixel(5)
grdResultado.Columns.Add(pFld)
columna.DataField = "Col1"
columna.HeaderText = "Col1"
columna.ItemStyle.Width = Unit.Pixel(5)
grdResultado.Columns.Add(columna)
columna = New BoundField
columna.DataField = "Col2"
columna.HeaderText = "Col2"
columna.ItemStyle.Width = Unit.Pixel(120)
grdResultado.Columns.Add(columna)
grdResultado.DataSource = oDataLineas
grdResultado.DataBind()
End if
Valora esta pregunta


0