Autor Tema: archivos.dat  (Leído 2811 veces)

0 Usuarios y 1 Visitante están viendo este tema.

cubaweb

  • Bit
  • Mensajes: 1
  • Reputación: +0/-0
    • Ver Perfil
archivos.dat
« en: Febrero 07, 2010, 08:35:12 pm »

hola saludos a todos.Bien el problema es el sgte tengo 2 formularios en uno de ellos tengo 3 textbox y un boton de comando.,(textbox) name ,lastname,phone, donde el boton de comando guarda los datos en un archivo dat, de la sgte forma :

Open "J:\Christiam\VB\Project\Project.dat" For Append As #1
Print #1, txtname.Text & ";" & txtlastname.Text & ";" & txtphone
Close #1

ahora tengo otro formulario aparte donde tengo un listview nada mas.
entonces quiero ver el archivo project.dat en el listview , en otras palabras deseo que cada vez que carge los textbox del primer formulario se me actualice la misma informacion en el segundo formulario del listview.

pd se que se puede hacer en el mismo formulario pero lo necesito por separado.
desde ya muchisimas gracias.
 codigo :

Private Sub cmdguardar_Click()
'Verifica si la caja esta vacia.'
If Len(Trim(txtname.Text)) = 0 Then
MsgBox ("please you must introduce the name")
'Hace que la caja reciba el enfoque'
txtname.SetFocus

ElseIf Len(Trim(txtlastname.Text)) = 0 Then
MsgBox ("please you must introduce the lastname")
txtlastname.SetFocus

ElseIf Len(Trim(txtphone.Text)) = 0 Then
MsgBox ("please you must introduce the phone")
txtphone.SetFocus

Else

Open "J:\Christiam\VB\Project\Project.dat" For Append As #1
Print #1, txtname.Text & ";" & txtlastname.Text & ";" & txtphone
Form3.ListView1 (aca me dice uso no valido de la propiedad)
Close #1

'Clear cajas de textos'
txtname.Text = ""
txtlastname.Text = ""
txtphone.Text = ""

txtname.SetFocus
MsgBox ("El nuevo contacto ha sido agregado")
End If
End Sub



mi mail christiam.ledo@hotmail.com

cobein

  • Moderador Global
  • Gigabyte
  • *****
  • Mensajes: 348
  • Reputación: +63/-0
  • Más Argentino que el morcipan
    • Ver Perfil
Re:archivos.dat
« Respuesta #1 en: Febrero 07, 2010, 09:04:10 pm »
Si no te queres complicar mucho en la misma rutina donde agregas los datos en el archivo, llamas al <form>.<control>.<add> y los agregas directamente al listview.

Bien mintrasecribia esto pare para ver el code y veo que tenes esto "Form3.ListView1 (aca me dice uso no valido de la propiedad)" tendria que funcionar sin problemas... a no ser ue el formulario este modal... pero no estoy seguro. si esta modal y no te deja introducir los datos directamente lo que podes hacer es tener un .bas y ahi declarar un par de variables donde guardas los datos a agregar y posiblemente un flag que te indique que hay datos nuevos y en el form primario despues del show verificas si hay datos y los cargas.

No se si se comprendio lo que explique pero bueno espero te  ayude.