>I need to make sure that there are two slashes only in a textbox value. It usually would start with only 1 slash, so it would be increased to two, but over time it was replacing the doubles with 4, etc. This code in the LostFocus seems to work, but I know it's not the best way. Any ideas? Thanks!
>
>

>THISFORM.DataDir = STRTRAN(THIS.Value,'\','\\')
>THISFORM.DataDir = STRTRAN(THIS.Value,'\\\','\\')
>

Could you use the Foxtools REDUCE() function????

&& Step by Step
lcTemp = THIS.value
lcTemp = CHRTRAN(lcTemp," ",CHR(255))  && Keep all the current spaces
lcTemp = REDUCE(lcTemp,"\")  && Convert all contiguous \ to space
lcTemp = STRTRAN(lcTemp," ","\\")  && Convert space to \\
lcTemp = CHRTRAN(lcTemp,CHR(255)," ")  && Restore the spaces



Thisform.DataDir = CHRTRAN(STRTRAN(REDUCE(CHRTRAN(this.value," ",CHR(255)),"\")," ","\\"),CHR(255)," ")