Prezados,
Caso de problema com acentuação, use:
retorno is string = UFT8toString(textocomacento)
USE O COMANDO UTF8ToString OU AnsiToUnicode
ProcedureWS_Android_IOS_HTTPGetResult()
// Variable bufResHTTP is Buffer sHTTPResult isstring
// Retrieves the result of the query bufResHTTP=HTTPGetResult(httpResult)
// Result in UTF8 em iOS Apple IFIniOSMode() =TrueORIniOSSimulatorMode() =TrueORIniOSEmulatorMode() =True IFStringCount(bufResHTTP, “ISO-8859-1”,IgnoreCase) =0THEN sHTTPResult=UTF8ToString(bufResHTTP) ELSE sHTTPResult=AnsiToUnicode(bufResHTTP) END ELSE IFInAndroidMode() =TrueORInAndroidSimulatorMode() =TrueORInAndroidEmulatorMode() =True // Result in Android sHTTPResult=bufResHTTP END
RESULTsHTTPResult
|