i've a big problem : in my office there is a Siemens Nixdorf computer with
Quattro Niros 3.3 operative system (is it something eatable ? ;-) ) connect
to our lan. This system has a FTP server.
With VB I need to connect to this FTP and get all files whose name start
Pls note that this system doesn't support directory and it has 7 logical
unit, and the files are accessed giving the UL/filename (for example
If I exec the findfirst file
Dim bret%, herror&, hFile&, i%, nfile$
Dim pdata As WIN32_FIND_DATA, a As Boolean
pdata.cFileName = String(230, 0)
hFile = FtpFindFirstFile(hconnection, "05/*", pdata, 0, 0)
in this way i have the list of all file on UL logic unit and then with the
bret = InternetFindNextFile(hFile, pdata)
herror = Err.LastDllError
If bret <> 1 Then
If herror = ERROR_NO_MORE_FILES Then
I hv to examine manually all the file on this logical unit and check if
they start with AY.
The problem is that when I exec the first findfirstfile it took more than 5
minute and in add it slow the other system.
I tried to use the
hFile = FtpFindFirstFile(hconnection, "05/AY*", pdata, 0, 0)
but they alway report that there is no files even if in the server they
Does anybody know how to solve this problem ? is there any special flag I
can use with findnext,findfirst,openconnection that can solve my problem ?
If i open a dos session and run ftp, after connection if i give command dir
5/ay* I can see only the files that actually start with ay on lu 5.
Many thanks in advance.