[Delphi] Проблема авторизации с файла .txt

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by PiNgVin07, 7 Nov 2011.

  1. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    Вобщем у меня такая проблема, есть список login;pass (файл .txt) аккаунтов Вконтакте, с авторизацией всё ок, только проблема в том что например если в списке больше 1 аккаунта (формата login;pass), то авторизовует только 1 аккаунт в списке и останавливается, остальные не хочет, как это исправить?
     
    #1 PiNgVin07, 7 Nov 2011
  2. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Код в студию
     
    #2 shadowrun, 7 Nov 2011
  3. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    Могу скинуть только часть кода, какая именно часть нужна?
     
    #3 PiNgVin07, 7 Nov 2011
  4. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Цикл авторизации.
     
    #4 shadowrun, 7 Nov 2011
  5. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    да не парьтесь Вы, код авторизации уже давно паблик :)
    строки из файла перебираете по очереди? (стоит проверить может быть только 1 строка читатеся)
     
    #5 xophet, 7 Nov 2011
  6. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    тут был код..
     
    #6 PiNgVin07, 7 Nov 2011
    Last edited: 7 Nov 2011
  7. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Похоже на истину... Значит дело в строках.
     
    #7 shadowrun, 7 Nov 2011
  8. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    Может быть что ошибка в коде загрузки файла .txt и его чтение?
     
    #8 PiNgVin07, 7 Nov 2011
  9. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Ну продемонстрируйте его.
     
    #9 shadowrun, 7 Nov 2011
  10. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    for l:=0 to Login.Count-1 do , у меня отсутствует вот эта строка, но когда добавляю строку то тем более различные ошибки выскакивают...
     
    #10 PiNgVin07, 7 Nov 2011
  11. xfrzx

    xfrzx New Member

    Joined:
    9 Feb 2009
    Messages:
    0
    Likes Received:
    2
    Reputations:
    0
    http.free в конце попробуйте.

    А стоп,это только кусок чтоле.
    Если поставить http.HandleRedirect := true по идеи он сам должен будет туда перескочить.
     
    #11 xfrzx, 7 Nov 2011
    Last edited: 7 Nov 2011
  12. fuckyoupig

    fuckyoupig Member

    Joined:
    1 Mar 2011
    Messages:
    0
    Likes Received:
    11
    Reputations:
    2
    Прямо не топик а битва экстрасенсов)
    Какие ошибки то выскакивают?
     
    #12 fuckyoupig, 7 Nov 2011
  13. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    тут был код...
     
    #13 PiNgVin07, 7 Nov 2011
    Last edited: 7 Nov 2011
  14. xfrzx

    xfrzx New Member

    Joined:
    9 Feb 2009
    Messages:
    0
    Likes Received:
    2
    Reputations:
    0
    Login.free; очистит тстринглист и оттуда больше ничего не считаешь по идеи.

    Примерно так
     
    #14 xfrzx, 7 Nov 2011
    Last edited: 7 Nov 2011
  15. Fepsis

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

    Joined:
    17 Sep 2008
    Messages:
    791
    Likes Received:
    391
    Reputations:
    72
    Думаю топикстартер не затирает символы переноса строки...
     
    #15 Fepsis, 7 Nov 2011
  16. PiNgVin07

    PiNgVin07 New Member

    Joined:
    22 Oct 2011
    Messages:
    63
    Likes Received:
    0
    Reputations:
    0
    [​IMG]
    Вот такая вот ошибка выскакивает
     
    #16 PiNgVin07, 7 Nov 2011
  17. mr_walker

    mr_walker Member

    Joined:
    9 Aug 2009
    Messages:
    41
    Likes Received:
    34
    Reputations:
    2
    Code:
    begin
http := TIdHTTPEx.Create(Form1);
http.Request.UserAgent :='Opera/9.80 (Windows NT 5.1; U; ru) Presto/2.7.62 Version/11.01';
Login:=TStringList.Create;
Login.loadfromfile('logins.txt');
[COLOR=DarkOrange][B]for i:=0 to login.count-1 do[/B][/COLOR]
[COLOR=Lime]BEGIN[/COLOR]
//действия в цикле
[COLOR=Lime]END;[/COLOR]
Login.free;
http.free;
    Учись... читай Фленова.. если не понимаешь - перечитывай.
    вар'ы я думаю уже не надо описывать....
     
    #17 mr_walker, 7 Nov 2011
    Last edited: 7 Nov 2011
(You must log in or sign up to post here.)