Конференция "Сети" » Как определить программно залогинился ли я на каком либо сайте [D7]
 
  • Muh (18.08.08 13:07) [0]
    Суть в следующем.
    Программе надо понять, залогинился я допустим на этом сайте или нет..и если залогинился, то надо скачать определенный файл.
    Раньше я пользовался процедурой, приведенной ниже, но программа понимала только, когда я логинился в Internet Explorer, если же я логинился в остальных прога не понимала... а с приходом Vista теперь и в Эксплорере не понимает :(
    подскажите, что можно сделать..
    надеюсь изложил понятно, спасибо

    function DownloadFile(const FileURL, FileName: String): Cardinal;
    var
     hSession, hFile: HInternet;
     Buffer: array[1..1024] of Byte;
     BufferLen, fSize: LongWord;
     f: File;
    begin
     Result := 0;
     hSession := InternetOpen('STEROID Download',
                              INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
     if Assigned(hSession) then begin
       hFile := InternetOpenURL(hSession, PChar(FileURL), nil, 0,
                                INTERNET_FLAG_RELOAD, 0);
       if Assigned(hFile) then begin
         AssignFile(f, FileName);
         Rewrite(f,1);
         fSize := 0;
         repeat
           InternetReadFile(hFile, @Buffer, SizeOf(Buffer), BufferLen);
           BlockWrite(f, Buffer, BufferLen);
           fSize := fSize + BufferLen;
         until (BufferLen = 0);
         CloseFile(f);
         Result := fSize;
         InternetCloseHandle(hFile);
       end else begin
           MessageDlg('Не могу скачать файл! Проверьте соединение с Internet', mtCustom,[mbYes], 1);
           Form1.Close;
       end;
       InternetCloseHandle(hSession);
     end
    end;
  • Muh (18.08.08 13:11) [1]
    короче главноая суть впринципе в том, что бы скачать файл..но его можно скачать, если только залогиниллся на определенном сайте..
  • clickmaker © (18.08.08 15:07) [2]
    InternetConnect()?
  • Muh (18.08.08 15:13) [3]
    а по конкретнее пожалуйста...
    а то я не очень хороший программер)
  • Rouse_ © (18.08.08 16:00) [4]
    В приведенной тобой функции нет ни намека на какой либо логин на удаленный ресурс. Или ты подразумеваешь: залогинился = соединился?
  • DiamondShark © (18.08.08 16:18) [5]
    Удалено модератором
    Примечание: Еще раз и по русски...
  • Muh (18.08.08 17:21) [6]
    ну как бы я вхожу на сайт..и авторизируюсь..после этого запускаю программу..и с помощью этой функцией можно скачивать файл.. то есть как я понял пароль и логин берется берется из кукисов ..я плохо к сожалению в этом разбираюсь.
    но к сожалению только, если я до этого логинился в эксплорере..с другими браузерами такое не работает
  • grisme © (18.08.08 17:51) [7]
    дык, другие браузеры свои кукисы хранят в отличном, от осла, месте.
  • Muh (18.08.08 18:03) [8]
    ну вот в этом и проблема..ранее был один недостаток.. не получалось использовать программу с отличными от экплорера браузерами. А теперь с появлением Висты... и в эксплорере не работает эта функция..
    подскажие как еще можно файл скачать?
  • DiamondShark © (19.08.08 15:49) [9]

    > подскажие как еще можно файл скачать?

    Эмулировать действия браузера, вестимо.
    Сначала послать данные формы, запомнить куки (т.е. сделать то, что делает браузер, когда ты "логинишся"), потом послать запрос на файл.
  • Muh (19.08.08 16:33) [10]
    как это сделать, подскажите, пожалуйста
  • clickmaker © (19.08.08 16:44) [11]
    > [10] Muh   (19.08.08 16:33)

    [2]
  • Muh (19.08.08 16:45) [12]
    это объяснение?
  • Muh (20.08.08 05:51) [13]
    ребят, ну подскажите как делать, очень важно
  • Muh (20.08.08 15:47) [14]
    каких пустых? народ, реальна помощь нужна
  • Dennis I. Komarov © (20.08.08 17:06) [15]
    > [14] Muh   (20.08.08 15:47)

    Справку или MDSN уже проштудировал?
  • Muh (20.08.08 18:24) [16]
    что такое mdsn я не знаю..по справке ничего не нашел :(
  • blackman © (20.08.08 20:31) [17]
    Как програмно ввести логин и пароль и перейти на следующую страницу
    http://articles.org.ru/cn/showdetail.php?cid=6277
    И посмотри остальное
    Delphi/Pascal » Интернет, сети
    http://articles.org.ru/cn/?c=27
  • Muh (20.08.08 21:23) [18]
    спасибо
    но в этом примере надо знать логин и пароль..а хотелось бы чтобы без ввода ..чтобы все было автоматически..
  • Muh (20.08.08 21:57) [19]
    нет, блин, ничего нет(
 
Конференция "Сети" » Как определить программно залогинился ли я на каком либо сайте [D7]
Есть новые Нет новых   [134432   +19][b:0][p:0]