Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Is there an alternative to ADIR()?
Message
De
30/04/2004 07:40:33
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Is there an alternative to ADIR()?
Divers
Thread ID:
00899669
Message ID:
00899669
Vues:
45
Hi guys,
I have a program that gets the names of files store in a network directory and puts them in a dbf(table). Am using the function ADIR() to do so but if the records are more than 20,000, I get an error "Too many variables". Is there an alternative to doing so? This is the program :


CLOSE DATABASES
CLOSE TABLES ALL

CREATE TABLE "C:\Documents and Settings\Rndivo.CRC\My Documents\s01A_img.DBF" (FILENUM C(30,0))
CLOSE TABLES ALL

gnIMAGEnumber = ADIR(gaImages, 'E:\Projects\SCANNED IMAGES\KiBS\01. Screening\01A - ANC Screening Forms\*.TIF')

CLEAR
USE "C:\Documents and Settings\Rndivo.CRC\My Documents\s01A_img.DBF" IN 1
FOR nCount = 1 TO gnIMAGEnumber
APPEND BLANK IN 1
REPLACE s01A_img.FILENUM WITH gaImages(nCount,1)
ENDFOR
CLEAR ALL
RELEASE ALL
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform