Foro de elhacker.net

Programación => 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
Código:
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

Código:
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