UNA Pregunta muy simple

Iniciado por crauss, 15 Enero 2008, 19:28 PM

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

cassiani

 El ejemplo anterior te puede servir tambien para otro programita. Como no te explicaste bien y no se si siempre usaras el block de notas, te doy otra solucion, tu diras cual te sirve, ¡claro! es posible que ninguna te sirva, ja, ja  :rolleyes:

Si siempre vas a usar el block de notas, entonces, porque no crear un txt y grabarle lo que queres mostrar y luego ejecutarlo...

Option Explicit

Private Sub CmdAcerca_de_mi_Click()
Dim CanalLibre As Integer
    CanalLibre = FreeFile
    Open "C:\Acerca_de_mi.txt" For Output As CanalLibre
        Print #CanalLibre, "Mi nombre o..."
    Close CanalLibre
    Shell ("notepad.exe c:\Acerca_de_mi.txt")
End Sub


S4lu2 igual...  :o

Syddhartha

Citarno me conoces
Es verdad no te conozco, quiza hable de mas, pero bueno, es que no entiendo porque hay gente que se enoja cuando preguntan, ni que preguntara como hackear un fotolog xD!!.
Aca esta mi manera, es la de C@ss¡@n¡ de una manera mas simple:
Open "c:\agenda.txt" For Append As #1
    Print #1, "Agenda" 'Primera linea que se va a insertar en el txt.
    Print #1, "@@@@" 'segunda linea que se vaa a insertar en el txt.
    ' Podes ingresar todas las lineas que quieras.
Close #1


Lo que hace es abrir (Open) un archivo agenda.txt. Como podes abrir 10 archivos a la ves nomas, estan numerados (As #1 ) . Si el arhivo agenda no existe, lo crea. Despues le inserta lineas al  txt  que queramos (print) o si tenemos abiero otro e el casillero #2 por ej. le cambiamos el print #1 por print #2. Espero averte ayudado y que no te allas echo mucho revuelo con todo esto xD