Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Backup, error found too late
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01183112
Message ID:
01183141
Vues:
32
However, opening the tables is not enough. There are types of corruption where the tables open fine, but the data is corrupt.

>Yes... Once you get them to a backup directory (or you could even check them in the live directory too). You could do the following to make sure the tables at least open natively...
>
>
>lcBadFiles = ""
>on error llBadFile = .t.
>lnFiles = adir( laFiles, "SubDirectory\*.dbf" )
>for lnI = 1 to lnFiles
>   llBadFile = .f.   && always reset flag before testing next file
>   use ( "SubDirectory\" + laFiles[ lnI, 1] )
>   if llBadFile
>       lcBadFiles = lcBadFiles + laFiles[ lnI, 1] + chr(13)+chr(10)
>   endif
>endfor
>
>if not empty( lcBadFiles )
>  messagebox( "Some Bad Files: " + lcBadFiles )
>endif
>on error
>
Craig Berntson
MCSD, Microsoft .Net MVP, Grape City Community Influencer
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform