Авторизация. Снова(( - Работа с сетью в Delphi - Страница 3

Dark_Cat · 08.02.2009, 08:37

Я попробовал дать запрос не на авторизацию, а на поиск на сайте аналогично методом POST http://www.pwdatabase.com/my/search. Если запрос латиницей, то результат успешен, если киррилицей - полное игнорирование запроса.
Ответ я получаю в строку и все русские слова там имеют нечитабельный вид. Оригинал:

Цитата:

@MAIL.RU: почта, новости, работа, рассылки, развлечения. Почта @MAIL.RU - бесплатная почта #1

Результат в ответе:

Цитата:

@MAIL.RU: ïî÷òà, íîâîñòè, ðàáîòà, ðàññûëêè, ðàçâëå÷åíèÿ. Ïî÷òà @MAIL.RU - áåñïëàòíàÿ ïî÷òà #1

Не подскажете как привести это к читабельному виду? Мне кажется запрос из программы отсылается на сервер тоже неправильно.

goblinyara · 08.02.2009, 09:01

это банально разница кодировок... попробуйте вот этими функциями воспользоваться:

Код:

AnsiToUtf8() - преобразование в UTF-8 из cp1251
Utf8ToAnsi() - наоборот
Utf8String() - пендосы делают через эту функцию, т. к. им все равно на другие кодировки, английские букавки во всех стоят на одних и тех же местах.

А если быть точнее, то AnsiToUtf8.

Dark_Cat · 08.02.2009, 18:08

В Delphi 2009 это видимо не просто "банально разница кодировок". В доказательство:
Исходный текст: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà">
Начинаем попытки декодировки:
AnsiToUtf8: CONTENT="ГЌГ*Г¶ГЁГ®Г*Г*Г«ГјГ*Г*Гї ГЇГ®Г·ГІГ®ГўГ*Гї Г±Г«ГіГ¦ГЎГ* @Mail.ru - Г«ГіГ·ГёГ*Гї ГЎГҐГ±ГЇГ«Г*ГІГ*Г*Гї ГЇГ®Г·ГІГ*. Г„Г®Г±ГІГіГЇ ГЄ ГЇГ®Г·ГІГҐ Г·ГҐГ°ГҐГ§ POP/SMTP, ГўГҐГЎ- ГЁ wap-ГЁГ*ГІГҐГ°ГґГҐГ©Г±. Г’Г*ГЄГ¦ГҐ Г*Г* ГЇГ®Г°ГІГ*Г«ГҐ: Г*ГўГІГ®, Г*Г®ГўГ®Г±ГІГЁ, Г±ГЇГ®Г°ГІ, Г¬ГіГ§Г»ГЄГ*, Г°Г*ГЎГ®ГІГ*, Г§Г*Г*ГЄГ®Г¬Г±ГІГўГ*, Г*Г*ГҐГЄГ¤Г®ГІГ», Г®ГІГЄГ°Г»ГІГЄГЁ, ГЇГ®ГЈГ®Г¤Г*">
UTF8Encode: CONTENT="ГЌГ*Г¶ГЁГ®Г*Г*Г«ГјГ*Г*Гї ГЇГ®Г·ГІГ®ГўГ*Гї Г±Г«ГіГ¦ГЎГ* @Mail.ru - Г«ГіГ·ГёГ*Гї ГЎГҐГ±ГЇГ«Г*ГІГ*Г*Гї ГЇГ®Г·ГІГ*. Г„Г®Г±ГІГіГЇ ГЄ ГЇГ®Г·ГІГҐ Г·ГҐГ°ГҐГ§ POP/SMTP, ГўГҐГЎ- ГЁ wap-ГЁГ*ГІГҐГ°ГґГҐГ©Г±. Г’Г*ГЄГ¦ГҐ Г*Г* ГЇГ®Г°ГІГ*Г«ГҐ: Г*ГўГІГ®, Г*Г®ГўГ®Г±ГІГЁ, Г±ГЇГ®Г°ГІ, Г¬ГіГ§Г»ГЄГ*, Г°Г*ГЎГ®ГІГ*, Г§Г*Г*ГЄГ®Г¬Г±ГІГўГ*, Г*Г*ГҐГЄГ¤Г®ГІГ», Г®ГІГЄГ°Г»ГІГЄГЁ, ГЇГ®ГЈГ®Г¤Г*">
UTF8Decode: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa">
UTF8ToWideString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa">
UTF8ToUnicodeString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa">
UTF8ToString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa">
Utf8ToAnsi: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa">
StringToOleStr: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà">
Utf8String: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà">
Utf8String: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà">
RawByteString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa">
UnicodeString: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà">
Вопрос открыт...

Квэнди · 08.02.2009, 21:14

Indy в Delphi 2009 при вызове методов post и get самостоятельно пытается определить кодировку запроса, если это не удается, ответ отдается в UTF8 изменить этот порядок вещей можно путем задания IOHandler-а компоненту IdHttp
метод:
IdHttp.createdefaultiohander
затем в IOHandler вызадаете encoding

Dark_Cat · 08.02.2009, 23:47

Такого метода у IdHttp нет. Вы предлагаете создать компонент через IdHTTP := TIdHTTP.Create;? Что именно должно быть в IOHandler?

Квэнди · 09.02.2009, 00:49

http1.CreateIOHandler(nil);
http1.IOHandler.DefStringEncoding:= ...
заканчиваем обсуждение здесь, ибо к теме никакого отношения не имеет.

08.02.2009, 09:01	#22
goblinyara Форумчанин Регистрация: 02.01.2009 Сообщений: 340	это банально разница кодировок... попробуйте вот этими функциями воспользоваться: Код: `AnsiToUtf8() - преобразование в UTF-8 из cp1251 Utf8ToAnsi() - наоборот Utf8String() - пендосы делают через эту функцию, т. к. им все равно на другие кодировки, английские букавки во всех стоят на одних и тех же местах.` А если быть точнее, то AnsiToUtf8. DelphiWorld 6. Скачай, поставь, и будет тебе счастье=) Программирование, как и любовь -- одно слово, за которым скрывается бесконечное множество занятий.

08.02.2009, 21:14	#24
Квэнди Старожил Регистрация: 13.12.2006 Сообщений: 3,859	Indy в Delphi 2009 при вызове методов post и get самостоятельно пытается определить кодировку запроса, если это не удается, ответ отдается в UTF8 изменить этот порядок вещей можно путем задания IOHandler-а компоненту IdHttp метод: IdHttp.createdefaultiohander затем в IOHandler вызадаете encoding ICQ не для вопросов, а для предложений. Для вопросов используйте форум IRC канал клуба программистов\|Мои статьи

09.02.2009, 00:49	#26
Квэнди Старожил Регистрация: 13.12.2006 Сообщений: 3,859	http1.CreateIOHandler(nil); http1.IOHandler.DefStringEncoding:= ... заканчиваем обсуждение здесь, ибо к теме никакого отношения не имеет. ICQ не для вопросов, а для предложений. Для вопросов используйте форум IRC канал клуба программистов\|Мои статьи

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Авторизация на https	arm82	Работа с сетью в Delphi	15	23.01.2011 20:54
Авторизация.	Jjoker	Общие вопросы C/C++	4	28.01.2009 23:17
Авторизация	AIst	PHP	5	03.12.2008 20:57
Авторизация	justas	Работа с сетью в Delphi	0	21.12.2007 16:16

08.02.2009, 18:08	#23
Dark_Cat Пользователь Регистрация: 08.02.2009 Сообщений: 11	В Delphi 2009 это видимо не просто "банально разница кодировок". В доказательство: Исходный текст: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà"> Начинаем попытки декодировки: AnsiToUtf8: CONTENT="ГЌГГ¶ГЁГ®ГГГ«ГјГГГї ГЇГ®Г·ГІГ®ГўГГї Г±Г«ГіГ¦ГЎГ* @Mail.ru - Г«ГіГ·ГёГГї ГЎГҐГ±ГЇГ«ГГІГГГї ГЇГ®Г·ГІГ. Г„Г®Г±ГІГіГЇ ГЄ ГЇГ®Г·ГІГҐ Г·ГҐГ°ГҐГ§ POP/SMTP, ГўГҐГЎ- ГЁ wap-ГЁГГІГҐГ°ГґГҐГ©Г±. Г’ГГЄГ¦ГҐ ГГ* ГЇГ®Г°ГІГГ«ГҐ: ГГўГІГ®, ГГ®ГўГ®Г±ГІГЁ, Г±ГЇГ®Г°ГІ, Г¬ГіГ§Г»ГЄГ, Г°ГГЎГ®ГІГ, Г§ГГГЄГ®Г¬Г±ГІГўГ, ГГГҐГЄГ¤Г®ГІГ», Г®ГІГЄГ°Г»ГІГЄГЁ, ГЇГ®ГЈГ®Г¤Г"> UTF8Encode: CONTENT="ГЌГГ¶ГЁГ®ГГГ«ГјГГГї ГЇГ®Г·ГІГ®ГўГГї Г±Г«ГіГ¦ГЎГ* @Mail.ru - Г«ГіГ·ГёГГї ГЎГҐГ±ГЇГ«ГГІГГГї ГЇГ®Г·ГІГ. Г„Г®Г±ГІГіГЇ ГЄ ГЇГ®Г·ГІГҐ Г·ГҐГ°ГҐГ§ POP/SMTP, ГўГҐГЎ- ГЁ wap-ГЁГГІГҐГ°ГґГҐГ©Г±. Г’ГГЄГ¦ГҐ ГГ* ГЇГ®Г°ГІГГ«ГҐ: ГГўГІГ®, ГГ®ГўГ®Г±ГІГЁ, Г±ГЇГ®Г°ГІ, Г¬ГіГ§Г»ГЄГ, Г°ГГЎГ®ГІГ, Г§ГГГЄГ®Г¬Г±ГІГўГ, ГГГҐГЄГ¤Г®ГІГ», Г®ГІГЄГ°Г»ГІГЄГЁ, ГЇГ®ГЈГ®Г¤Г"> UTF8Decode: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa"> UTF8ToWideString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa"> UTF8ToUnicodeString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa"> UTF8ToString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa"> Utf8ToAnsi: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa"> StringToOleStr: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà"> Utf8String: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà"> Utf8String: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà"> RawByteString: CONTENT="Iaoeiiaeuiay ii?oiaay neo?aa @Mail.ru - eo?oay aanieaoiay ii?oa. Ainooi e ii?oa ?a?ac POP/SMTP, aaa- e wap-eioa?oaen. Oae?a ia ii?oaea: aaoi, iiainoe, nii?o, iocuea, ?aaioa, ciaeiinoaa, aiaeaiou, ioe?uoee, iiaiaa"> UnicodeString: CONTENT="Íàöèîíàëüíàÿ ïî÷òîâàÿ ñëóæáà @Mail.ru - ëó÷øàÿ áåñïëàòíàÿ ïî÷òà. Äîñòóï ê ïî÷òå ÷åðåç POP/SMTP, âåá- è wap-èíòåðôåéñ. Òàêæå íà ïîðòàëå: àâòî, íîâîñòè, ñïîðò, ìóçûêà, ðàáîòà, çíàêîìñòâà, àíåêäîòû, îòêðûòêè, ïîãîäà"> Вопрос открыт...

08.02.2009, 23:47	#25
Dark_Cat Пользователь Регистрация: 08.02.2009 Сообщений: 11	Такого метода у IdHttp нет. Вы предлагаете создать компонент через IdHTTP := TIdHTTP.Create;? Что именно должно быть в IOHandler?