ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

contrôler si un fichier cdx d'une table appartenant à une base de donnée dbc est à zéro   



L'auteur

eric leissler
France France
Membre Simple
# 0000002784
enregistré le 06/03/2010
http://www.aumeric.fr
62 ans
leissler eric
85290 MORTAGNE SUR SEVRE
de la société AUMERIC LOGICIELS ( 0633412395 )
Fiche personnelle


Note des membres
pas de note

Contributions > 04 - DBF : Tables

contrôler si un fichier cdx d'une table appartenant à une base de donnée dbc est à zéro
# 0000000243
ajouté le 23/09/2005 19:46:56 et modifié le 30/05/2009
consulté 5192 fois
Niveau débutant

Version(s) Foxpro :
VFP 9.0
VFP 8.0
VFP 7.0
VFP 6.0
VFP 5.0
VFP 3.0


Le téléchargement des pièces jointes est limité aux membres
Veuillez vous identifier ou vous inscrire si vous n'avez pas encore de compte ...
Description

Bonsoir

passez en paramètre le répertoire qui contient les fichiers cdx

lefonction vérifie qu'aucun fichier ne se trouve à zéro

( ce qui est en général el cas lorsqu'une table à été ouverte en mode exclusif et qu'un pb est survenu)

 

Bon week end à tous

Code source :
function verifcdxzero(repsource)
retour=.f.

if directory(repsource)
  adir(al_fic,repsource+'\*.cdx')
  for i= 1 to alen(al_fic)/5
    retour= iif(al_fic[i,2]=0,.t.,retour)
  next i
endif
return retour


Commentaires
Aucun commentaire enregistré ...

Publicité

Les pubs en cours :

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2019.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3