Конференция "Сети" » Проблема с передачей данных методом POST через TWebBrowser [D7, WinXP]
 
  • Aiden © (24.09.08 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 (18.11.08 18:50) [1]
    GB
 
Конференция "Сети" » Проблема с передачей данных методом POST через TWebBrowser [D7, WinXP]
Есть новые Нет новых   [134434   +28][b:0][p:0.001]