I have an application with acces97, after some weeks trying to execute it, i
got it! but now when the i try to do some function it crashes.
i think that the problem comes when the application try to call shell, but
im not sure.
the code when i click on the button is:
Public Sub EjecutaAccessOLD(ByRef MiAccess As Object, vista As Integer,
Informe, CondiciónWhere As String)
Dim strDB As String
Dim strCmd As String
If Not MiAccess Is Nothing Then
MiAccess.Quit
Set MiAccess = Nothing
End If
Set MiAccess = GetObject(, "Access.Application")
strDB = CaminoAlServidor & "\informes.mdb"
strCmd = SysCmd(acSysCmdAccessDir) & "\MSAccess.exe " _
& Chr(34) & strDB & Chr(34) & " /wrkgrp " & Chr(34) &
DBEngine.SystemDB & Chr(34) _
& " /Runtime"
Call Shell(strCmd, vbNormalFocus)
DoEvents: DoEvents: DoEvents
Err.Clear ' Borra el objeto Err si se produce un error.
' Establece la variable de objeto para hacer referencia al archivo que
desea ver.
Set MiAccess = GetObject(CaminoAlServidor & "\Informes.mdb")
MiAccess.CommandBars("BarraInformes").Visible = True
MiAccess.DoCmd.OpenReport Informe, vista, , CondiciónWhere
If vista = acPreview Then
If Not IsZoomed(MiAccess.Application.hWndAccessApp) Then
'Maximiza la aplicación abierta
ShowWindow& MiAccess.Application.hWndAccessApp, 3
End If
MiAccess.DoCmd.Maximize 'maximiza el informe
Else
MiAccess.Quit
Set MiAccess = Nothing
End If
SetForegroundWindow MiAccess.Application.hWndAccessApp
End Sub
and the trace is:
trace:loaddll:load_builtin_dll Loaded module L"kernel32.dll" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\advapi32.dll" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\gdi32.dll" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\user32.dll" : builtin
trace:loaddll:load_native_dll Loaded module
L"C:\\windows\\system\\ole32.dll" : native
trace:loaddll:load_native_dll Loaded module
L"C:\\windows\\system\\OLEAUT32.dll" : native
trace:loaddll:load_native_dll Loaded module
L"C:\\windows\\system\\msjet35.dll" : native
trace:loaddll:MODULE_LoadModule16 Loaded module "krnl386.exe" : builtin
trace:loaddll:MODULE_LoadModule16 Loaded module "system.drv" : builtin
trace:loaddll:MODULE_LoadModule16 Loaded module "gdi.exe" : builtin
trace:loaddll:MODULE_LoadModule16 Loaded module "user.exe" : builtin
trace:loaddll:MODULE_LoadModule16 Loaded module "keyboard.drv" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\winex11.drv" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\imm32.dll" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\msvcrt.dll" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\msvcrt40.dll" : builtin
trace:loaddll:load_native_dll Loaded module L"C:\\Access 97
Runtime\\MSAIN800.DLL" : native
trace:loaddll:load_native_dll Loaded module L"C:\\Archivos de
programa\\Archivos comunes\\Microsoft Shared\\VBA\\mso97rt.dll" : native
trace:loaddll:load_native_dll Loaded module L"C:\\Archivos de
programa\\Archivos comunes\\Microsoft Shared\\VBA\\VBA332.DLL" : native
fixme:font:SetMapperFlags (0x224, 0x00000001): stub - harmless
trace:loaddll:load_native_dll Loaded module L"C:\\Archivos de
programa\\Archivos comunes\\Microsoft Shared\\VBA\\VBA3ES.DLL" : native
trace:loaddll:load_native_dll Loaded module
L"C:\\windows\\system\\RPCRT4.DLL" : native
wine: Unhandled exception (thread 0013), starting debugger...
WineDbg starting on pid 0x12
Unhandled exception: page fault on read access to 0x5a5ea6ec in 32-bit code
(0x009d830f).
In 32 bit mode.
err:dbghelp:pe_load_dbg_file -Unable to peruse .DBG file ole32.dbg
("ole32.dbg")
Register dump:
CS:0073 SS:007b DS:007b ES:007b FS:1007 GS:0033
EIP:009d830f ESP:7fcafb3c EBP:7fcafb8c EFLAGS:00010286( - 00 -RISP1)
EAX:5a5ea6e0 EBX:009d8377 ECX:80002d30 EDX:00000008
ESI:80002e08 EDI:80001190
...............................................
..............................................
.............................................
WineDbg terminated on pid 0x12
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\winspool.drv" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\comdlg32.dll" : builtin
trace:loaddll:load_builtin_dll Loaded module
L"c:\\windows\\system\\wineps.drv" : builtin
wine: Unhandled exception (thread 0009), starting debugger...
WineDbg starting on pid 0x8
Unhandled exception: page fault on read access to 0x009ea6ec in 32-bit code
(0x5a5e8d05).
In 32 bit mode.
err:dbghelp:pe_load_dbg_file -Unable to peruse .DBG file ole32.dbg
("ole32.dbg")
Register dump:
CS:0073 SS:007b DS:007b ES:007b FS:1007 GS:0033
EIP:5a5e8d05 ESP:7fcbf480 EBP:00000000 EFLAGS:00010246( - 00 -RIZP1)
EAX:009ea6e0 EBX:80002198 ECX:80002dc0 EDX:7fcbf4b0
ESI:00000000 EDI:80002dc0
Stack dump:
..............
...........
.....................
Any hint? thanks a lot
_______________________________________________
wine-users mailing list
wine-users@xxxxxxxxxx
http://www.winehq.org/mailman/listinfo/wine-users
