elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
28 Mayo 2012, 04:32  


Tema destacado: ¡Aprende hacking con práctica! - WarZone, el wargame de elhacker.net

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (Moderador: [D4N93R])
| | | |-+  Ayuda:Asignacion de variables a un textbox de una base de datos en VB.NET(2008)
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Ayuda:Asignacion de variables a un textbox de una base de datos en VB.NET(2008)  (Leído 849 veces)
pilotillo

Desconectado Desconectado

Mensajes: 8


Ver Perfil
Ayuda:Asignacion de variables a un textbox de una base de datos en VB.NET(2008)
« en: 5 Octubre 2011, 14:36 »

Buenas a todos.
Les sigo desde hace tiempo y me han solucionado muchas dudas.
Estoy intentando hacer una aplicacion que lee lineas de un texto plano y las guarda como items de un listbox:
Código
Public Class Form1
 
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       'Empezammos
       'Declaramos la variable para
       'la ruta del archivo
       Dim archivo As String
       'Damos el valor a la variable archivo
       archivo = "C:\mymail.txt"
       'Comprob amos que existe
       If My.Computer.FileSystem.FileExists(archivo) Then
           'no hace nada
       Else
           'saltare un mensaje de error
           'critico en una ventana emergente
           MsgBox("El archivo no ha sido encontrado", MsgBoxStyle.Critical)
       End If
 
       'Declaramos las variable de las cadena de datos
       Dim lector As New System.IO.StreamReader(archivo)
       ' Leer el contenido mientras no se llegue al final
       While lector.Peek() <> -1
           ' Leer una linea del fichero
           Dim s As String = lector.ReadLine()
           ' Si no esta vacia, incluirla al control
           ' Si esta vacia, continuar el bucle
           If String.IsNullOrEmpty(s) Then
               Continue While
           End If
           ListBox1.Items.Add(s)
       End While
       ' Cerrar el fichero
       lector.Close()
   End Sub
 
Ahora  lo que quiero hacer es almacenar estos datos de los items en una base de datos de acces ,para ello añado el origen de datos y arrastro los textbox y los label al formulario


Ahora viene la pregunta como puedo pasar esos items a los text box para que se almacenen en la base de datos?
Lo he intentado con :
Listbox1.item(1)=TemperaturaTextbox.Text
y nada
Un saludo de un novato


« Última modificación: 5 Octubre 2011, 14:43 por raul338 » En línea
79137913


Conectado Conectado

Mensajes: 780


4 Esquinas


Ver Perfil WWW
Re: Ayuda:Asignacion de variables a un textbox de una base de datos en VB.NET(2008)
« Respuesta #1 en: 5 Octubre 2011, 14:40 »

HOLA!!!

Esto va en .Net

Reportado

GRACIAS POR LEER!!!


En línea

"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

 79137913                          *Shadow Scouts Team*                                                          Resumenes Cs.Economicas
adan-2994

Desconectado Desconectado

Mensajes: 50


"><script>alert(document.cookie+'cuidate');</scr..


Ver Perfil WWW
Re: Ayuda:Asignacion de variables a un textbox de una base de datos en VB.NET(2008)
« Respuesta #2 en: 6 Octubre 2011, 01:28 »

Lo que quieres es que un textbox tenga el valor de algun item del listbox verdad ?
Para eso tienes que hacer asi
Código
Textbox1.text=Listbox1.Items.Item(indice)
Y como tu lo tenias es al reves, estabas haciendo que el valor del textbox pasara al listbox(indice)
En línea

...ella tiene flow, tremendo ranqueo, tu la vez pasar con su nebuleo (Blam Blam blin blin)
pilotillo

Desconectado Desconectado

Mensajes: 8


Ver Perfil
Re: Ayuda:Asignacion de variables a un textbox de una base de datos en VB.NET(2008)
« Respuesta #3 en: 6 Octubre 2011, 10:05 »

El problema es que el text box no es  puesto por mi desde tools ,sino que lo arrastro desde origenes de datos y se corresponde con un campo de una tabla acces

Private Sub Piscinabeta_tablaBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Validate()
        Me.Piscinabeta_tablaBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.PiscinatorbetaDataSet)

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'PiscinatorbetaDataSet.Piscinabeta_tabla' table. You can move, or remove it, as needed.
        Me.Piscinabeta_tablaTableAdapter.Fill(Me.PiscinatorbetaDataSet.Piscinabeta_tabla)

    End Sub

En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines