Почему под проксей не идет эта функция?? ((

← →
Muhan_ (2006-04-06 14:47) [0]

Функция закачки файла из инета...)
Выдает вот таккую хрень..
Может поможете чем, спасибо заранее

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;

← →
Сергей М. © (2006-04-06 14:51) [1]

Прокси-то причем тут ?

Отладчик тебе в руки ...

← →
Muhan_ (2006-04-06 14:52) [2]

я не знаю ))
просто кто юзал под проксей у большинства такая хрень вылетала (((
и хз что делать ((

← →
Muhan_ (2006-04-06 15:19) [3]

Вот такую хрень пишет ,при попытке скачки файла...это он пишет в файле

<!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) [4]

хотя с нетом ..все ок..все качает без проблем

← →
Muhan_ (2006-04-06 15:22) [5]

какую же функцию использовать чтобы не было такой хрени?)

← →
tesseract © (2006-04-06 17:20) [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 17:44) [7]

ничего не понял ))
не понимаю причем тут пароль...я же хочу в инете нормально
описание чего смотреть то? )
может есть другая граммотная процедурка ))

← →
tesseract © (2006-04-06 17:48) [8]

> не понимаю причем тут пароль...я же хочу в инете нормально

Как я понял из приведённого ответа proxy - ты должен быть члено домена те идёт проверка зарегистрирована твоя машина в домене или нет. Explorer просто хранит пароли.
У меня на работе типа такого, но на Netware.

← →
Muhan_ (2006-04-06 18:10) [9]

блин, а может тогда другая есть функция работающая при данном раскаладе??

неа, присмотрись к другим прогам. они позволяют задавать пароль/логин на прокси.

← →
Muhan_ (2006-04-07 01:25) [11]

блин да не нужны мне другие проги )) мне своя нужна работающая под прокси..чтобы могла файл скачать

Почему под проксей не идет эта функция?? (( Найти похожие ветки