Скачивание файла с сервера

← →
Shamansky (2004-12-03 17:07) [0]

Возникла проблема, есть файл на сервере, доступный для скачивания, через IE скачивается, а через urldownloadtofile не хочет, точнее на 3 компьютерах нормально скачивает, а на 2 нет. Winda XP Proffesional SP1a & Home Edition.

← →
Reindeer Moss Eater © (2004-12-03 17:21) [1]

У тебя ошибка в программе

← →
Shamansky (2004-12-03 17:33) [2]

Но почему на 3 компах работает, а на 2 нет?
Да и пример кода:
function TForm1.Download(sourcefile, targetfile: string): boolean; begin try result:=urldownloadtofile(nil, pchar(sourcefile),pchar(targetfile),0,nil)=0; except result:=false; end; end; procedure TForm1.Downloadfile(objnum,savefile: string); var sourcefile:string; const destfile="c:\windows\tmp001.txt"; begin sourcefile:=objnum; if download(sourcefile,destfile) then try showmessage("Download succesful"); except showmessage("Error while decoding file "+savefile); end else showmessage("Error while downloading file "+sourcefile); end;
адрес файла проверен.

← →
Virus.exe © (2004-12-04 22:39) [3]

На всех компах такая система? Если да,то значит дело не в коде,
а в настройках компа...

← →
Xaker © (2004-12-05 02:27) [4]

Virus.exe © (04.12.04 22:39) [3]
у меня urldownloadtofile глючила .. я реализовывал на сокетах ..

ИМХО сокеты рулят...Правда,приходиться изучать конкретный протокол,но это даже хорошо.

← →
Shamansky (2004-12-05 15:10) [6]

Оно то конечно хорошо, через сокеты, но времени разбираться нету, уже реализовал через Indy FTP, закачивается немного дольше, но качается, а в чем глюк в системе так и не нашел. Спасибо!

Скачивание файла с сервера Найти похожие ветки