I compile my programm with 64 bits version of purebasic
When i want to extract a great string the system retunr me ba value 0 instead of the real value and i have no errror.
I think i have a memory problem but i don't know how to solve
;
Code: Select all
Ti load the programm
If ReadFile(0, sxml ,#PB_UTF8)
FileBuffersSize(0, 1024 )
toto23.s = ReadString(0,#PB_File_IgnoreEOL)
EndIf
and the expression that dosen't work
If CreateRegularExpression(0, "(<PmtInf>).*?(</PmtInf>\s{0,2})",#PB_RegularExpression_DotAll | #PB_RegularExpression_MultiLine)
Dim resultat$(0)
Nb = ExtractRegularExpression(0, toto23, Resultat$())
Debug RegularExpressionError()
If nb=0
FreeRegularExpression(0)
pattern.s = "(<PmtInf>).*(</PmtInf>\s{0,10}</ CstmrCdtTrfInitn>)"
CreateRegularExpression(0,pattern, #PB_RegularExpression_DotAll | #PB_RegularExpression_MultiLine)
Nb = ExtractRegularExpression(0, toto23, Resultat$())
Else
Debug "erreur"
EndIf