/ 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
Send og Modtag en fil
Fra : Tom Sommer


Dato : 12-10-01 00:40

Hvordan får man en Klient til at sende en fil til en Server som så gemmer
filen på harddisken?

Med winsock... ?
--
Tom Sommer



 
 
Finn Bindeballe (12-10-2001)
Kommentar
Fra : Finn Bindeballe


Dato : 12-10-01 07:19

hej der........

hvis jeg var dig ville jeg overveje at bruge FTP, det er beregnet til
det..............

/FB

Tom Sommer wrote:

> Hvordan får man en Klient til at sende en fil til en Server som så gemmer
> filen på harddisken?
>
> Med winsock... ?
> --
> Tom Sommer


Magnus Högfeldt (12-10-2001)
Kommentar
Fra : Magnus Högfeldt


Dato : 12-10-01 15:45

Prøv at hente MonsterFTP komponenten, den er meget nem at bruge!
(Mener nok at den ligger på www.torry.net)

Mvh
Magnus Högfeldt


"Tom Sommer" <webmaster@tsn.dk> skrev i en meddelelse
news:3bc62dd8$0$221$edfadb0f@dspool01.news.tele.dk...
> Hvordan får man en Klient til at sende en fil til en Server som så gemmer
> filen på harddisken?
>
> Med winsock... ?
> --
> Tom Sommer
>
>



Anders Holm Jensen (12-10-2001)
Kommentar
Fra : Anders Holm Jensen


Dato : 12-10-01 17:35

Den FTP komponent der er i Delphi 4 er let at bruge, så prøv den !!

Sådan har jeg brugt den :
De indstillinger jeg har brugt kommer for en DAT fil, og det er normale
tekst strenge !!

procedure TFwebadm.Button9Click(Sender: TObject);
var
indstillinger: Tindstillinger;
begin
if MessageDlg('Vil du Downloade databasen fra web-serveren til redigering?',
mtConfirmation, [mbYes,mbNO], 0 ) = mrYes then
begin
try
TDHISDB.connected := false;
except
showmessage('Fejl i at lukke forbindelsen til databasen');
end;
AssignFile(indfil, filnavn);
try
reset(indfil);
Read(indfil, indstillinger);
FTP.Host := indstillinger.host;
FTP.Port := 21;
FTP.TimeOut := 0;
FTP.UserID := indstillinger.userid;
FTP.Password := indstillinger.passw;
FTP.Connect;
FTP.ChangeDir(indstillinger.subdir);
FTP.Mode(MODE_IMAGE);
FTP.Download('his.mdb', indstillinger.downsti) ;
FTP.Disconnect;
finally
CloseFile(indfil);
end;
try
Fwebadm.TDHISDB.connected := true;
except
showmessage('Fejl i at åbne forbindelsen til databasen');
end;
end;
end;

Hilsen AHJ

"Magnus Högfeldt" <magnus@hodclub.dk> skrev i en meddelelse
news:3bc70328$0$26982$ba624c82@nntp02.dk.telia.net...
> Prøv at hente MonsterFTP komponenten, den er meget nem at bruge!
> (Mener nok at den ligger på www.torry.net)
>
> Mvh
> Magnus Högfeldt
>
>
> "Tom Sommer" <webmaster@tsn.dk> skrev i en meddelelse
> news:3bc62dd8$0$221$edfadb0f@dspool01.news.tele.dk...
> > Hvordan får man en Klient til at sende en fil til en Server som så
gemmer
> > filen på harddisken?
> >
> > Med winsock... ?
> > --
> > Tom Sommer
> >
> >
>
>



Tom Sommer (13-10-2001)
Kommentar
Fra : Tom Sommer


Dato : 13-10-01 09:26

jeg kan ikke rigtigt se nogen FTP komponent... kun winsock

Har Delphi 6 personal

--
Tom Sommer
E-Mail: webmaster(a)tsn.dk
Web: http://www.tsn.dk

