Did you try oIE.Quit() ?

>How do I close the explorer window ?
>
>I need to close it after read by my application,
>because I am using scan, I many open windows will cause memory problems
>
>I tried oIE.close, and oIE.release but they do not work
>
>

>**********************************************************************
>
>SELECT reembolso
> STORE 0 TO objEntregues
>
>
> SCAN for reembolso.retirou = .F. .AND. reembolso.dev = .F.  .AND. reembolso.pg = .F.
>
>PUBLIC lcInnerText
>
>oIE = CreateObject("InternetExplorer.Application")
>#DEFINE READYSTATE_COMPLETE 4
>#DEFINE MAX_TIME 30
>
>local lcInnerText && Text of the webpage
>local lcIPAdd && IP Address as a string
>local lnStartedAt && Seconds when started loading
>local lnWaiting && Seconds waiting for the document to load
>local lcRetVal && Return Value
>
>
>
>STORE ALLTRIM(Reg_tipo) + ALLTRIM (REG) + "BR" to obj_num
>
>
>lnStarted = SECONDS()
>
>lcUrl = "http://websro.correios.com.br/sro_bin/txect01$.QueryList?P_LINGUA=001&P_TIPO=001&P_COD_UNI=" + obj_num
>*lcUrl = INPUTBOX("Digite o endereço","Obter conteúdo em texto de uma página web",lcUrl,15000)
>
>oIE.Visible = .T.
>oIE.navigate(lcUrl)
>
>do while oIE.Readystate <> READYSTATE_COMPLETE or lnWaiting >= MAX_TIME
>   lnWaiting = Seconds() - lnStarted
>enddo
>
>if lnWaiting < MAX_TIME
>   lcInnerText = oIE.Document.Body.InnerText
>else
>   lcInnerText="???????????????"+chr(13)+'Timeout'
>endif
>
>*=strtofile(lcInnerText, obj_num + ".txt") &&text to file
>locate1 =  'ENTREGUE' $ UPPER(lcInnerText)
>
>IF locate1 = .T.
>  replace reembolso.retirou WITH .T.
>   objEntregues = objEntregues + 1
>    ENDIF
>
>
>lcUrl.close
>
>
>
>
>
>RELEASE lcInnerText
>
>
>*RELEASE READYSTATE_COMPLETE
>*RELEASE MAX_TIME
>
>release lcInnerText && Text of the webpage
>release lcIPAdd && IP Address as a string
>release lnStartedAt && Seconds when started loading
>release lnWaiting && Seconds waiting for the document to load
>release lcRetVal && Return Value
>
>
>
>   ENDSCAN
>
>
>   = MESSAGEBOX (STR(objEntregues))
>
>*************************************************************************