You're saying it chokes after ~160 files, so to play if safe I'd say try 100 files at once.
>Since I'm closing each file after I open it, what limit could that be?
>
>>How about you will do the process in a loop of ~ 100 files at once? Looks like you somehow are reaching the Excel limits, so it may help to close excel after each 100 files and repeat the process for reminder
>>
>>
>>>Hi All:
>>>
>>>I have a loop that processes a number of Excel files in a folder. It extracts information from each file and then closes the file. Then it loops to the next one. After about 160 files, the system chokes and throws an 'exception'. When I loop to the next file, the same exception. Here are the details:
>>>
>>>
>>>FUNCTION ExcelFileOpen(toExcel, tcFile, tlUpdateLinks, toStuff, tlProtection, tcPassword, taSheetVisible)
>>>
>>>LOCAL retparm, loWorkbook
>>>
>>>retparm = .T.
>>>
>>>TRY
>>>
>>> loWorkbook = toExcel.Workbooks.OPEN(tcFile, tlUpdateLinks)
>>>
>>>CATCH TO ww
>>>
>>> errortextbuild(toStuff, ;
>>> 'Error in ' + JUSTSTEM(tcFile) + ': ' + 'File cannot be opened', .F., .T., .T.)
>>> retparm = .F.
>>> SUSPEND
>>>
>>>ENDTRY
>>>
>>>
>>>Some values for the object 'ww' are:
>>>
>>>
>>>baseclass "Exception"
>>>details "80010105: The server threw an exception"
>>>Errorno 1426
>>>message "OLE erroe code 0x80010105: The server threw an exception"
>>>
>>>
>>>Any ideas?
>>>
>>>Thanks,
>>>
>>>Yossi
If it's not broken, fix it until it is.
My Blog