problem with shell and acccess 97

Curro Amores curritoamores at hotmail.com
Thu Nov 17 06:17:51 CST 2005


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





More information about the wine-devel mailing list