jak metoda post wyslac wartosci zmiennych do servisu php?
(chodiz konkretnei o to : www.praca.bajeczka.com by dopisywac tu ogloszenia)
0
0
indy -> idHttp
data:TMultiFormDataStream;// czy jakos tak
Idhttp1.post(adres,data);
0
POST jest wysylany w naglowku HTTP, a jak go wyslesz to zalezy od tego,czego uzyjesz (socketow, jakis httpclient etc)..
0
jak teraz dodac do IdMultiPartFormDataStream dane takie jak : tytul, tresc lub login password ?
procedure TForm1.Button1Click(Sender: TObject);
var data: TIdMultiPartFormDataStream;
begin
data := TIdMultiPartFormDataStream.Create;
try
data.AddFormField('method','login');
data.AddFormField('list', 'classifiedsuser');
data.AddFormField('fromlist', 'classifiedscategory');
data.AddFormField('frommethod', 'showhtmllist');
data.AddFormField('name', 'shivan');
data.AddFormField('password', 'ma');
data.AddFormField('rememberPassword', '1');
data.AddFormField('submit','Ok');
Memo1.Lines.Text := ht.Post('http://www.praca.bajeczka.com/index.php'{?method=login_form&list=classifiedsuser&fromlist=classifiedscategory&frommethod=showhtmllist}, data);
finally
data.Free;
end;
end;
tak sie zalogowalem dobrze z potwierdzeniem i teraz robie :
procedure TForm1.Button2Click(Sender: TObject);
var data2: TIdMultiPartFormDataStream;
begin
data2 := TIdMultiPartFormDataStream.Create;
try
data2.AddFormField('method','create');
data2.AddFormField('list', 'advertisement');
data2.AddFormField('fromlist', 'classifiedscategory');
data2.AddFormField('frommethod', 'showhtmllist');
data2.AddFormField('fromid','109');
data2.AddFormField('fromfromlist', 'classifiedscategory');
data2.AddFormField('fromfrommethod', 'showhtmllist');
data2.AddFormField('title',e1.Text);
data2.AddFormField('picture',e3.Text);
data2.AddFormField('col_0',e2.Text);
data2.AddFormField('id','0');
data2.AddFormField('cid','109');
data2.AddFormField('cName','');
data2.AddFormField('submit','Ok');
Memo1.Lines.Text := ht.Post('http://www.praca.bajeczka.com/index.php', data2);
finally
data2.Free;
end;
end;
dla :
</td> Strona główna </td></tr></table>
|
i zwraca mi : 'Permission denied'
// myslisz ze bedzie sie komus chcialo to czytac i analizowac? ;-) Lepiej sam poszukaj gdzie jest mniej wiecej blad i wtedy wklejaj :) - P