Foro de elhacker.net

hola buenas tardes  soy nuevo  utilizando visual basic  necesito realizar un rpograma   en vb para abrir un archivo  necesito saber cual es la forma de abrirlo de modo lectura y modo escritura  tambien leerlo linea por linea por su ayuda muchas gracias  hasta el momento  ya  tengo la solucion de como abrir el archivo solo que  no  he podido escribir en el y tampoco  se como leerlo linea por linea por su atencion gracias .

Google es tu amigo...
:http://www.recursosvisualbasic.com.ar/htm/tutoriales/tutorial-basico7.htm

este es mi codigo con el cual abro un archivo agregando yo la ruta utilizando 2  cajas te d texto pero no se como recorrer el archivo linea por linea acontinuacion  muestro el codigo que estoy utilizando

Option Explicit
Dim lalo As String
Dim renglon As String
Dim Ruta As String

Private Sub Command1_Click()
Ruta = Text2.Text
renglon = Chr(13) & Chr(10)
Open Ruta For Input As #1
While Not EOF(1)
Line Input #1, lalo$
Text1.Text = Text1.Text & lalo & renglon
Wend
Close #1

gracias por tu respuesta alex@shelroot

Intentad así:

Dim lalo As String
 
Private Sub Command1_Click()
  Open Text2.Text For Input As #1
    While Not EOF(1)
      Line Input #1, lalo
      Text1.Text = Text1.Text & lalo & Chr(13) & Chr(10)
    Wend
  Close #1
End Sub

hola alex root  gracias por colaborar en mi proyecto   la solucion que me diste  realiza lo mismo que mi solucion anterior me abre mi documento en el text1 gracias por tu atencion me podris proporcionar tu msn para vr si me puedes brindar tu ayuda??' gracias de cualquier forma

Seh!. Esque no sabia si te salia error, o que xD

POSTEA tus dudas aquí en el foro, todos podran ayudarté!

ok muchas gracias de todas formas   pues si ya logre abrir el archivo de texto con visual basic en forma de solo lectura en lo anterior esta el codigo con el cual se logra hacer esto con 2 cuadros te texto ahora mi duda es como  poder abrirlos en forma de esctritura. 


 ;D gracias alex por tu ayuda

:http://www.recursosvisualbasic.com.ar/htm/tutoriales/tutorial-basico7.htm#print-write

lee el tuto que te dejaron, es decir, sigue el enlace, ahí tenes la info que necesitas.

Advertencia - mientras estabas escribiendo, una nueva respuesta fue publicada. Probablemente desees revisar tu mensaje.

hola que tal como  estan gracias por su ayuda pues ahora ya puedo abrir el archivo ya sea que  yo cree  el archivo con visual o que ya este creado y solo abrirlo solo que solo puedo  escribir un texto estarico me gustaria poder escribir  cualquier texto   y poder cambiarlo a conveniencia por su atencion gracias.

xD, no se te entendio un Fuck!

:http://www.recursosvisualbasic.com.ar/htm/utilidades-codigo-fuente/procesador_de_texto.htm

jejej si supongo que no me supe explicar mira tengo este codigo


Private Sub Command1_Click()
NumArchivo = FreeFile
Open "C:\Users\INGENIERO\Desktop\LALO.TXT" For Append As #NumArchivo
Write #NumArchivo, "HOLA";
Close #NumArchivo
Shell "C:\WINDOWS\System32\notepad.exe  C:\Users\INGENIERO\Desktop\LALO.TXT"
End Sub



con el cual creo un  archivo de texto  y escribo en el pero solo es un  texto preeestablecido    en este caso     !!!! HOLA      PERO QUIERO   ABRIR EL ARCHIVO Y ESCRIBIR LO QUE SEA  CUALQUIER COSA

xD simple... Modifica la linea

Write #NumArchivo, "HOLA"

por esto

Write #NumArchivo, Text1.Text

xD

OK OK MUCHAS GRACIAS   ESTA  DE LUJO
TUS RESPUESTAS SON DE MUCHA AYUDA  ALEX OYE  AHORA  DIGAMSO YA PUEDO ABRIR Y ESCRIBIR EN MI  ARCHIVO DE TEXTO PERO SI QUISIERA REALIZAR UNA BUSQUEDA DIGAMOS POR NOMBRE??? CUAL SERIA EL CODIGO??'

Es depende de como lo quieras hacer, es decir, si es lo que me estoy imaginando, te recomiendo el objeto RichTextBox

:http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/9.htm

gracias alex si era eso ahora lo adaptare a mi codigo  ammm  solo me queda una duda sobre codigos de conexiones a bases de datos es decir  primero de una base de datos con visual basic  si tuvieras algun ejemplo simple gracias  x tu ayuda

A que tipo de base de datos?

:http://www.elguille.info/vb/bases/ADO/indiceADO.htm

no entendi lo que quisiste decir..

por ejemplo que haya una palabra (digamos carne) y que busque todas las palabras carne en dicho archivo "?

Eso mismo entendi yo, asi que por eso le recomende el objeto RichTextBox. Creo que con èl, se puede hacer...  :silbar:

asi es que me muestre las lineas en donde esta este resultado  para poder dspues alomejor  alterarlo

si deseo realizar la busqueda tal y como la plantearon ustedes   este archivo contendra nombres en el cuanl io introducire el nombre y que se posicione donde esta el    nombre que yo antes he referido   ten go este codigo con el cual ya tengo establecido   abrir el archivo que yo deseo y  lo muestro en pantalla.



Option Explicit
Dim lalo As String
Dim renglon As String
Dim Ruta As String

Private Sub Command1_Click()
Ruta = Text2.Text
renglon = Chr(13) & Chr(10)
Open Ruta For Input As #1
While Not EOF(1)
Line Input #1, lalo$
Text1.Text = Text1.Text & lalo & renglon
Wend

Close #1

End Sub

Cuando realices un POST, especifica si es una duda, o sugerencia XD. Porque no sè lo que estas haciendo o preguntando... :P