Avatar billede telep Nybegynder
04. januar 2002 - 11:42 Der er 5 kommentarer og
2 løsninger

Komponenten Internet Transfer Control 6.0

Hej,

Jeg står med et problem der går ud på at jeg skal med ovennævnte komponent uploade en fil til et givet websted. Jeg er ikke ferm til denne komponent og sidder lidt fast pt... Måske der er nogen der kan sparke mig lidt videre.

Lidt oplysninger:
Filer jeg skal uploade ligger \"F:\\temp\\disclaimer.txt\"
Jeg bruger FTP protokollen til upload på port 21.
Jeg har både username og password til webstedet.

Min kode ser foreløbig således ud:
Me.Inet1.RemoteHost = \"users.cybercity.dk\"
Me.Inet1.RemotePort = \"21\"
Me.Inet1.Password = \"**********\"
Me.Inet1.UserName = \"dsl500XX\"
Me.Inet1.Document = \"f:\\temp\\disclaimer.txt\"
Me.Inet1.Execute \"FTP://users.cybercity.dk\", _
\"PUT F:\\Temp\\Disclaimer.txt\"

alle \"x\" er selvfølgelig bare for sikkerhedens skyld!
Avatar billede kaffe Nybegynder
04. januar 2002 - 12:02 #1
Nu skriver du ikke hvad der går galt, men syntaxen for PUT (med FTP protokollen) er:

PUT file1 file2
Copies a local file specified in file1 to the remote host specified in file2.
Execute , _
\"PUT C:\\putme.txt /putme.txt\"

Avatar billede telep Nybegynder
04. januar 2002 - 14:19 #2
Det virker sgu ikke rigtig.....


HJÆLP!

Jeg sætter pointene op til 100 NU
Avatar billede kaffe Nybegynder
04. januar 2002 - 14:33 #3
hvad kommer den med af fejlmeddelelser?
Avatar billede telep Nybegynder
04. januar 2002 - 15:06 #4
Jeg har selv lige løst problemet!

Men du får lidt for din gode vilje!
Avatar billede kaffe Nybegynder
04. januar 2002 - 15:21 #5
Tak for pointene - hvad var fejlen ?
Avatar billede telep Nybegynder
04. januar 2002 - 15:31 #6
Som du skrev fra MSDN så er syntaksen \"SEND File1 File2

Problemet viste sig at være at få strikke URL\'en sådan sammen at username og password til FTP-stedet stod i URL\'en.

Den færdige kode kom til at se sådan ud:

URL = \"ftp://\" & frmIndst.txtFTPUser.Text & \":\" & frmIndst.txtFTPPass.Text & \"@\" & frmIndst.txtUploadAdr.Text

Me.Inet1.Execute URL, \"SEND \" & frmIndst.txtStiDatabase.Text & \" \" & frmIndst.txtUploadedFileName.Text

Hvor URL er en string.

Tak for din hjælp!
Avatar billede kaffe Nybegynder
04. januar 2002 - 15:58 #7
selvtak
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester