/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Downloade given fil fra nettet
Fra : Thomas P


Dato : 06-04-01 22:46

Hvordan kan man (uden uholdbare metoder m.m.) downloade en given fil fra
nettet med et par liniers kode ? Jeg har ikke brug for at kunne se store
statistikker over hvor mange kb's der er downloadet indtil videre - bare
downloade dem .-)

- Thomas



 
 
N/A (07-04-2001)
Kommentar
Fra : N/A


Dato : 07-04-01 02:52



Jan (07-04-2001)
Kommentar
Fra : Jan


Dato : 07-04-01 02:52

Hej.
"Søren J. Løvborg" <sjl-software@worldonline.dk> skrev i en meddelelse
news:KTqz6.25110$o4.1447184@news010.worldonline.dk...
> Jeg formoder du mener fra en HTTP server.
> Med FPiette komponent samlingen følger et >>realtivt<< simpelt program til
> download, www.fpiette.fr. Selve downloadkoden fylder her ca. 10 linier.
> Jeg tror ikke det kan gøres lettere.
> --
> Søren J. Løvborg
> sjl-software@image.dk
>
Sagtens, hva' med een enkelt linie (Uses ShellAPI):

ShellExecute(Handle, nil, PChar('http://et.sted.dk/fil.exe),
nil, nil, SW_NORMAL);

Eller du kan benytte Indy (Internet Direct) komponentpakken,
http://www.nevrona.com/indy

Her er et stykke ubeskyttet kode:

var
F: TFileStream;
begin
F:= TFileStream.Create('c:\windows\skrivebord\fil.exe', fmCreate);
IdHTTP.Get('http://et.sted.dk/fil.exe', F);
F.Free;
end;

/Jan



Thomas P (07-04-2001)
Kommentar
Fra : Thomas P


Dato : 07-04-01 13:39

> Sagtens, hva' med een enkelt linie (Uses ShellAPI):
>
> ShellExecute(Handle, nil, PChar('http://et.sted.dk/fil.exe),
> nil, nil, SW_NORMAL);

Så vidt jeg husker, gør shellexcecute intet andet end at køre filen igennem
et filter, der så finder ud af hvilket program filen skal køres med. Det jeg
vil, er at have en kode der downloader filen, uafhængigt af forskellige
programmer, der spørger om filen 'må' downloades eller ej ;)

- Thomas



Jan (07-04-2001)
Kommentar
Fra : Jan


Dato : 07-04-01 21:55

Hej.
"Thomas P" <blomme@post.com> skrev i en meddelelse
news:9an1p1$i5t$1@news.inet.tele.dk...
> > Sagtens, hva' med een enkelt linie (Uses ShellAPI):
> >
> > ShellExecute(Handle, nil, PChar('http://et.sted.dk/fil.exe),
> > nil, nil, SW_NORMAL);
>
> Så vidt jeg husker, gør shellexcecute intet andet end at køre filen
igennem
> et filter, der så finder ud af hvilket program filen skal køres med. Det
jeg
> vil, er at have en kode der downloader filen, uafhængigt af forskellige
> programmer, der spørger om filen 'må' downloades eller ej ;)
>
> - Thomas
Har du skiftet mening (jvf. oprindelige indlæg)?
-
Jeg gav dig en stump kode i forrige tråd som benytter http protollen
via TCP. Hva' mere kan du forlange ???
Ved du hvad du snakker om?

/Jan



Thomas P (07-04-2001)
Kommentar
Fra : Thomas P


Dato : 07-04-01 23:09

Ooops ! Jeg havde slet ikke set det nederste af indlægget - min fejl

- Thomas
Jan <the@beast.himself> skrev i en
nyhedsmeddelelse:r8Lz6.26812$o4.1649608@news010.worldonline.dk...
> Hej.
> "Thomas P" <blomme@post.com> skrev i en meddelelse
> news:9an1p1$i5t$1@news.inet.tele.dk...
> > > Sagtens, hva' med een enkelt linie (Uses ShellAPI):
> > >
> > > ShellExecute(Handle, nil, PChar('http://et.sted.dk/fil.exe),
> > > nil, nil, SW_NORMAL);
> >
> > Så vidt jeg husker, gør shellexcecute intet andet end at køre filen
> igennem
> > et filter, der så finder ud af hvilket program filen skal køres med. Det
> jeg
> > vil, er at have en kode der downloader filen, uafhængigt af forskellige
> > programmer, der spørger om filen 'må' downloades eller ej ;)
> >
> > - Thomas
> Har du skiftet mening (jvf. oprindelige indlæg)?
> -
> Jeg gav dig en stump kode i forrige tråd som benytter http protollen
> via TCP. Hva' mere kan du forlange ???
> Ved du hvad du snakker om?
>
> /Jan
>
>



Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408938
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste