Запись txt файла на FTP и наоборот

[dimmm]

Подскажите пожалуйста, как мне автоматически кидать файлик текстовый в папку сайта, где храняться все *.txt, *.htm, а потом сливать его оттуда??

[Хакер]

А какие проблемы не дают тебе это сделать?

[Proxy]

Незнание спецификаций FTP протокола видимо) Ну тут уж линк на RFC
http://tools.ietf.org/html/rfc959
http://tools.ietf.org/html/rfc2228

Ну а чтение/запись файла - можешь удосужиться поискать.

[Хакер]

Proxy
А зачем ему знать протокол? wininet.dll знает, и хватит с того.

[Proxy]

А не проще вручную? Просто сокет + мозг + протокол FTP = решение данной задачи.

[Хакер]

Proxy
Ничуть не проще.

[dimmm]

вот исходник который вродь не работает...

Dim strUrl As String
Dim strSource As String
Dim strDest As String

Private Sub Command1_Click()
strUrl = txtURLbox.Text
strSource = txtServerPath.Text
strDest = txtLocalPath.Text
Inet1.Execute strUrl, "GET " & strSource & " " & strDest
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
Dim strAllText As String
Dim strLine As String
Select Case State
Case icError
If Inet1.ResponseCode = 80 Then
MsgBox "file exist! new name:"
Else
MsgBox Inet1.ResponseInfo, , "unknown error"
End If
Case icResponseCompleted
If Option1.Value = True Then
Open strDest For Input As #1
Do Until EOF(1)
Line Input #1, strLine
strAllText = strAllText & strLine & vbCrLf
Loop
Close #1
txtNote.Text = strAllText
Else
txtNote.Text = ""
MsgBox "completed", , strDest
End If
End Select
End Sub

[Matew]

dimmm, в Api-guide искать по слову "ftp".