RESTORE FROM (HOME() + "EUROPEAN.MEM") lcFrom = "" lcTo = "" FOR i=1 TO 255 IF CHR(i) <> SUBSTR(m.euroansi, i,1) lcFrom = lcFrom + CHR(i) lcTo = lcTo + SUBSTR(m.euroansi, i,1) ENDIF ENDFOR *? lcFrom *? lcTo _CLIPTEXT = [CHRTRAN(myfield, "] + lcFrom +[", "] + lcTo + [")"]