[Delphi] простой способ отстучать в админку?

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by tronin, 17 Apr 2012.

  1. tronin

    tronin New Member

    Joined:
    1 Mar 2012
    Messages:
    7
    Likes Received:
    0
    Reputations:
    0
    Подскажите методы / алгоритмы / функции / куски кода
    отстука проги в админку через инет?
     
  2. Jakeroid

    Jakeroid Member

    Joined:
    9 May 2009
    Messages:
    199
    Likes Received:
    12
    Reputations:
    1
    Уточни вопрос. Мало понятно о чем ты.
     
  3. tronin

    tronin New Member

    Joined:
    1 Mar 2012
    Messages:
    7
    Likes Received:
    0
    Reputations:
    0
    программа запускается на компе который подключен к инету (написана на Delphi)

    как проще всего организовать "отстук", то есть она отправляет что-то на сайт по заданному урл...

    сайт заносит в базу "id - есть контакт"
    id - например ip

    такое наверно можно встретить в лоадерах с админкой, но я такого пока что не встречал (исходники на delphi)
     
  4. tronin

    tronin New Member

    Joined:
    1 Mar 2012
    Messages:
    7
    Likes Received:
    0
    Reputations:
    0
    вот нашел че
    var Data:TStringList; S:string;
    begin
    Data:=TStringList.Create;
    Data.Add('somedata=somedata');
    S:=IdHTTP1.Post('url', Data);
     
  5. mironich

    mironich Elder - Старейшина

    Joined:
    27 Feb 2011
    Messages:
    733
    Likes Received:
    73
    Reputations:
    19
    Да код хороший, инди идеально подходит для написания лоадеров и прочего ПО.
     
  6. Metal-Core

    Metal-Core Member

    Joined:
    20 Sep 2011
    Messages:
    226
    Likes Received:
    21
    Reputations:
    0
    Отстукивает обычно типо этого с параметрами php:

     
  7. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    пздц...
    юзай сокеты, делаешь запрос вида:
    http://gavnoadminka.ru/index.php?ip=ip_адрес_компа.
     
  8. alexey-m

    alexey-m Elder - Старейшина

    Joined:
    15 Jul 2009
    Messages:
    518
    Likes Received:
    100
    Reputations:
    37
    какие ему сокеты, он с теорией то не разобрался =)
    а при желании можно и так вывернуться :D
    Code:
    ShellExecute(0,'open', PChar('http://site.com/?id=xxx'), nil, nil, SW_SHOWNORMAL);
    ps: ip проще в на стороне сервера определять
     
  9. tronin

    tronin New Member

    Joined:
    1 Mar 2012
    Messages:
    7
    Likes Received:
    0
    Reputations:
    0
    чем сокеты лучше инди (IdHTTP)?
     
  10. alexey-m

    alexey-m Elder - Старейшина

    Joined:
    15 Jul 2009
    Messages:
    518
    Likes Received:
    100
    Reputations:
    37
    тем что инди это глючная обертка над сокетами
     
  11. mironich

    mironich Elder - Старейшина

    Joined:
    27 Feb 2011
    Messages:
    733
    Likes Received:
    73
    Reputations:
    19
    Глюченая для тех кто не обновляет регулярно, и не умеет обрабатывать правильно исключения, для работы с HTTP протоколом в Desktop софте она вполне подходит, для другого само собой отпадает изз-за размеров.
    Code:
    ShellExecute(0,'open', PChar('http://site.com/?id=xxx'), nil, nil, [COLOR=DarkOrange]SW_SHOWNORMAL[/COLOR]);
    
    И потенциальная жертва озадачица внезапно появившемся окошком.