Buenas. Tengo un problema que no se como solucionar. Tengo un TXT con unos caracteres extraños extraidos de un juego koreano. Tengo una funcion para leerlo y empeza a procesarlo (compararlo con unas imagenes y tal), la cosa es que al leerlo los caracteres extraños se transforman en cuadrados (ascii--63 segun he comprobado).
Tengo el paquete de idiomas asiatico instalado, pero ni con esas funciona....
Os dejo mi funcion de lectura y parte del TXT que tengo:
TXT: (si lo veis bien es algo como º¡â¬ y cosas asi) :P.
Código:
//file start 20090317
2101#°¡µå#
2102#°¡µå#
2103#¹öŬ·¯#
2104#¹öŬ·¯#
2105#½¯µå#
2106#½¯µå#
2107#¹Ì·¯½¯µå#
2108#¹Ì·¯½¯µå#
2201#¼±±Û·¡½º#
2202#¼±±Û·¡½º#
2203#±Û·¡½º#
2204#±Û·¡½º#
2205#¹°¾È°æ#
2206#¸é»çÆ÷#
2207#Àå½Ä¿ë²É#
2208#¸®º»#
2209#¸®º»#
Funcion leerTxt:
Código:
Public Function fLeerTXT(ByVal strFichero As String)
Dim reader As IO.StreamReader = New IO.StreamReader(strFichero)
Dim strTexto As String
Try
strTexto = reader.ReadToEnd
reader.Close()
fLeerTXT = strTexto
Finally
reader = Nothing
End Try
End Function
Saludos y muchas gracias!