cSt1 = 'String without any ASCI value above 127.'
cSt2 = 'String with ASCI values ð above 127.'
oRegExp = new OleAutoClient("VBScript.RegExp")
oRegExp.global := true
oRegExp.ignoreCase := true
oRegExp.pattern :=  "\xf0"

If oRegExp.test(cSt1) == true
 ? cSt1+' Does contain ð'
else
 ? cSt1+' Does not contain ð'
endif  
If oRegExp.test(cSt2) == true
 ? cSt2+' Does contain ð'
else
 ?cSt2+'  Does not contain ð'
endif