FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Simuler l’appui de n’importe quelle touche.
par papydall Hier à 23:54

» Le Forum est en vacances.
par JL35 Hier à 21:20

» Une autre façon de terminer une application.
par JL35 Mar 22 Aoû 2017 - 14:27

» Compilateur FBPano
par Mike Lun 21 Aoû 2017 - 23:17

» Pb 20 (en analyse): plantage à l'appel d'un SUB
par Jack Lun 21 Aoû 2017 - 21:58

» Pb 19 (en analyse): libellé d'erreur dans des IF imbriqués
par Jack Lun 21 Aoû 2017 - 21:55

» Copier / coller du texte à partir de la fenêtre de commandes
par jean_debord Lun 21 Aoû 2017 - 9:46

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par papydall Lun 21 Aoû 2017 - 5:01

» Mettre en windows en veille
par papydall Lun 21 Aoû 2017 - 4:15

» Stretch_on ne stretch plus...
par papydall Dim 20 Aoû 2017 - 15:22

» Pb 18 (en analyse): RESTORE_LABEL avec DATA à la fin
par Jack Dim 20 Aoû 2017 - 13:21

» Problème de traitement des opérateurs avec le compilateur.
par Pedro Alvarez Sam 19 Aoû 2017 - 20:01

» Pb 17 (résolu): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Rechercher une chaîne de caractère dans un fichier.

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5523
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Rechercher une chaîne de caractère dans un fichier.   Sam 22 Avr 2017 - 13:45

Rechercher une chaîne de caractère dans un ou plusieurs fichiers.
La commande FIND de l’invite de commande peut s’avérer très intéressante si l’on cherche, par exemple l’ensemble de lignes qui contiennent une chaîne de caractères spécifiée.
Le code suivant décrit la commande FIND et donne sa syntaxe ainsi que quelques exemples de son emploi.

Pour tester :
Enregistrer le code suivant sous le nom : Compteur_Ligne_Fichier_By_Find.bas  ( vous pouvez bien sûr choisir un autre nom !)
Et tester le programme en observant le résultat des lignes 32, 35 et 38 (en supprimant le REM devant)

Code:

rem ============================================================================
rem          Compteur_Ligne_Fichier_By_Find.bas
rem ============================================================================
rem    Recherche une chaîne de texte dans un ou plusieurs fichiers
rem        A l’aide de la commande FIND de l’invite de commande
rem ============================================================================
rem  Syntaxe
rem  FIND [/V] [/C] [/N] [/I] [/OFF[LINE]] "chaîne" [[lecteur:] [chemin]nom_de_fichier[ ...]]
rem  /V         Affiche toutes les lignes ne contenant pas la chaîne spécifiée.
rem  /C         Affiche seulement le nombre de lignes contenant la chaîne.
rem  /N         Affiche les numéros de ligne avec les lignes affichées.
rem  /I         Ignore la casse lors de la recherche de la chaîne.
rem  /OFF[LINE] Ne pas ignorer les fichiers dont l’attribut hors connexion a été réglé.
rem  "chaîne"   Spécifie la chaîne de texte à trouver.
rem  [lecteur:][chemin]nom_de_fichier  Spécifie un ou des fichiers pour la recherche.
rem Sans nom de chemin, FIND recherche le texte entré à l’invite ou redirigé depuis une autre commande.
rem ============================================================================
dim fichier$        : ' Fichier dans lequel on fait la recherche
fichier$ = "Compteur_Ligne_Fichier_By_Find.bas" : ' C'est ce même fichier à adapter
dim chaine$         : ' Chaine de caractères à chercher dans le fichier
chaine$ = "affiche" : ' On cherche la chaîne "affiche"
if file_exists(fichier$) <> 1
   message "Fichier : " + fichier$ + " non trouvé ! "
   terminate
end_if
Find(chaine$,fichier$)
terminate
rem ============================================================================
SUB Find(chaine$,fichier$)
    clipboard_string_copy "" : ' vider le contenu du presse-papier
    rem Affiche toutes les lignes ne contenant pas la chaîne spécifiée (sans tenir compte de la casse).
    ' execute_wait "cmd /c find /v /i" + chr$(34) + chaine$ + chr$(34) + " " +fichier$ + " |clip" + chr$(34)
    rem ========================================================================
    rem Affiche le nombre de lignes Ne contenant Pas la chaîne spécifiée (sans tenir compte de la casse)
    ' execute_wait "cmd /c find /v /c /i" + chr$(34) + chaine$ + chr$(34) + " " +fichier$ + " |clip" + chr$(34)
    rem ========================================================================
    rem Affiche les numéros de ligne avec les lignes contenant la chaîne spécifiée (sans tenir compte de la casse)
     execute_wait "cmd /c find /n /i" + chr$(34) + chaine$ + chr$(34) + " " +fichier$ + " |clip" + chr$(34)
    rem ========================================================================
    message clipboard_string_paste$ : ' Afficher le contenu du presse-papier
END_SUB    
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
 
Rechercher une chaîne de caractère dans un fichier.
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Taille Police trop petite dans corps de message
» limite de caractères permise dans un message
» Ne pas limiter le nombre de caractère dans les signatures
» Obtenir le nombre de caractère d'un fichier sans le charger en mémoire vive
» POI avec ou sans "Guillemets"

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC 32 bits :: Vos sources, vos utilitaires à partager-
Sauter vers: