получилось только лишь с установкой chcp1251 победить корявые русские символы ), итак:
А если вместо
send Dr.WEB.cmd
chcp 1251
message.cmd Проверка, проверка
и
message.cmd
@echo off
chcp 65001 >nul
echo "%*"|for /f "tokens=*" %%f in ('iconv -f cp1251 -t UTF-8') do curl -u admin:PASSW -k -v -G --data-urlencode id=xxx --data-urlencode message=%%f "http://server:9080/api/3.0/stations/send-message.ds"
chcp 866 >nul
указать исходную кодировку в iconv -f cp866?
message.cmd
@echo off
chcp 65001 >nul
echo "%*"|for /f "tokens=*" %%f in ('iconv -f cp866 -t UTF-8') do curl -u admin:PASSW -k -v -G --data-urlencode id=xxx --data-urlencode message=%%f "http://server:9080/api/3.0/stations/send-message.ds"
chcp 866 >nul
А не подскажете ли ещё случайно - как это можно красиво в делфях оформить всё, не используя WinExec, не используя curl и прочее внешнее. Только лишь средствами Делфи (7).
Примеру был бы очень рад
Сразу хотелось сделать перевод кодировки в Delphi, но тут вспомнили про iconv и питон
В новых Delphi с помощью HTTPClientRequest/Response, но в D7 их нет, можно вызовом winhttp обойтись. Останется только найти реализацию кодировки в utf-8 и urlencode.
Сообщение было изменено IlyaS: 28 Октябрь 2016 - 09:19