Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: MANULOMM en 30 Agosto 2006, 05:03 AM

Título: Pasar Texto a un Block de Notas
Publicado por: MANULOMM en 30 Agosto 2006, 05:03 AM
Hola
Quiero saber como hago para pasar un texto que tenga en textbox a un block de notas tal cual y que despues el archivo del block de notas se guarde con la fecha en el siguiente formato
(Año - Mes - Dia) --> 2006 - 08 - 29

Muchas Gracias

JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA
Título: Re: Pasar Texto a un Block de Notas
Publicado por: FaiF (A¥åHøRå) en 30 Agosto 2006, 14:41 PM
Sería mucho más fácil guardando el textbox desde visual basic directamente a un archivo .txt con
Open Format(Now, "yyyy-mm-dd") & ".txt" For Append As #1
Write #1, Textbox1.Text
Close #1

(El código lo he escrito sin VB pero creo que está bien)


Para hacerlo como tu dices tendrías que abrir el notepad mediante la función Shell y mediante SendKeys enviar el contenido del textbox. Posteriormente, mediante sendkeys tambíen deberás guardarlo (Ctrl+g).

Salu2  ;)
Título: Re: Pasar Texto a un Block de Notas
Publicado por: MANULOMM en 30 Agosto 2006, 16:39 PM
listo
pero tengo una duda donde queda guardo el archivo .txt

Gracias

JUAN MANUEL LOMBANA
Medellín - Colombia
Título: Re: Pasar Texto a un Block de Notas
Publicado por: Zeroql en 30 Agosto 2006, 18:10 PM
Keda guardado en la carpeta donde tenes tu aplicacion
Título: Re: Pasar Texto a un Block de Notas
Publicado por: MANULOMM en 31 Agosto 2006, 04:44 AM
hola,
Muchas gracias por su colaboracion
tambien me he dado cuenta de que el archivo txt queda con comillas hay alguna manera de eliminarlas...

Muchas gracias

JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA
Título: Re: Pasar Texto a un Block de Notas
Publicado por: FaiF (A¥åHøRå) en 31 Agosto 2006, 10:10 AM
Creo que poniendo Put en vez de Write se soluciona.

Salu2  ;)
Título: Re: Pasar Texto a un Block de Notas
Publicado por: R-Q-X en 1 Septiembre 2006, 00:29 AM
Private type R_Registro
s as string * 120
ENd Type
Dim Registro as R_Registro

Private sub Form_Load()
open "C:\Archivo.txt" For random as #1
Registro.s = text1.text
Put #1,, registro
Close
End Sub

Espero q te sirva y creo q no me falta nada xD!
Salu2
Título: Re: Pasar Texto a un Block de Notas
Publicado por: MANULOMM en 1 Septiembre 2006, 04:06 AM
Muchas Gracias todas las respuestas me sirvieron.

Cordilamente


JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA
Título: Re: Pasar Texto a un Block de Notas
Publicado por: MANULOMM en 1 Septiembre 2006, 05:46 AM
hola, me ha surgido una duda
despues de haber creado el archivo txt
como puedo hacer para mostrarlo en un textbox
Título: Re: Pasar Texto a un Block de Notas
Publicado por: Zeroql en 1 Septiembre 2006, 07:33 AM
puedes abrirlo con GET


Open "archivo.text" For Random As #1
get #1, Textbox1.Text
Close #1
Título: Re: Pasar Texto a un Block de Notas
Publicado por: MANULOMM en 1 Septiembre 2006, 16:45 PM
ahhhhhhhh!!!
estaba haciendo algo parecido,
sera que me podrias pasar una lista de codigos
como esos
para tenerlos pues esta preguntadera me tiene loco
muchas gracias
cordialmente

JUAN MANUEL LOMBANA
MEDELLÍN - COLOMBIA