Visual Basic - MACRO URGENTE!!!!!!!!

Life is soft - evento anual de software empresarial
 
Vista:

MACRO URGENTE!!!!!!!!

Publicado por Guillemo (1 intervención) el 04/10/2000 00:00:00
Quisiera saber si puedo implementar la siguiente idea:
En una hoja de Word en HTML (para leerla desde Explorer), activar una pantalla de consulta en la cual escriba los datos en un textbox y al apretar el boton "enviar" me lo guarde en un archivo nuevo o me lo agregue a uno ya creado, sin borrar lo anterior. Esto es necesario porque quiero poner un formulario (similar al que se llena cualquier pagina HTML) en el cual se puedan enviar consultas, pero la PC no tiene red porque se encuentra en un lugar muy alejado, la unica forma es grabar todos los mensajes del día en un archivo (en lo posible que sea invisible por el usuario) y bajarlos en un diskette para luego procesarlos.

Desde ya muchas gracias por la atención brindada,

Saludos,

Guillemo Moriconi
Córdoba - Argentina
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:MACRO URGENTE!!!!!!!!

Publicado por tecniCam (220 intervenciones) el 04/10/2000 00:00:00
En este ejemplo se utiliza la instrucción Write # para escribir datos no procesados en un archivo secuencial.
Open "PRUEBA" For Output As #1 ´ Abre el archivo para operaciones de salida.
Write #1, "Hola a todos ", 234 ´ Delimita con comas los datos introducidos.
Write #1, ´ Coloca una línea en blanco.
´ Se establecen valores Boolean, Date, Null y Error.
MiBool = False : MiDate = #February 12, 1969# : MiNull = Null
MiError = CVErr(32767)
´ Los datos booleanos se escriben como #TRUE# o #FALSE#. Los literales
´ de fecha se escriben en el formato de fecha universal, por ejemplo,
´ #1994-07-13# representa 13 de julio de 1994. Los datos nulos se
´ escriben como #NULL#.
´ Los datos de error se escriben como #ERROR errorcode#.
Write #1, MiBool ; " es un valor booleano "
Write #1, MiDate ; " es una fecha "
Write #1, MiNull ; " es un valor nulo "
Write #1, MiError ; " es un error "
Close #1 ´ Se cierra el archivo.

En este ejemplo se ilustran varios usos de la instrucción Open para habilitar operaciones de entrada/salida a un archivo.

El siguiente ejemplo abre el archivo PRUEBA en modo de entrada secuencial.
Open "PRUEBA" For Input As #1
´ Cierra antes de volver a abrir en otro modo.
Close #1

Este ejemplo abre el archivo en modo binario para operaciones de sólo escritura.
GRABAR MACRO EN WORD...
Herramientas/Macro/Grabar Nueva Macro
Haz todo lo que debas para guardar el archivo donde quieras. Titula y guarda la macro.
Luego la haces ejecutar desde Word o a través
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Ahora están bien las líneas

Publicado por tecniCam (220 intervenciones) el 04/10/2000 00:00:00
GRABAR MACRO EN WORD...
Herramientas/Macro/Grabar Nueva Macro
Haz todo lo que debas para guardar el archivo donde quieras. Titula y guarda la macro.
Luego la haces ejecutar desde Word o a través de VB.

EN VB...
En este ejemplo se utiliza la instrucción Write # para escribir datos no procesados en un archivo secuencial.
Open "PRUEBA" For Output As #1 ´ Abre el archivo para operaciones de salida.
Write #1, "Hola a todos ", 234 ´ Delimita con comas los datos introducidos.
Write #1, ´ Coloca una línea en blanco.
´ Se establecen valores Boolean, Date, Null y Error.
MiBool = False : MiDate = #February 12, 1969# : MiNull = Null
MiError = CVErr(32767)
´ Los datos booleanos se escriben como #TRUE# o #FALSE#. Los literales
´ de fecha se escriben en el formato de fecha universal, por ejemplo,
´ #1994-07-13# representa 13 de julio de 1994. Los datos nulos se
´ escriben como #NULL#.
´ Los datos de error se escriben como #ERROR errorcode#.
Write #1, MiBool ; " es un valor booleano "
Write #1, MiDate ; " es una fecha "
Write #1, MiNull ; " es un valor nulo "
Write #1, MiError ; " es un error "
Close #1 ´ Se cierra el archivo.

En este ejemplo se ilustran varios usos de la instrucción Open para habilitar operaciones de entrada/salida a un archivo.

El siguiente ejemplo abre el archivo PRUEBA en modo de entrada secuencial.
Open "PRUEBA" For Input As #1
´ Cierra antes de volver a abrir en otro modo.
Close #1

Este ejemplo abre el archivo en modo binario para operaciones de s
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE: y II Ahora están bien las líneas

Publicado por tecniCam (220 intervenciones) el 04/10/2000 00:00:00
Este ejemplo abre el archivo en modo binario para operaciones de sólo escritura.
Open "PRUEBA" For Binary Access Write As #1
´ Cierra antes de volver a abrir en otro modo.
Close #1

El siguiente ejemplo abre el archivo en modo de acceso aleatorio. El archivo contiene registros del tipo definido por el usuario Record.
Type Registro ´ Define un tipo definido por el usuario.
ID As Integer
Nombre As String * 20
End Type
Dim MiRegistro As Record ´ Declara una variable.
Open "PRUEBA" For Random As #1 Len = Len(MiRegistro)
´ Cierra antes de volver a abrir en otro modo.
Close #1

Este ejemplo abre el archivo en modo de salida secuencial; cualquier proceso podrá leer/escribir en el archivo.
Open "PRUEBA" For Output Shared As #1
´ Cierra antes de volver a abrir en otro modo.
Close #1

Este ejemplo abre en modo binario para lectura; ningún otro proceso podrá leer el archivo.
Open "PRUEBA" For Binary Access Read Lock Read As #1
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar