06-15-2003, 10:50 PM
Just a tip to eliminate unnecessary conditional (if's) code.
Instead of:
IF (LEN(newcode$) <= 2) THEN
encrypted$ = encrypted$ + "0" + newcode$
ELSE
encrypted$ = encrypted$ + newcode$
END IF
Do this instead (asumming you always want to append
a three character ASCII code:
encrypted$ = encrypted$ + right$(("000" + newcode$) ,3)
Get it?
*****
Instead of:
IF (LEN(newcode$) <= 2) THEN
encrypted$ = encrypted$ + "0" + newcode$
ELSE
encrypted$ = encrypted$ + newcode$
END IF
Do this instead (asumming you always want to append
a three character ASCII code:
encrypted$ = encrypted$ + right$(("000" + newcode$) ,3)
Get it?
*****