begin process at 2012 05 22 12:30:15
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Données

 > RETROUVER UN FICHIER INDEX (CDX) À ZÉRO

RETROUVER UN FICHIER INDEX (CDX) À ZÉRO


 Information sur la source

 Description

la fonction verifcdxzero recoit comme paramètre, le répertoire à contrôler.
elle renvoit vrai si un fichier est à zéro et faux dans le cas contraire.

Si tous les index  ne sont pasà zéro, un simple réindex suffit. sinon, il faut  supprimer le fichier cdx qui est à zéro, coller une svg de ce fichier  et faire un réindex.

Source

  • function verifcdxzero(repsource)
  • retour=.f.
  • if directory(repsource) .and. directory(repsource+"\cdx")
  • 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
function verifcdxzero(repsource)
retour=.f.
if directory(repsource) .and. directory(repsource+"\cdx")
	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



 Sources du même auteur

Source avec Zip Source avec une capture ETAT DYNAMIQUE
UN AUTRE CALENDRIER
CALCUL DE CLE IBAN
FTP AVEC THERMOMETRE
CREER UNE TABLE CONTENANT LA LITES COMPLÈTE DES OBJETS CONTE...

 Sources de la même categorie

APPRECOR IMPORTE DANS UNE TABLE LES CHAMPS IDENTIQUES DE L'E... par aumeric
FONCTION DE CALCUL DE CLE RIB par aumeric
CEUROANSI() CHAINE DE CARACTÈRES DÉSACCENTUÉE par AbaqueInside
XL8TABLE() : IMPORTE UNE FEUILLE D'UN CLASSEUR EXCEL 97 DANS... par AbaqueInside

 Sources en rapport avec celle ci

RENOMMER LE PRÉFIXE DE TOUS LES FICHIERS D'UN DOSSIER par mike_vk
COMMENT OBTENIR L'INFORMATION SOMMAIRE D'UN FICHIER AVEC WIN... par Mike Gagnon
COMMENT ANALYSER LE CHEMIN D'UN FICHIER AVEC WINDOWS SCRIPTI... par Mike Gagnon
COMMENT DÉPLACER UN FICHIER AVEC WINDOWS SCRIPTING HOST par Mike Gagnon
COMMENT MODIFIER L'ATTRIBUT D'UN FICHIER AVEC WINDOWS SCRIPT... par Mike Gagnon

Commentaires et avis

Commentaire de nsavage le 12/03/2007 15:30:18

Voici une suggestion pour, selon moi améliorer ce code:

Code original
for i= 1 to alen(al_fic)/5
retour= iif(al_fic[i,2]=0,.t.,retour)
next i

Code modifié
for i= 1 to alen(al_fic,1)   && Avec ",1" alen() retourne le nombre de lignes du tableau
retour= iif(al_fic[i,2]=0,.t.,retour)
next i

Cette modification a pour but de garder l'enlignement sur la bonne colonne même si le nombre de ces dernières venaient à changer dans une version ultérieure de VFP.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

re-selection d'enregistrement [ par brunaux ] dans le 1er fichier il y a donc 75 variables,les 4 premieres sont de longueur differentes et toutes de type caractere, et les 71 autres dont toutes de Export d'une requête en xls [ par crampe666 ] Salut à tous,Je cherche (et même j'arrive) à exporter les résultats d'une requête dans un fichier excel.Voici mon bout de cod j'ai besoin de votre aide dans une chose importante dans foxpro [ par jbenzakour ] je suis programmeur de vb et je ne connait rien dans le foxpro mais dans la société ou je travail se trouve un programme de la paie avec fox copier ver excel [ par brunaux ] Bonjour à tousComment faire lorsque l'on à un fichier de 30 0000 (ou plus) enregistrements et que l'on veut le copier en excel et avoir importation txt --> fox pro [ par gregorian ] Bonjour, à tous, J'aurais voulu savoir si il existait une fonction permettant de lancer la commande d'importation d'un fichier txt en dbf (un peu prob avec un append from [ par gregorian ] Bonjour, J'ai été voir cette fonction, et il me semble qu'elle répond tout a fait à mes attentes sauf un petit problème.Donc, Form [ par Domatreal ] SalutJe suis un novice en Visual FoxPro. J'ai la version 9.0. Je programme par plaisir. J'ai creer une forme avec laquelle j'ouvre&nbsp Fichier Excel [ par Domatreal ] Salut Est-il possible d'ouvrir un fichier excel (qui existe deja) avec foxpro, et de le modifier toujours dans foxpro?Merci d'avanceDomatrea Base de données VB !!! [ par spoutnic_37 ] aloha , Je dois récuperer des informations clients et d'intervention d'un logiciel écrit en VB. Les info sont stockées dans des fichie Application mullti-fichier [ par jvdh ] Salut a tous, Je programme depuis environ 2 ans en Visual Foxpro (version 8) et j'ai pu elaborer plusieurs systemes de gestion tant monoposte qu'en r


Nos sponsors


Sondage...

CalendriCode

Mai 2012
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Consulter la suite du CalendriCode

A découvrir



 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 4,976 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales