دخول

yassine_hell · 17-02-2011, 08:31 PM

تم ايجاد الحل
لكن واجهتني مشكلة بسيطة عند ادخال ID اخر وعمل submit تبقى نفس النتيجة (نتيجت الـID الاول)
جربت http.FreeOnRelease و http.free و http.FreeInstance لكن بدون جدوى
هذا الكود:

كود :
begin
   for i := 1 to 2 do
    begin
      http.RequestMethod:='POST';
      tmp:=i;
      URL:='http://site.com.com/skystar/index.php?user_id=';
      http.GetStr :='submit=submit';
      http.ExecuteURL(URL+inttostr(tmp));
      rslt:=http.result_sl.Text;
      showmessage(http.result_sl.Text);
      p:=pos('Successfully',rslt);
      if p <> 0 then
      begin
        memo1.Lines.Add(inttostr(i));
      end;
end;

اضن يجب تفريغ coockies قبل بعث الـID الثاني

شكرا

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة