---

Nogen der ved hvordan man kan uploade til en ftp-server med asp og
komponentet socket.tcp?

Jeg har nedenstående kode, men jeg ved ikke hvordan jeg skal få den til at
uploade filer...

Mvh. Christoffer Thygesen

<pre>
<%
'USER 'brugernavn
'PASS 'password
'SYST 'server info
'CWD 'change dir
'PWD 'få serveren til at fortælle mappe vi befinder os i.
'TYPE A 'Type set to A.
'PASV 'Entering Passive Mode
'LIST 'Få lister over filer og mappe i den mappe vi befinder os i. Opening
ASCII mode data connection for /bin/ls.
'STOR minfil.asp 'upload fil til server

on error resume next

Set objSocket = Server.CreateObject("Socket.TCP")
objSocket.Host = "127.0.0.1:21"

objSocket.Open

objSocket.TimeOut = 10000

objSocket.SendLine("USER bruger")
objSocket.SendLine("PASS adgangskode")

objSocket.SendLine("TYPE A")

objSocket.SendLine("PASV")
'objSocket.WaitFor(VbCrLf)

objSocket.SendLine("LIST")
objSocket.WaitFor(VbCrLf)

tmpBuffer = objSocket.Buffer
Response.Write tmpBuffer

'objSocket.SendLine("QUIT")
objSocket.WaitForDisconnect

tmpBuffer = objSocket.Buffer
Response.Write tmpBuffer

objSocket.Close

if err.number <> 0 then
response.write "<br><br><b>Error:</b><br>" & err.number & ": " &
err.description & "<br>"
err.clear
end if
%>
</pre>