Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

registro actual

10/05/2006 - 20:08 por Jose | Informe spam
Ayuda Hacer una pregunta
Estimados tengo el siguiente codigo. Quiero saber una vez encuentre el
registro mostrar el actual. La ultima linea de codigo creo esta mal. Como es
la correcta?
Gracias de antemano,

Dim fila As DataRow

Dim llaveprimaria(0) As DataColumn

llaveprimaria(0) = dasedo.Tables("tabest").Columns("codigo")

dasedo.Tables("tabest").PrimaryKey() = llaveprimaria

fila = dasedo.Tables("tabest").Rows.Find(c_idfind)

Me.BindingContext(dasedo, "tabest").Position = 1
email Siga el debateRespuesta 5 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Carlos Gómez
10/05/2006 - 20:34 | Informe spam
Te falta guardar una referencia al objeto BindingManagerBase, que es el que
se encarga del tema position (por cierto el primer elemento es el 0 (cero)
no el 1:
...

fila = dasedo.Tables("tabest").Rows.Find(c_idfind)

'Creo que no-->Me.BindingContext(dasedo, "tabest").Position = 1


'Continua con:
Dim WithEvents bmb as BindingManagerBase
bmb = Me.BindiengContext(daseodo, "tabest")
If bmb.Count>0 Then
bmb.Position = 0
Else
MessageBox.Show("No hay registros que mostrar")
End If



Jose wrote:

Estimados tengo el siguiente codigo. Quiero saber una vez encuentre el
registro mostrar el actual. La ultima linea de codigo creo esta mal. Como
es la correcta?
Gracias de antemano,

Dim fila As DataRow

Dim llaveprimaria(0) As DataColumn

llaveprimaria(0) = dasedo.Tables("tabest").Columns("codigo")

dasedo.Tables("tabest").PrimaryKey() = llaveprimaria

fila = dasedo.Tables("tabest").Rows.Find(c_idfind)

Me.BindingContext(dasedo, "tabest").Position = 1

Preguntas similares

 

Busqueda sugerida :