[VB 6] ObjRS che non si svuota ...

[raffaeu]

Ciao problema :

ho un programma che non si chiude da solo con il comando unload e ho individuato il motivo

In una funzione gli passo io un RecordSet pieno cosi'

passaggio

                AS400Rs.Open
                strRoot = bRoot & Format(frmAvvio.lblData.Caption, "mmdd") & "\" & bDate & "\" & a(x) & Dstr & "D.pdf"
                bAnswer = ExportPDF(AS400Rs, strRoot, "D")
                DoEvents
                AS400Rs.Close


Function ExportXLS(ByVal objRS As ADODB.Recordset, ByVal Root As String, ByVal bType As String) As Boolean

Cosa faccio ? Lo chiudo e lo svuoto ogni volta nella function?

[raffaeu]

up

[xegallo]

se metti un doevents prima di chiudere il recordset e di settarlo a nothing!!! intercetta il comando unload prima di farlo e quindi l'oggetto resta aperto

[raffaeu]

grazie!!
Se non ci fossi tu su questo forum ...

[xegallo]

Originariamente inviato da raffaeu
grazie!!
Se non ci fossi tu su questo forum ...

ci sarebbe un utente in meno