>This code Works Fine as Long as there is no Single Quotation Marks in any Field ie '
>
>Does any body have a solution of how to solve this problem. I cannot get rid of any quotation marks in the fields. There are authors names Like O'Donnel etc

You need to replace any single quotes with two single quotes:

 lcText = STRTRAN(lcText,"'","''")

+++ Rick ---