Foros del Web » Programación para mayores de 30 ;) » .NET »

cargar textbox con datos del ListView

Estas en el tema de cargar textbox con datos del ListView en el foro de .NET en Foros del Web. Hola Gente, Necesito de su sabiduria. Tengo un proyecto en el cual cuenta con 2 forms llamare form1 y form 2. En el form1 tengo ...
  #1 (permalink)  
Antiguo 08/07/2009, 12:21
 
Fecha de Ingreso: mayo-2009
Mensajes: 12
Antigüedad: 14 años, 11 meses
Puntos: 0
De acuerdo cargar textbox con datos del ListView

Hola Gente,
Necesito de su sabiduria.

Tengo un proyecto en el cual cuenta con 2 forms llamare form1 y form 2.

En el form1 tengo varios textbox en el form 2 tengo un listView (FORM2) que esta cargado con datos de una base de datos de oracle.

Hasta el momento lo unico que hace mi programa es cargar los datos en el list view y desde el form 1 agregarlos.

Lo que necesito es seleccionar una de las filas del listview y pasarlas a los text box del form 1.

Las columnas del Listview se llaman CODIGO, CEDULA, NOMBRE , TELEFONO, DIRECCION, FECHA DE INGRESO.

POr favor ayudarme con esto, les adjunto el codigo de como le estoy cargando los datos de la base...

++++++++++++++++++++++++++++++++++++++++++++++++++ ++++++++++++++++++++
Imports System.Data.OracleClient
Imports System.Collections


Public Class MuestraClientes
Dim cn As OracleConnection

Dim daClientes As OracleDataAdapter

Dim dsDatos As DataSet

Private Sub MuestraClientes_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
cn = New OracleConnection(Principal.stringconexion)

daClientes = New OracleDataAdapter("SELECT * from CLIENTES ORDER BY COD_CLIENTES", cn)

dsDatos = New DataSet

daClientes.Fill(dsDatos, "CLIENTES")

ListView1.Items.Clear()
Dim i As Integer
For i = 0 To dsDatos.Tables("CLIENTES").Rows.Count - 1
ListView1.Items.Add(dsDatos.Tables("CLIENTES").Row s(i)("COD_CLIENTES"))
ListView1.Items(i).SubItems.Add(dsDatos.Tables("CL IENTES").Rows(i)("CEDULA"))
ListView1.Items(i).SubItems.Add(dsDatos.Tables("CL IENTES").Rows(i)("NOMBRE"))
ListView1.Items(i).SubItems.Add(dsDatos.Tables("CL IENTES").Rows(i)("TELEFONO"))
ListView1.Items(i).SubItems.Add(dsDatos.Tables("CL IENTES").Rows(i)("DIRECCION"))
ListView1.Items(i).SubItems.Add(dsDatos.Tables("CL IENTES").Rows(i)("FECHAINGRESO"))

Next

End Sub

++++++++++++++++++++++++++++++++++++++++++++++++++ ++++++++++++++++++++

Agradesco cualquier ayuda que me puedan brindar...
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:55.