_UniSend("string") - Send a string which includes Unicode characters

[hydroxide]

;===============================================================================
;
; Function Name:    _UniSend("string")
; Description:    Sends a string with unicode characters by internally
;           replacing unicode characters with {ASC UNICODEcode}
; Parameter(s):  $uniString - The unicode string.
; Requirement(s):   String Input.
; Return Value(s):  none
; Author:       Praveen Shirali (HydroXidE)
;
;===============================================================================

Func _UniSend($uniString)
    Local $i
    For $i = 1 to StringLen($uniString)
        If AscW(StringMid($uniString,$i,1)) > 255 Then
            $uniString = StringLeft($uniString, $i-1) & "{ASC " & AscW(StringMid($uniString, $i, 1)) & "}" & StringMid($uniString, $i+1)
        EndIf
    Next
    Send($uniString)    
EndFunc  ;==>_UniSend

; *** EXAMPLE ***
$myString = "There's some unicode here --> " & ChrW(8362) & " <--"

Run("write.exe")
WinWaitActive("Document - WordPad")

Send($myString)
Send("{ENTER}")
_UniSend($myString)

Simple function. Have fun.

[WeMartiansAreFriendly]

I hadn't realized the limitation existed until needed to use Unicode, just tested.

Good job!

There's some unicode here --> ? <--
There's some unicode here --> ¬ <--