[VB6] Errore in Kernel32.dll su chiusura applicazione

[quincy]

Salve a tutti spiego il mio problema.
Ho creato un applicativo in Visual basic 6 e per uscire dal programma uso l'istruzione end nel metodo unload della form MDI principale.

In versione debug nessun problema.

In versione esguibile mi si presenta un errore nel momento della chiususa del file eseguibile, errore nel modulo kernel32.dll versione 5.1.2600.2180, indirizzo errore 0x0001eb33.

Siccome non riesco a capire perchè mi dia questo problema, esiste un modo pulito e diverso dall'end per chiudere l'eseguibile? Prima di uscire, chiudo tutte le finestre quindi non è quello.

Qualche idea in proposito?


Grazie per l'aiuto.

[mastrax]

prova questo, uccide il processo in modo pulito potrebbe esserti utilie, dichiarala in un modulo e la usi quando vuoi all'interno della tua applicazione

Public Sub killApp(ByVal hwnd As Long)

Const PROCESS_ALL_ACCESS = &H1F0FFF
Dim ThreadIDX As Long
Dim PROCESSIDX As Long
Dim EXCODE As Long
Dim PROCESS As Long
ThreadIDX = GetWindowThreadProcessId(hwnd, PROCESSIDX)
PROCESS = OpenProcess(PROCESS_ALL_ACCESS, 0, PROCESSIDX)
Call GetExitCodeProcess(PROCESS, EXCODE)
Call TerminateProcess(PROCESS, EXCODE)
Call CloseHandle(PROCESS)

End Sub


richiamala la funzione cosi:

killApp (hwnd)


ciao fammi sapere se funziona

[girobai]

non puoi autokillarti

[icecube_HT]

Originariamente inviato da quincy
... esiste un modo pulito e diverso dall'end per chiudere l'eseguibile?

Che io sappia, e' sufficiente far precedere l'End dall'Unload di tutti i Forms per liberare correttamente tutte le risorse (oltre all'eventuale Close dei files utilizzati):

While Forms.Count
  Unload Forms(0)
Wend
End

[LMondi]

Se hai fatto l'Unload Forms di tutte le finestre del prog., chiuso regolarmente le connessioni al DB, disattivati/e le librerie referenziate (ad esempio) con Set FSO = Nothing , ed il problema persiste ti segnalo che:
"Alcune versioni della ComCtl32.DLL causano un arresto alla chiusura del programma quando sono caricati gli stili visivi di XP in un'applicazione. Ciò accade specialmente quando si usano i controlli utente di VB"
Se ti trovi in questa situazione leggi qui e troverai il codice per superare lo stato d'errore.

[LMondi]

quincy,
per la precisione: seleziona "Suggerimenti" e poi click sulla voce "Prevenire i crash alla chiusura dell'applicazione".
Spero che possa esserti utile.

[quincy]

Grazie ragazzi per l'interessamento(avevo postato circa 5 mesi fà )

Comunuqe avevo risolto a suo tempo con il kill dell'handle del programma e la cosa ha funzionato!

Grazie ancora per i vostri consigli!


Ciao

[MItaly]

Un ultima aggiunta: non bisognerebbe MAI usare l'istruzione End o autokillare il processo dell'applicazione, perché non viene eseguito il codice di cleanup delle classi e dei form, ed è potenziale causa di perdite di dati. Piuttosto bisogna usare un codice come questo:

While Forms.Count
  Unload Forms(0)
Wend
Unload Me

.