|
#31
|
||||
|
||||
Ты бы выдал "В идеале Пример запроса"...
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#32
|
|||
|
|||
Цитата:
Пример входного XML: <?xml version="1.0" encoding="windows-1251"?> <document> <function name="employerInfo"> <param name="login">ivanov</param> <param name="pass">c4ca4238a0b923820dcc509a6f75849b</param> <param name="idEmployer">1000</param> </function> <client name="SomeProgram" version="1.0"/> </document> |
#33
|
||||
|
||||
Цитата:
Пишу программы за еду. __________________ |
#34
|
|||
|
|||
Цитата:
|
#35
|
||||
|
||||
Код:
var stringstream: TStringStream; begin stringstream:=TStringStream.Create(''); try stringstream.WriteString('input_xml=<?xml version="1.0" encoding="windows-1251"?>'); stringstream.WriteString('<document>'); stringstream.WriteString('<function name="employerInfo">'); stringstream.WriteString('<param name="login">ivanov</param>'); stringstream.WriteString('<param name="pass">f8b932c80d0b2e6bf025149a4fa68dfc</param>'); stringstream.WriteString('<param name="idEmployer">1000</param>'); stringstream.WriteString('</function>'); stringstream.WriteString('<client name="SomeProgram" version="1.0"/>'); stringstream.WriteString('</document>'); IdHTTP1.Request.ContentType:='application/x-www-form-urlencoded'; IdHTTP1.Request.ContentLength:=stringstream.Size; stringstream.Position:=0; Memo1.Text:=IdHTTP1.Post('http://xxx.xxx.xxx.xxx/api/functions.php', stringstream); finally stringstream.Free; end; end; Пишу программы за еду. __________________ |
#36
|
|||
|
|||
УРРРААА. Получилось. Всем огромное Спасибо. Прямащщее.... )))))))))))))
|
#37
|
|||
|
|||
Извините еще раз. А можно ли скопировать выданные данные на другой сервер? То есть, он выдал мне реквизиты, а эти данные скопировать на второй сервер.
|