![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Почему под проксей не идет эта функция?? (( [D7, WinXP]
Muhan_ © (2006-04-06 14:47:00)Функция закачки файла из инета...)
Выдает вот таккую хрень..
Может поможете чем, спасибо заранее
Access violation at address 004D5DA1 in module 'Project1.exe'/ Read of address 00A30000.
а вот текст функции:
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;
Muhan_ (2006-04-07 01:25:00) [1]блин да не нужны мне другие проги )) мне своя нужна работающая под прокси..чтобы могла файл скачать
tesseract (2006-04-06 21:35:00) [2]неа, присмотрись к другим прогам. они позволяют задавать пароль/логин на прокси.
Muhan_ (2006-04-06 18:10:00) [3]блин, а может тогда другая есть функция работающая при данном раскаладе??
tesseract (2006-04-06 17:48:00) [4]
> не понимаю причем тут пароль...я же хочу в инете нормально
Как я понял из приведённого ответа proxy - ты должен быть члено домена те идёт проверка зарегистрирована твоя машина в домене или нет. Explorer просто хранит пароли.
У меня на работе типа такого, но на Netware.
Muhan_ (2006-04-06 17:44:00) [5]ничего не понял ))
не понимаю причем тут пароль...я же хочу в инете нормально
описание чего смотреть то? )
может есть другая граммотная процедурка ))
tesseract (2006-04-06 17:20:00) [6]тебя же прокся посылает. Вероятно хочет пароля. Тк socks 5. смотри её описание.
а Violtaion явно здесь
> repeat InternetReadFile(hFile, @Buffer, SizeOf(Buffer),
> BufferLen); BlockWrite(f, Buffer, BufferLen);
> fSize := fSize + BufferLen; until (BufferLen =
> 0);
Muhan_ (2006-04-06 15:22:00) [7]какую же функцию использовать чтобы не было такой хрени?)
Muhan_ (2006-04-06 15:19:00) [8]Вот такую хрень пишет ,при попытке скачки файла...это он пишет в файле
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html>
<head><title>Сообщение Интернет-прокси (DCC://Box)</title><base href=" http://192.168.40.22/">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<link rel="STYLESHEET" type="text/css" href="/theme/dcc.css">
</head><body><h1>Доступ к ресурсам Интернет запрещён</h1><h2>Уважаемый пользователь!</h2>
<p>В настоящее время Вам запрещен доступ к ресурсам Интернет.</p>
<p>Причины, по которым Вам запрещен доступ, могут быть следующие:<ul>
<li><em>Вы не являетесь членом домена MSK.AEROFLOT.RU.</em> В этом случае Вам необходимо подать заявку в службу поддержки пользователей (HelpDesk) по телефону 777 для включения в домен.</li>
<li><em>Вы являетесь членом домена MSK.AEROFLOT.RU, и Ваш компьютер работает по управлением операционной системы Windows98.</em> В этом случае необходимо ввести Ваше имя и пароль для входа в сеть.</li>
<li><em>Вы являетесь членом домена MSK.AEROFLOT.RU, но доступ в Интернет для Вашей учетной записи запрещен (возможно по указанию Вашего руководителя).</em></li>
</ul></p>
<p>Если Вы считаете, что доступ заблокирован ошибочно - направьте сообщение по адресу
<a href="mailto:proxy@aeroflot.ru?Subject=[Proxy]%20Blocked%20user%20upsets">proxy@aeroflot.ru</a></p>
<address> <a href=" http://dcc.sft.ru">DCC://Box v3.4</a> </address>
</body></html>
<BR clear="all">
<HR noshade size="1px">
<ADDRESS>
Generated Thu, 06 Apr 2006 11:16:33 GMT by svo-proxy-01.msk.aeroflot.ru (squid/2.5.STABLE12-20051118)
</ADDRESS>
</BODY></HTML>
Muhan (03:17 PM) :
это в обеих?
Amoralez (03:18 PM) :
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html>
<head><title>Сообщение Интернет-прокси (DCC://Box)</title><base href=" http://192.168.40.22/">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<link rel="STYLESHEET" type="text/css" href="/theme/dcc.css">
</head><body><h1>Доступ к ресурсам Интернет запрещён</h1><h2>Уважаемый пользователь!</h2>
<p>В настоящее время Вам запрещен доступ к ресурсам Интернет.</p>
<p>Причины, по которым Вам запрещен доступ, могут быть следующие:<ul>
<li><em>Вы не являетесь членом домена MSK.AEROFLOT.RU.</em> В этом случае Вам необходимо подать заявку в службу поддержки пользователей (HelpDesk) по телефону 777 для включения в домен.</li>
<li><em>Вы являетесь членом домена MSK.AEROFLOT.RU, и Ваш компьютер работает по управлением операционной системы Windows98.</em> В этом случае необходимо ввести Ваше имя и пароль для входа в сеть.</li>
<li><em>Вы являетесь членом домена MSK.AEROFLOT.RU, но доступ в Интернет для Вашей учетной записи запрещен (возможно по указанию Вашего руководителя).</em></li>
</ul></p>
<p>Если Вы считаете, что доступ заблокирован ошибочно - направьте сообщение по адресу
<a href="mailto:proxy@aeroflot.ru?Subject=[Proxy]%20Blocked%20user%20upsets">proxy@aeroflot.ru</a></p>
<address> <a href=" http://dcc.sft.ru">DCC://Box v3.4</a> </address>
</body></html>
<BR clear="all">
<HR noshade size="1px">
<ADDRESS>
Generated Thu, 06 Apr 2006 11:16:31 GMT by svo-proxy-01.msk.aeroflot.ru (squid/2.5.STABLE12-20051118)
</ADDRESS>
</BODY></HTML>
Muhan_ (2006-04-06 15:19:00) [9]хотя с нетом ..все ок..все качает без проблем
Muhan_ (2006-04-06 14:52:00) [10]я не знаю ))
просто кто юзал под проксей у большинства такая хрень вылетала (((
и хз что делать ((
Сергей М. (2006-04-06 14:51:00) [11]Прокси-то причем тут ?
Отладчик тебе в руки ...