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
Warning: Unknown: write failed: No space left on device (28) in Unknown on line 0
Warning: Unknown: Failed to write session data (files). Please verify that the current setting of session.save_path is correct () in Unknown on line 0