Справочная система
Проекты Live Internet | Page Index | Recent Changes | Recently Commented | Registration

Народ, у меня вновь и вновь ошибка авторизации.
User и password правильны на 100%


Пишу на делфях. Вот текст:


Param Data? := TStringStream.Create();
Post Data Stream? := TStringStream.Create(
);
Str:= '<?xml version="1.0" encoding="windows-1251"?>'
+'<QUERYS username="user" password="password" mainid="1">'
+'<query QID="1" TYPE="10"> <maxpost>100</maxpost> </query> </QUERYS>';
Param Data.Write String?(Str);
Id HTTP 1.Post?('http://www.liveinternet.ru/offline_main.php', Param Data?, Post Data Stream?);
Memo 1.Text?:=Post Data Stream.Data String?;


Какие механизмы отправки xml только не перепробовал, ну не получается у меня ничего.
Всё время ошибка авторизации. Пожалуйста, дайте рабочий код.


 
Файлов нет. [Показать файлы/форму]
Время работы: 0.146 s
Использовано памяти: 2.256 Mb