INET component in VB6 returns 12029 error and wierd file format on server

[BizNuge]

Hi guys,

I'm trying to build a simple FTP upload program that can transfer a single file onto an FTP. I've ironed out a few bugs now, but I keep on getting a 12029 error and the format of what is on the server compared to the original is pretty messed up:-

check it out.....

this is the original - - - - C:\starz.SWF (a 1k shockwave movie)

and here's the result of the upload on the root of my FTP - - - - - - - - - - -

- -.pureftpd-upload.42c6bdcc.15.7bc5.151a94fd (zero k file)


And here's my current code, although i'm using the INET component dropped onto the form:-

Private Sub Form_Load()
 
    WriteFile
 
End Sub
 
 
Public Sub WriteFile()
     
    Dim LocalFile As String
    Dim RemoteFile As String
          
    LocalFile = "C:\starz.swf"
    RemoteFile = "starz.swf"
        
    Inet1.Execute , "PUT """ & LocalFile & """ """ & RemoteFile & """"
        
    Do While Inet1.StillExecuting = True
        DoEvents
    Loop
        
    MsgBox (Inet1.ResponseCode & vbCrLf & Inet1.ResponseInfo)
                 
End Sub

the settings I am using on the INET component are as follows:-

accesstype:- 0 - icUseDefault (tried icDirect aswell)
protocol:- 2 - icFTP (tried
remoteport - 21

and obviously my FTP location and username / password.


any help will be greatly appreciated!!!!