lcStr = 'foxpro is nice' lcSearchStr = 'foxpro' lcReplacement = 'Visual foxpro' _cliptext = lcStr DO WHILE OCCURS(lcSearchStr, LOWER(_CLIPTEXT))>0 AND !CHRSAW() _CLIPTEXT=STUFF( _CLIPTEXT, AT(lcSearchStr, LOWER(_CLIPTEXT) ), ; LEN( lcSearchStr ), lcReplacement ) ? _cliptext ENDDOCetin