PosT

0

jak metoda post wyslac wartosci zmiennych do servisu php?
(chodiz konkretnei o to : www.praca.bajeczka.com by dopisywac tu ogloszenia)

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>
b.gif
b.gif
<form method="POST" enctype="multipart/form-data" action="index.php"> <input type="hidden" name="method" value="create"> <input type="hidden" name="list" value="advertisement"> <input type="hidden" name="fromlist" value="classifiedscategory"> <input type="hidden" name="frommethod" value="showhtmllist"> <input type="hidden" name="fromid" value="109"> <input type="hidden" name="fromfromlist" value="classifiedscategory"> <input type="hidden" name="fromfrommethod" value="showhtmllist">
Dodaj ogłoszenie
Kategoria# NAUKA, KURSY, SZKOLENIA
Tytuł * <input type="text" name="title" size="40" maxlength="120">
Zdjęcie <input type="FILE" name="picture" size="40" maxlength="250">
Tre?ć <textarea name="col_0" rows="10" cols="50"> </textarea>
<input type="submit" value="Ok" name="submit" class="button"> <input type="submit" value="Cancel" name="submit" class="button">
<input type="hidden" name="id" value="0"> <input type="hidden" name="cid" value="109"> <input type="hidden" name="cName" value=""> </form>

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

1 użytkowników online, w tym zalogowanych: 0, gości: 1