[ppwake]

Нужна небольшая програмка, по подобию заполнения форм на сайте ЛОГИН и ПАРОЛЬ с автоматическим нажиманием на кнопку вход.
Интерфейс программы не волнует. Готов управлять прогой по необходимости через исходный код.
Кто готов написать подобную прогу за небольшое вознагрождение?

[lmikle]

Задачу ставь подробнее.
Где заполнение, что выдать в итоге?

[ppwake]

есть сайт со статистикой, авторизация проходит примерно так:

Код:

tr align="center">
            <td colspan="2" valign="top">
              <span class="style6">
               </span>            </td>
          </tr>
          <tr>
            <td align="left">логин</td>
            <td>
              <input name="login" type="text" size="16"></td>
          </tr>
          <tr>
            <td align="left">пароль</td>
            <td>
              <input name="pass" type="password" size="16"></td>
          </tr>
          <tr align="center">
            <td colspan="2"><input type="submit" name="Submit" value="Submit"></td>
          </tr>
          <tr align="right" valign="bottom">

хотел бы что бы статистика с этого сайта появлялась прям в окне проги, ну или если это нереально во фрейме проги (стата будет показываться как страничка во внутреннем браузере)

Moderatorial: Не забываем про оформление!!!

[lmikle]

Если используешь встроенный Web-browser, то все просто:

Взято из проекта, который логинится на сайт автоматом:

Код:

procedure TMainForm.Login(ASilent : Boolean);
var
  I : Integer;
  ALogin, APass : String;
  ALoginData : OleVariant;
  ALoginDataStr : String;
  AHeaders : OleVariant;
begin
  FEnableRobot := False;

  If ASilent
    Then
      Begin
        ALogin := FUserName;
        APass := FPassword;
      End
    Else
      With TLoginForm.Create(Application) Do
        Begin
          GetLoginInfo(FUserName, FPassword, FSavePassword);
          UserName := FUserName;
          Password := FPassword;
          SavePassword := FSavePassword;
          If Not Execute Then Application.Terminate;

          ALogin := UserName;
          APass := Password;

          Free;
        End;

  ALoginDataStr := Format('name=%s&pass=%s',[HTTPEncode(ALogin),HTTPEncode(APass)]);
  ALoginData := VarArrayCreate([0, Length(ALoginDataStr) - 1], varByte);
  For I := 1 To Length(ALoginDataStr) Do
    ALoginData[I-1] := Ord(ALoginDataStr[i]);

  AHeaders := 'Content-Type: application/x-www-form-urlencoded' + #10#13;

  MainWnd.Navigate('http://******.ru/game/login.php',EmptyParam,EmptyParam,ALoginData,AHeaders);
end;

[ppwake]

пардонте за не верное оформление.
Поясните, пожалуйста где вписывать логин и пароль в этом коде и нужно ли какие либо объекты помещать на саму прогу?
з.ы. я делфи занимался лет пять назад, так что я особо вообще не шарю