im trying to create a ANSI Character based Non-English yahoo chat client in .but i cant send the all 255 Characters like , ¬ ¢ , & more
how can i send these Characters , plz help me from this problem.

my pm send packet-

Public Function SendPM(User As String, Sendto As String, message As String) As String
Dim Pck As String
Pck = "1" & User & "5" & Sendto & "14" & message & "97163642100212060"
SendPM = Header("06", Pck)
Debug.Print SendPM
End Function

-thank u