* the following fails on pan-chinese win nt 4.0 sp 5 * VFP 6.0 sp 5 ver. 06.00.8961.00 lowbyte = 192 hibyte = 63 word = chr(lowbyte) + chr(hibyte) ? "l",asc(substr(word, 1, 1)) && 192 - correct ? "h",asc(substr(word, 2, 1)) && 63 - correct ? "w",asc(substr(word, 1, 1)) + asc(substr(word, 2, 1)) * 256 && 16320 - correct ? "fWORDToNum1", fWORDToNum1(word) && 65342 - wrong ? "fWORDToNum2", fWORDToNum2(word) && 65342 - wrong wait function fWORDToNum1 *Take a binary WORD (16 bit USHORT) and convert it to a VFP Numeric lparameter tcWORD return asc(tcWORD) + bitlshift(asc(substr(tcWORD, 2, 1)), 8) endfunc function fWORDToNum2 *Take a binary WORD (16 bit USHORT) and convert it to a VFP Numeric lparameter tcWORD return asc(tcWORD) + asc(substr(tcWORD, 2, 1)) * 256 endfunc