Fulltext search in dbf inclusive Memo fields

[Otto]

Hello,
does someone have some code how to search inside a dbf file inclusive Memo fields.
Thanks in advance
Otto

[Antonio Linares]

Otto,

you were using this one:
viewtopic.php?p=80148#p80148

and now want to search in memos too, right ?

[Otto]

Hello Antonio,
thank you for your attention. Yes that is what I want to do. I would like to insert also the content of the memo fields in my search function.
Thanks in advance
Otto

[Antonio Linares]

Otto,

What file extension do you have in your memo files ?

[Antonio Linares]

Otto,

Please email me a DBF with a memo file of yours, thanks

[Antonio Linares]

Otto,

I think the way to do it is to perform a free search inside the FPT file for a string. If found, we have its position inside the file. Then we have to read the DBF record by record starting from the bottom of the DBF and going backwards to the first one (we can do it directly, without using the RDD) as in each record is kept the position of each memo inside the FPT file. Basically:

in pseudo code:

Code: Select all  Expand view

local nOffset := At( "string", MemoRead( "myfile.fpt" ) )

if nOffset != 0
   We read the DBF, record by record, starting from the end of the DBF
      while RecordMemoOffset() > nOffset .and. nPosInDbf > 0
          GoPrevRecord()
      end
      if nPosInDbf > 0
         MsgInfo( "found" )
      endif
endif
 

[Antonio Linares]

Otto,

Using FiveDBU I open your DBF and edit the closest field to the memo field:


Now, I review the DBF in binary mode and look for my modified value:


I would say that 44FF is the offset of its memo inside the FPT file. Using Header() and RecSize(), get the position of 44FF, and it should be the same for each record.

[Antonio Linares]

44

can't be 44FF