Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.10.10;
Скачать: CL | DM;

Вниз

Проблема с передачей данных методом POST через TWebBrowser   Найти похожие ветки 

 
Aiden ©   (2008-09-24 14:00) [0]

Имеется HTML страница с таким кодом:
<form action="/main.php?unit/create/592402" method="POST">
<table width="100%" align="center" class="list">
<tr class="odd" onmouseover="this.className = "selected""  onmouseout="this.className = "odd"" onclick="checkFirstTrRadio(this)" >
<td><input type="radio" name="unitCreateData[unit_class]" value="1815"  checked="1"  /></td>
<td><img src="view/new_design//img/unit_types/office.gif" /></td>
</tr>
 
<tr class="even" onmouseover="this.className = "selected""  onmouseout="this.className = "even"" onclick="checkFirstTrRadio(this)" >
<td><input type="radio" name="unitCreateData[unit_class]" value="1885"   /></td>
<td><img src="view/new_design//img/unit_types/shop.gif" /></td>
</tr>
</table>
<table width="100%" class="buttonset">
<tr>
<td><input type="submit" class="button250" name="next" value="Продолжить >>" tabindex="1" /></td>
<td width="100%" align="right"><input type="submit" class="button205" name="cancel" value="Отменить" tabindex="3" /></td>
</tr>
</table>
</form>

Мне необходимо послать данные о сделанном выборе. Для этого использую такой код:
PostData:="unitCreateData[unit_class]=1815";
URL1:=URL + "/main.php?unit/create/592402";
PostData := VarArrayCreate([0, Length(PostString) - 1], varByte);
   Data := VarArrayLock(PostData);
   try
     Move(PostString[1], Data^, Length(PostString));
   finally
     VarArrayUnlock(PostData);
   end;
   Flags := EmptyParam;
   TargetFrame := EmptyParam;
   Headers := "Content-Type: application/x-www-form-urlencoded" + #10#13;
   Form1.WebBrowser1.Navigate2(URL1, Flags, TargetFrame, PostData, Headers);

Проблема в том что данные не передаются (точней не происходит переход на следующую страницу, обновляется уже имеющаяся). ПОдскажите, пожалуйста, в чем может быть проблема?


 
its_me   (2008-11-18 18:50) [1]

GB



Страницы: 1 вся ветка

Текущий архив: 2010.10.10;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
2-1278947191
Hottabxp
2010-07-12 19:06
2010.10.10
Как написать Dll на Delphi 7 что-бы её можно было использовать ..


15-1278590211
ocean
2010-07-08 15:56
2010.10.10
Зачем металлическое кольцо


15-1278618937
xayam
2010-07-08 23:55
2010.10.10
DGT-доски


2-1279601277
Андрей_1
2010-07-20 08:47
2010.10.10
Цвет шрифта DBGrid


6-1222250421
Aiden
2008-09-24 14:00
2010.10.10
Проблема с передачей данных методом POST через TWebBrowser