Test Foro de elhacker.net SMF 2.1

¿Cómo puedo hacer para que muestren los datos en de ciertos campos de tablas en textbox específicos usando VB.NET?

Por ejemplo que de la tabla DatosPersonas que contiene los campos Nombre, Apellido, Edad me muestre solo el campo Nombre en un textbox txtNombre.

La verdad es que no se cómo hago esto solo conseguí que me mostrara los datos usando un DataGridView usando:

   dtTabla.Rows.Clear()
       Dim cmdDatos As New MySqlCommand("Select * from DatosBasicos", Conexion)
       Dim da As New MySqlDataAdapter(cmdDatos)
       da.Fill(dtTabla)
       Me.dgvDatos.DataSource = dtTabla

Estoy aprendiendo esta parte de Base de datos y a pesar de que estoy leyendo un PDF sobre .NET necesito un poco de ayuda en esta parte.

Bueno, ya pude hacerlo, busqué un poco más y encontré esto:
http://social.msdn.microsoft.com/Forums/es/vbes/thread/14123c34-c0ff-4344-b8bd-f84b03e2e4c5

Era cuestión de primero cargar el DataTable y luego hacer esto :P:

   
        Dim row As DataRow = dtTabla.Rows(0) 'Aqui cambio la fila de la cual quiero mostrar, en este caso la primera fila (posicion cero)
        TextBox1.Text = CStr(row("nombre"))

Gracias igual, cualquier otra consulta vuelvo a molestar de nuevo, je.
Saludos.

Cita de: Argentino Canejo en 16 Octubre 2012, 05:18 AM
Bueno, ya pude hacerlo, busqué un poco más y encontré esto:
http://social.msdn.microsoft.com/Forums/es/vbes/thread/14123c34-c0ff-4344-b8bd-f84b03e2e4c5

Era cuestión de primero cargar el DataTable y luego hacer esto :P:

Código (vbnet) [Seleccionar] Expandir

   
        Dim row As DataRow = dtTabla.Rows(0) 'Aqui cambio la fila de la cual quiero mostrar, en este caso la primera fila (posicion cero)
        TextBox1.Text = CStr(row("nombre"))

Gracias igual, cualquier otra consulta vuelvo a molestar de nuevo, je.
Saludos.

tomando en cuenta q deberias hacer esto



if isnothing(dt.tabla) = false then   
        Dim row As DataRow = dtTabla.Rows(0) 'Aqui cambio la fila de la cual quiero mostrar, en este caso la primera fila (posicion cero)
        TextBox1.Text = CStr(row("nombre"))
else
textbox1.text="Vacio"
end if

valida siempre ;)

Cita de: Argentino Canejo en 16 Octubre 2012, 05:18 AM
Bueno, ya pude hacerlo, busqué un poco más y encontré esto:
http://social.msdn.microsoft.com/Forums/es/vbes/thread/14123c34-c0ff-4344-b8bd-f84b03e2e4c5

Era cuestión de primero cargar el DataTable y luego hacer esto :P:

Código (vbnet) [Seleccionar] Expandir

   
        Dim row As DataRow = dtTabla.Rows(0) 'Aqui cambio la fila de la cual quiero mostrar, en este caso la primera fila (posicion cero)
        TextBox1.Text = CStr(row("nombre"))

Gracias igual, cualquier otra consulta vuelvo a molestar de nuevo, je.
Saludos.

Encontré esto que quizás te sirva.
http://www.forosdelweb.com/f29/vb-net-mysql-asignar-valor-campo-variable-986233/

lo podes hacer con DataReader es lo mas facil que hay, es como si fuera un recordset comun.

Cita de: Argentino Canejo en 16 Octubre 2012, 03:35 AM
¿Cómo puedo hacer para que muestren los datos en de ciertos campos de tablas en textbox específicos usando VB.NET?

Por ejemplo que de la tabla DatosPersonas que contiene los campos Nombre, Apellido, Edad me muestre solo el campo Nombre en un textbox txtNombre.

La verdad es que no se cómo hago esto solo conseguí que me mostrara los datos usando un DataGridView usando:

Código (vbnet) [Seleccionar] Expandir

    dtTabla.Rows.Clear()
        Dim cmdDatos As New MySqlCommand("Select * from DatosBasicos", Conexion)
        Dim da As New MySqlDataAdapter(cmdDatos)
        da.Fill(dtTabla)
        Me.dgvDatos.DataSource = dtTabla

Estoy aprendiendo esta parte de Base de datos y a pesar de que estoy leyendo un PDF sobre .NET necesito un poco de ayuda en esta parte.

Cita de: seba123neo en 16 Octubre 2012, 14:26 PM
lo podes hacer con DataReader es lo mas facil que hay, es como si fuera un recordset comun.

Bueno, seba123neo, siguiendo tu info, también me puse a practicar con MySQL y todo eso. Ahora, no se si está bien pero hice esto, por ejemplo:


        Dim id_puntero As Integer
        id_puntero = InputBox("Indicar id")
        Conexion.Open()

        Dim cmd As New MySqlCommand("SELECT * from MiTabla", Conexion)
        Using leerdato As MySqlDataReader = cmd.ExecuteReader()
            While leerdato.Read()
                If id_puntero = leerdato("id") Then
                    'MsgBox("es " & leerdato("id"))
                    txtNombre.Text = leerdato("nombre")
                End If
            End While
        End Using
        Conexion.Close()

O sea, que me muestre el valor correspondiente en txtNombre, en este caso el valor de "nombre" pero según el valor id que le ingreso.

Con este código me funciona perfectamente, pero pregunto... ¿es eficiente o hay alguna otra manera de hacerlo más directo?. Gracias. :P

la consulta SQL deberia ser asi:

SELECT * from MiTabla WHERE id = 'el id que ingresaste'

y despues no tendrias que recorrer nada, simplemente hacer.

If leerdato.Read()
     txtNombre.Text = leerdato("nombre")
End if

saludos.

Cita de: seba123neo en 19 Octubre 2012, 00:26 AM
la consulta SQL deberia ser asi:

SELECT * from MiTabla WHERE id = 'el id que ingresaste'

y despues no tendrias que recorrer nada, simplemente hacer.

Código (vbnet) [Seleccionar] Expandir

If leerdato.Read()
     txtNombre.Text = leerdato("nombre")
End if

saludos.

exactamente tomando en cuenta de su respectivo dispose o close para cerrar la conexion

Cita de: Lucas.AR en 16 Octubre 2012, 08:03 AM
Encontré esto que quizás te sirva.
http://www.forosdelweb.com/f29/vb-net-mysql-asignar-valor-campo-variable-986233/

Con esto me va mucho mejor, gracias.

Cita de: seba123neo en 19 Octubre 2012, 00:26 AM
la consulta SQL deberia ser asi:

SELECT * from MiTabla WHERE id = 'el id que ingresaste'

y despues no tendrias que recorrer nada, simplemente hacer.

Código (vbnet) [Seleccionar] Expandir

If leerdato.Read()
     txtNombre.Text = leerdato("nombre")
End if

saludos.

Creo que me voy satisfecho con toda esta info. Muchas gracias a todos.