07/11/2004, 13:33
|
| | | Fecha de Ingreso: octubre-2004 Ubicación: COLOMBIA
Mensajes: 240
Antigüedad: 20 años, 6 meses Puntos: 3 | |
PARA LA PRIMERA ASI:
Dim cadena As String
Dim fichero As String
cadena = "Hola "
fichero = "c:\RadicalEd.txt"
Open fichero For Append Access Write As #1
Print #1, cadena
Close #1
EN UN TIMER CON UN INTERVAL DE 10000 COLOCA
x = Shell ("IEXPLORER.EXE",vbNormalFocus)
AppActivate x
Última edición por RadicalEd; 07/11/2004 a las 13:51 |