XP gives error when app ends 1

[biddingbong]

Windows XP gives me an error when I click on the "Exit" button found on my login screen.
I've got an MDI form which has a menu, when I exit from the menu, there's no error. And I usie the same code in the login screen.

When I click on more details, the error seems to come from kernel32.dll

Any idea what's causing this?

 

[MattSTech]

Can you please provide the code that is in the exit button click-event?

Matt

 

[biddingbong]

Dim intExit As Integer

intExit = MsgBox("Do you wish to exit?", vbQuestion + vbYesNo, App.Title)

If intExit = vbYes Then

If objFunctions.objConn.State = adStateOpen Then

objFunctions.objConn.Close

Set objFunctions.objConn = Nothing

End If

End

End If

 

[mattKnight]

Don't use END

use something like

dim f as form
for each f in forms
unload f
next

END is brute force closing and doesn't allow cleanup code to execute



Take Care

Matt
If at first you don't succeed, skydiving is not for you.

 

[biddingbong]

SUPERB!!