I have written the below code to use FTP in VBA. I Inserted the Microsoft internet Transfer control 6.0 in the form. when i am trying to run this code I am getting error saying that "Run-time error '429':
ActiveC component can't create object". I am getting this error while creating "objFTP" Object. Can anybody tell me why i am getting this error.


Set objFTP = New Inet
    With objFTP
        .Protocol = icFTP
        .RemoteHost = HostName
        .UserName = UserName
        .Password = Password
        .Execute .URL, "Put " + LocalPath + FullFileName + " " + RemoteFileName
        Do While .StillExecuting
            DoEvents
        Loop
        UploadFile = (.ResponseCode = 0)
    End With
    Set objFTP = Nothing