Re: Download all files in directory (General questions)

by Patrick Flynn, Monday, December 06, 2004, 14:46 (7291 days ago) @ wodSupport

In the connect event I have the following code

Private Sub Ftp1_Connected(ByVal ErrorCode As Long, ByVal ErrorText As String)
If ErrorCode = 0 Then
Ftp1.GetFiles C:Download , cdrbatches , 1
Else
Debug.Print CONNECT ERROR: & ErrorText
End If
End Sub

This code copies 1 of the 2 files in the cdrbatches subdirectory
but the file size is zero.

If how ever I try to copy from the root directory by using

Private Sub Ftp1_Connected(ByVal ErrorCode As Long, ByVal ErrorText As String)
If ErrorCode = 0 Then
Ftp1.GetFiles C:Download , , 1
Else
Debug.Print CONNECT ERROR: & ErrorText
End If
End Sub

the 1 file availiable is copied successfully

locked

2162 views

Complete thread:

Download all files in directory - Patrick Flynn, 2004-12-06, 12:10
- Re: Download all files in directory - wodSupport, 2004-12-06, 12:17
  - Re: Download all files in directory - Patrick Flynn, 2004-12-06, 14:46
    - Re: Download all files in directory - wodSupport, 2004-12-06, 14:49
      - Re: Download all files in directory - Patrick Flynn, 2004-12-06, 14:56
        Re: Download all files in directory - wodSupport, 2004-12-06, 15:04

We are having great success with your component ... email server that has over 750 000 mailboxes back ended by a SQL server...

Conrad Leigh

Leaf Wireless

You have been great as far as offering support is concerned and has been extremely responsive to both support requests and suggestions for product enhancements.

David Keenan

Serengeti Systems Incorporated

I really like these products - they are consistently first rate!

David Witten

WWR Development, Inc.

...your service has been phenomenal. It's always quick and you are there when I need you.

James Newman

Castleberry Investments

Thank you so much for your hard work and commitment in producing well thought-out solutions. WeOnlyDo is very committed to customer satisfaction!

Mike McPherson

Nokia Inc.

You have been great as far as offering support is concerned and has been extremely responsive to both support requests and suggestions for product enhancements.

David Keenan

Serengeti Systems Incorporated