I recently searched google for a code snippet for creating a ftp uploader and i found this code->

Dim ftp As New Chilkat.Ftp2()

Dim success As Boolean

'  Any string unlocks the component for the 1st 30-days.
success = ftp.UnlockComponent("Anything for 30-day trial")
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


ftp.Hostname = "ftp.chilkatsoft.com"
ftp.Username = "****"
ftp.Password = "****"

'  The default data transfer mode is "Active" as opposed to "Passive".

'  Connect and login to the FTP server.
success = ftp.Connect()
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


'  Change to the remote directory where the file will be uploaded.
success = ftp.ChangeRemoteDir("junk")
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


'  Upload a file.
Dim localFilename As String
localFilename = "hamlet.xml"
Dim remoteFilename As String
remoteFilename = "hamlet.xml"

success = ftp.PutFile(localFilename,remoteFilename)
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


ftp.Disconnect()

MsgBox("File Uploaded!")

i paste it into the code section for my button, and i get an error with "Dim ftp As New Chilkat.Ftp2()" does anyone know what to do? if you dont you can always give me some other code to ftp upload a file ;)

Recommended Answers

All 4 Replies

Did you install Chilkat and reference ChilkatDotNet.dll?

ive got chilkat installed but how do you reference chilkatdotnet.dll

Thanks for that, lol i didnt think it would be that simple

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.