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
» Et encore un éditeur...
par Minibug Aujourd'hui à 23:07

» Crash récurent de l'éditeur
par Fredisland Aujourd'hui à 19:55

» Demande de correction de la commande instr_right.
par Klaus Aujourd'hui à 19:13

» Recherche de texte AVANT/ARRIERE dans un SYNEDIT
par silverman Aujourd'hui à 18:51

» molette de la souris
par Fredisland Aujourd'hui à 17:57

» Plusieurs fonctions pour la souris
par Fredisland Aujourd'hui à 17:47

» resulta incomplet
par Marc Aujourd'hui à 13:33

» Make_exe
par JL35 Hier à 20:10

» [RÉSOLU] MESSAGE_ERROR_YES_NO idem à deux autres
par Fredisland Hier à 14:29

» Logiciel de traduction: dernières avancées.
par pascal10000 Hier à 9:43

» Convertir un fichier BAS panoramic en fichier EXE
par Klaus Sam 21 Avr 2018 - 23:16

» Astuce dans un string
par Marc Sam 21 Avr 2018 - 18:42

» TRACE_ON problème
par Oscaribout Sam 21 Avr 2018 - 17:55

» [RÉSOLU] Priorité affichage des objets : comment la définir?
par Minibug Sam 21 Avr 2018 - 17:43

» FLAT Design
par Klaus Sam 21 Avr 2018 - 13:15

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Avril 2018
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
30      
CalendrierCalendrier

Partagez | 
 

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

Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5854
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 - 12: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.
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Obtenir le nombre de caractère d'un fichier sans le charger en mémoire vive
» k.limero ( et son message entre parenthèses pour avoir plus de 10 caractères dans le titre )
» POI avec ou sans "Guillemets"
» [résolu]Affichage des POI sur nuvi 3590
» Déplacer fichiers carto dans 2340LMT (résolu)

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