Database Search

TechHome

• Base64 Encoding
• BCD Conversion UDF
• Decimal to Hex conversion
• Floating point to HUGE numbers
• Format Number to Display
• Hex to Decimal Conversion
• Long to Dword UDF
• Number to Adjective acronym
• Numbers to text conversion
• Roman Numeral Conversions
• Sort a Numeric List
• Unicode to ASCII Converter
• xBaseConvert Base 10 to-from any other base

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

UDF - Unicode to ASCII Converter

Keywords:   UDF - Unicode to ASCII Converter 

#DefineFunction ConvertToAscii(f)
fs=FileSize(f)
bb=BinaryAlloc(fs)
BinaryRead(bb,f)
;is it unicode
If (BinaryPeek(bb,0)==255) && (BinaryPeek(bb,1)==254); its unicode, convert
   BinaryEODSet(bb,0)
   BinaryReadEx(bb,0,f,2,-1)
   BinaryConvert(bb,3,0,0,0)
   BinaryWrite(bb,f)
EndIf
BinaryFree(bb)
Return(1)
#EndFunction


RegKey1="HKEY_CURRENT_USER\Printers"
textfile="C:\temp\Printers.txt"
RunWait("Regedit.exe",'/e %textfile% %RegKey1%')
ConvertToAscii(textfile)
Message(0,0)

Article ID:   W15761

File Created: 2003:05:13:11:29:56

Last Updated: 2003:05:13:11:29:56