"неэстетично" - это то что такой ф-ции в Аксапте нет
А вот вариант предложенный Андре очень даже приятен. Сделать свою ф-цию в Global и юзать ее как стандартную.
PHP код:
client static str ChatToOEM(str strSource)
{ //Преобразование строки в кодировку OEM
DLL _winApiDLL = new DLL('USER32');
DLLFunction _CharToOEM = new DLLFunction(_winApiDLL, 'CharToOemA');
Binary bSource = new Binary(strSource);
str oemstr;
;
_CharToOEM.returns(ExtTypes:: DWORD);
_CharToOEM.arg(ExtTypes::POINTER,
ExtTypes::POINTER);
_CharToOEM.call(bSource, bSource);
oemstr = bSource.string(0);
return oemstr;
}
(c) xroad