Holas,
Antes que nada mil gracias por la orientación que me puedan dar respecto a este asunto...
Empaqueté la aplicación con Inno Setup. Al instalar y ejecutar la aplicación en la máquina donde se desarrolló no hay ningún problema. La aplicación durante la ejecución va grabando varios datos a la base para luego generar unos reportes en Crystal...
El problema es que cuando se instala en otra máquina a pesar que es con el mismo sistema operativo, WIN98SE, no muestra ningún error y da la impresión que se estuvieran guardando los datos a la base normalmente pero cuando luego se revisa el contenido de la base no hay nada registrado.
Para abrir la base utilizo esta instrucción:
Private Sub MDIForm_Load()
On Error Resume Next
' Establece el directorio de trabajo al directorio que contiene la aplicación.
ChDir App.Path
'Crear y abrir Database
Set datos = DBEngine.Workspaces(0).OpenDatabase("armon20.mdb")
End Sub
Para grabar los datos:
If grabar_datos = True Then
Set RECORD1 = datos.OpenRecordset("FASE_R_TENSION", dbOpenTable, dbForwardOnly)
RECORD1.AddNew
RECORD1!FECHA = Date
RECORD1!HORA = Time
RECORD1!Vrms = x_rms
RECORD1!THDv = thd
RECORD1.Update 'Actualizar el contenido
RECORD1.Bookmark = RECORD1.LastModified
End If
Saludos,
