Hi,
I have a memory-problem if I read more then 35 XML-files.
Reading a few file's give no problem. Only a lot of files I get an error.
I get the error
Unrecoverable error 9006.
hb_xgrab can't allocate memory.
Is there something I have to close to solve this?
I already tried oMnuXml:end(), but that gives an error...
This is code:
I have a memory-problem if I read more then 35 XML-files.
Reading a few file's give no problem. Only a lot of files I get an error.
I get the error
Unrecoverable error 9006.
hb_xgrab can't allocate memory.
Is there something I have to close to solve this?
I already tried oMnuXml:end(), but that gives an error...
This is code:
FUNCTION lees_xml_file(file_name,totallines,naam,vtxt)
local hFile := FOpen( file_name )
Local oMnuXml := TXmlDocument():New( hFile )
Local oXmlIter := TXmlIterator():New( oMnuXml:oRoot ), oTagActual, cAttribute
local vblockname := ''
DO WHILE ( oTagActual := oXmlIter:Next() ) != nil
IF otagActual:Depth() = 3
......
ELSEIF otagActual:Depth() = 4
IF upper(oTagActual:cName) = 'BLOCKNAME'
vblockname = oTagActual:cData
ELSEIF upper(oTagActual:cName) = 'ENTITYNAME'
......
ENDIF
ENDIF
ENDDO
oTagActual := nil
FClose( hFile )
RETURN nilRegards,
Marc
FWH32+xHarbour | FWH64+Harbour | BCC | DBF | ADO+MySQL | ADO+MariaDB | ADO+SQLite
Marc
FWH32+xHarbour | FWH64+Harbour | BCC | DBF | ADO+MySQL | ADO+MariaDB | ADO+SQLite