Re: Quickly alltrim non-alpha chars from string

Author: Ed Leafe

Posted: 2005-08-01 at 15:02:44

On Monday 01 August 2005 15:30, Malcolm Greene wrote:

> Any suggestions on how I can quickly alltrim all non-alpha chars from a

> string via either a clever VFP technique, FoxTools FLL function, or

> Win32 API call?

FUNCTION JustAlpha(txt)

goodChars = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" + ;

goodChars = goodChars + LOWER(goodChars)

badChars = CHRTRAN(txt, goodChars, "")

RETURN CHRTRAN(txt, badChars, "")

--

-- Ed Leafe

-- http://leafe.com

-- http://dabodev.com

©2005 Ed Leafe