>>Sure, RegExpr should be much easier. Wondering if someone can help here, as I am swamped at the moment.
>>
>>BTW, this is how occurrence is spelled.
>
>Something like this (no local declaration nor error testing etc)
>
>

>clear
>loRegExp = CREATEOBJ('VBScript.RegExp')
>loRegExp.Global = .t.                 && translate all occurances
>loRegExp.IgnoreCase = .t.             && case insensitive
>loRegExp.Pattern = '[^\.]VFP2SQL'
>lcContents	= FILETOSTR({Your File})
>loMatches	= loRegExp.Execute(lcContents)
>? 'Found ', loMatches.Count, 'matches'
>IF loMatches.Count > 0
>	FOR lnMatch = 0 TO loMatches.Count - 1
>		loMatch	= loMatches.Item(lnMatch)
>		? CHR(9) + 'Match ' + TRANSFORM(lnMatch) + ': "' + loMatch.Value + '" at position ' + TRANSFORM(loMatch.FirstIndex)
>	NEXT lnMatch
>endif	
>

Thanks, Hugo and Boris. I've tested it, it seems to work. Is it case sensitive or case-insensitive?