WININIT Sample to do FTP QUOTE-command?

[andigoering]

Hi!

Has somebody a sample for passing an QUOTE-command
using WININET.DLL?

Thanks

Andi Goering

[plenderj]

Why not just use the winsock control and do it all manually ?

- jamie

[andigoering]

Hi Jamie!

I've not much experience with winsock. (And WININET also), but i found a lot of samples on WININET, so the only point
missing is to QUOTE something.
But if You have some examples on winsock directly, would you please give me a tip?

regards

Andi Goering

[plenderj]

Well,

You'll have to read some RFCs or something, but here's how you would use the winsock control ;
(it assumes you have a winsock control called Winsock1)

Private Sub Command1_Click()
    With Winsock1
        .Protocol = sckTCPProtocol         'Use TCP
        .RemoteHost = "ftp.something.com"  'Server's Address
        .RemotePort = 21                   'FTP Port
        .Connect
    End With
End Sub

Private Sub Winsock1_Connect()
    'Here's where you put the stuff to log in
    Winsock1.SendData ".... FTP protocol stuff goes here ...."
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
    Dim var_sockdat As String
    Winsock1.GetData var_sockdata, vbString
End Sub
    'var_sockdata how holds the data that came back from the server
    'you'll have to read up on ftp to find out what bits do what in an ftp session

- jamie.