Question : Generating Unicode Characters in VFP 9

I am trying to write a VFP procedure that takes normal ascii text and, based upon logic, conditionally substitutes characters (basically, alternate glyphs for a character). The problem is that some of these characters are Unicode - outside of the 255 character ASCII range that VFP supports.
Really, if someone can show me a piece of VFP code that can put a Unicode Eighth Note (U+266A) into a field (or an output flat file) so that when that table is utilized in a Unicode-enabled application (e.g. Word - Mail Merge), it will show up as it should, then I can figure out the rest.

Answer : Generating Unicode Characters in VFP 9

Previous example was Unicode little-endian, this one is Unicode big-endian (see more at http://blogs.msdn.com/oldnewthing/archive/2004/03/24/95235.aspx):

                       
             x = FCREATE('Testout3.txt')  
=FWRITE(x, CHR(0xFe) + CHR(0xFf))
=FWRITE(x, CHR(0x26) + CHR(0x6A))  
=FWRITE(x, "&j")   && CHR(0x26) = "&",  CHR(0x6A) = "j" 
=FCLOSE(x)

Open in New Window

Select All