I just googled and came up empty.  Where does one get this inetFtp   
   program (.dll?)  I found others asking but no answers.   
      
   Mike   
      
   On Thu, 13 Mar 2008 17:58:29 +0200, in comp.lang.visual.basic "Pyrforos"   
    wrote:   
      
   >Hi everybody,   
   >   
   >I have this tiny problem which I am not able to solve.   
   >I use an Internet Transfer Control to upload a file.   
   >I use the following code which I found on vb-helper.   
   >   
   >Private Function UploadFile(ByVal source_file As String, ByVal dest_file As   
   >String, ByVal host_name As String, ByVal user_name As String, ByVal passwd   
   >As String) As Boolean   
   >    ' Get the file's contents.   
   >    On Error GoTo UploadError   
   >   
   >    ' You must set the URL before the user name and   
   >    ' password. Otherwise the control cannot verify   
   >    ' the user name and password and you get the error:   
   >    '   
   >    '       Unable to connect to remote host   
   >    If LCase$(Left$(host_name, 6)) <> "ftp://" Then host_name = "ftp://" &   
   >host_name   
   >    inetFtp.URL = host_name   
   >    inetFtp.UserName = user_name   
   >    inetFtp.Password = passwd   
   >   
   >    ' Do not include the host name here. That will make   
   >    ' the control try to use its default user name and   
   >    ' password and you'll get the error again.   
   >    Debug.Print "Put " & source_file & " " & dest_file   
   >    inetFtp.Execute , "Put " & source_file & " " & dest_file   
   >   
   >    UploadFile = True   
   >    Exit Function   
   >   
   >UploadError:   
   >    MsgBox "Error " & Err.Number & _   
   >        " uploading file '" & _   
   >        source_file & "' to '" & _   
   >        dest_file & "'." & vbCrLf & Err.Description, _   
   >        vbExclamation Or vbOKOnly, _   
   >        "Download Error"   
   >    UploadFile = False   
   >    Exit Function   
   >End Function   
   >   
   >The problem is that when I try to execute this code from the   
   >computer in my work (directly connected to the Internet) the   
   >code is executed without any problem.   
   >When I try though to run the code from my home computer   
   >the code doesn't execute (no file is uploaded).   
   >From my home I connect to the Internet with a lan (computer   
   >connected to a switch which is conected to the ADSL Rooter).   
   >I am able to retrieve information with IntTransfContr from the   
   >Internet but I cannot upload. Any suggestions?   
   >   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)