"Anders Holm Jensen" <ahjmw@mail1.stofanet.dk> wrote in message
news:3bc71a52$0$26979$ba624c82@nntp02.dk.telia.net...
> Den FTP komponent der er i Delphi 4 er let at bruge, så prøv den !!
>
> Sådan har jeg brugt den :
> De indstillinger jeg har brugt kommer for en DAT fil, og det er normale
> tekst strenge !!
>
> procedure TFwebadm.Button9Click(Sender: TObject);
> var
> indstillinger: Tindstillinger;
> begin
> if MessageDlg('Vil du Downloade databasen fra web-serveren til
redigering?',
> mtConfirmation, [mbYes,mbNO], 0 ) = mrYes then
> begin
> try
> TDHISDB.connected := false;
> except
> showmessage('Fejl i at lukke forbindelsen til databasen');
> end;
> AssignFile(indfil, filnavn);
> try
> reset(indfil);
> Read(indfil, indstillinger);
> FTP.Host := indstillinger.host;
> FTP.Port := 21;
> FTP.TimeOut := 0;
> FTP.UserID := indstillinger.userid;
> FTP.Password := indstillinger.passw;
> FTP.Connect;
> FTP.ChangeDir(indstillinger.subdir);
> FTP.Mode(MODE_IMAGE);
> FTP.Download('his.mdb', indstillinger.downsti) ;
> FTP.Disconnect;
> finally
> CloseFile(indfil);
> end;
> try
> Fwebadm.TDHISDB.connected := true;
> except
> showmessage('Fejl i at åbne forbindelsen til databasen');
> end;
> end;
> end;
>
> Hilsen AHJ
>
> "Magnus Högfeldt" <magnus@hodclub.dk> skrev i en meddelelse
> news:3bc70328$0$26982$ba624c82@nntp02.dk.telia.net...
> > Prøv at hente MonsterFTP komponenten, den er meget nem at bruge!
> > (Mener nok at den ligger på www.torry.net)
> >
> > Mvh
> > Magnus Högfeldt
> >
> >
> > "Tom Sommer" <webmaster@tsn.dk> skrev i en meddelelse
> > news:3bc62dd8$0$221$edfadb0f@dspool01.news.tele.dk...
> > > Hvordan får man en Klient til at sende en fil til en Server som så
> gemmer
> > > filen på harddisken?
> > >
> > > Med winsock... ?
> > > --
> > > Tom Sommer
> > >
> > >
> >
> >
>
>



Thomas Riedel (13-10-2001)
Kommentar
Fra : Thomas Riedel


Dato : 13-10-01 21:56

Du skal hente Indy componenterne på nettet.
mvh
--
Thomas Riedel
"Tom Sommer" <webmaster@tsn.dk> wrote in message
news:3bc7faac$0$42004$edfadb0f@dspool01.news.tele.dk...
> jeg kan ikke rigtigt se nogen FTP komponent... kun winsock
>
> Har Delphi 6 personal
>
> --
> Tom Sommer
> E-Mail: webmaster(a)tsn.dk
> Web: http://www.tsn.dk
>
> "Anders Holm Jensen" <ahjmw@mail1.stofanet.dk> wrote in message
> news:3bc71a52$0$26979$ba624c82@nntp02.dk.telia.net...
> > Den FTP komponent der er i Delphi 4 er let at bruge, så prøv den !!
> >
> > Sådan har jeg brugt den :
> > De indstillinger jeg har brugt kommer for en DAT fil, og det er normale
> > tekst strenge !!
> >
> > procedure TFwebadm.Button9Click(Sender: TObject);
> > var
> > indstillinger: Tindstillinger;
> > begin
> > if MessageDlg('Vil du Downloade databasen fra web-serveren til
> redigering?',
> > mtConfirmation, [mbYes,mbNO], 0 ) = mrYes then
> > begin
> > try
> > TDHISDB.connected := false;
> > except
> > showmessage('Fejl i at lukke forbindelsen til databasen');
> > end;
> > AssignFile(indfil, filnavn);
> > try
> > reset(indfil);
> > Read(indfil, indstillinger);
> > FTP.Host := indstillinger.host;
> > FTP.Port := 21;
> > FTP.TimeOut := 0;
> > FTP.UserID := indstillinger.userid;
> > FTP.Password := indstillinger.passw;
> > FTP.Connect;
> > FTP.ChangeDir(indstillinger.subdir);
> > FTP.Mode(MODE_IMAGE);
> > FTP.Download('his.mdb', indstillinger.downsti) ;
> > FTP.Disconnect;
> > finally
> > CloseFile(indfil);
> > end;
> > try
> > Fwebadm.TDHISDB.connected := true;
> > except
> > showmessage('Fejl i at åbne forbindelsen til databasen');
> > end;
> > end;
> > end;
> >
> > Hilsen AHJ
> >
> > "Magnus Högfeldt" <magnus@hodclub.dk> skrev i en meddelelse
> > news:3bc70328$0$26982$ba624c82@nntp02.dk.telia.net...
> > > Prøv at hente MonsterFTP komponenten, den er meget nem at bruge!
> > > (Mener nok at den ligger på www.torry.net)
> > >
> > > Mvh
> > > Magnus Högfeldt
> > >
> > >
> > > "Tom Sommer" <webmaster@tsn.dk> skrev i en meddelelse
> > > news:3bc62dd8$0$221$edfadb0f@dspool01.news.tele.dk...
> > > > Hvordan får man en Klient til at sende en fil til en Server som så
> > gemmer
> > > > filen på harddisken?
> > > >
> > > > Med winsock... ?
> > > > --
> > > > Tom Sommer
> > > >
> > > >
> > >
> > >
> >
> >
>
>



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste