Programación General > Visual Basic 6.0 e inferiores
Recuperar El Nombre Del Campo
pmike:
Hola amigos.
Intento recuperar el nombre del campo de un dato en concreto de un DataGrid cuando se clica sobre el.
tengo el siguiente procedimiento pero solo me da el numero de la columna y registro (row y col)
Private Sub DataGridE_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
' Imprime el texto, fila y columna de la celda que pulsó el usuario.
Debug.Print DataGridE.Text; DataGridE.Row; DataGridE.Col
End Sub
Simplemente deseo recuperar el nombre del campo por ejemplo
hago clik en miguel para que me devuelva nombre.
Gracias
pmike:
Ya esta encontre la solucion, no era dificil.
Para recuperar el nombre de los atributos de una tabla en una bd.
Una vez producida la conexion con la bd definimos un tipo de field llamado 'campo'
y tambien un recordset para recorrer la bd q es 'rsConulTodo'
y luego devolvemos los atributos(name) y el valor de los mismos(Value) a un simple List mediante un bucle
campo As ADODB.Field
For Each campo In rsConsulTodo.Fields
List1.AddItem " " & campo.Name & ""
List2.AddItem "" & campo.Value & ""
Next campo
gege nada dificil
nos vemos
RadicalEd:
En el evento Click del DataGrid puedes colocarlo más facil todavia.
List1.AddItem DataGrid1.Text
Ojala te sirva.
Chao
pmike:
Veras RadicalEd.
Lo q consigues con
List1.AddItem DataGrid1.Text
es devolver de la bd el contenido de la informacion a un atributo dado
pero no el nombre de dicho atributo
No es lo mismo devolver
edad ->nombre del atributo de la bd
22 -> valor del atributo
salud
Jose Arriagada:
Estas funciones te entregan informacion de tu consulta a una tabla
** Cantidad de registros recuperados
CantReg = control.RECORDCOUNT - 1
** Cantidad de Columnas
CantCols = control.FIELDS.COUNT - 1
** Nombre de los campos
for i = 0 to CantCols
NombreCampo = control.FIELDS( i ).NAME
next i
** Valor de los campos
for i = 0 to CantCols
ValorCampo = control.FIELDS( i ).value
next i
Navegación
[#] Página Siguiente
Ir a la versión completa