Récupérer une partie d'une ligne d'un texte

Question

Bonjour tout le monde.

Je cherche un code qui me permette de r&#233;cup&#233;rer uniquement la fin d'une ligne d'un fichier texte. Je m'explique. Dans le fichier de configuration d'Apache, les commandes de configuration sont du style : ServerRoot "C:\path" ; DocumentRoot "C:\Path" ; ServeurAdmin [mailto:nom@domain.com nom@domain.com] ...

Ce que je veux faire, c'est pouvoir r&#233;cup&#233;rer telle ou telle fin de ligne (C:\path ; [mailto:nom@domain.com nom@domain.com], ...) en fonction du premier mot et les mettre dans un TextBox (sans les guillemets). Le probl&#232;me, c'est que toutes les lignes n'ont pas la m&#234;me dimension! J'ai bien essay&#233; avec mid, mais je n'arrive pas &#224; enlever les guillemets. Et puis avec les longueures variables des cha&#238;nes, j'ai des difficult&#233;s &#224; g&#233;rer la partie que je veux r&#233;cup&#233;rer.

J'esp&#232;re avoir &#233;t&#233; assez clair.

Merci d'avance pour votre aide.

cs_DARKSIDIOUS · Answer

Ben si ton texte est toujours pr&#233;c&#233;d&#233; du m&#234;me mot : lance une recherche
de ce mot avec la fonction InStr, tu obtiendras alors sa position, et
il te suffira de d&#233;couper ta cha&#238;ne, soit avec Mid soit avec Right.

DarK Sidious

Administrateur et reponsable VB/API du site www.ProgOtoP.com

NewSky · Answer

C'est peut-&#234;tre le bonne soluction mais, &#233;tant d&#233;butant, j'ai du mal &#224; utiliser cette fonction!

Dans l'aide, ils disent que cette fonction renvoie une valeur de type Variant (Long) indiquant la position de la premi&#232;re occurrence d'une cha&#238;ne &#224; l'int&#233;rieur d'une autre cha&#238;ne.

Moi, voil&#224; la aprtie du programme que j'ai &#233;crit : 

'Ouverture du fichier de configuration pour r&#233;cup&#233;rer les donn&#233;es
    Open Data.PathConfigFile For Input As #1
    
    While Not EOF(1)
        Line Input #1, TxtTp
        
'Effectue les test pr savoir si la ligne correspond &#224; une donn&#233;ee voulu
        If Mid(TxtTp, 1, 10) = "ServerName" Then
            LongTxt = Val(TxtTp)
            TxtPathServeur.Text = Mid(TxtTp, 13)
        End If
'Autres tests
    
      
    Wend
    Close #1

Donc, je lit le fichier ligne par ligne. A chaque fois, je compte v&#233;rifier si le 1er mot de chaque ligne n'est pas un mot clef. Il ne peut y avoir qu'une seule fois le m&#234;me mot clef dans tout le fichier (mais il y a beaucoup de mots clefs diff&#233;rents!).
Selon le fonctionnement de mon prog, il faudra simplement, pour chaque mot clef trouv&#233; afficher la ligne enti&#232;re dans un TextBox (sans les guillemets, et ensuite (peut-&#234;tre plus compliqu&#233;), s'il y a eu des changements, remplacer les lignes chang&#233;es.

J'esp&#232;re avoir &#233;t&#233; clair. Il est possible que cela se fasse avec cette fonction l&#224; (InStr), mais j'ai pa trop compris son focntionnement. Je vais essayer de comprendre, mais si tu pouvez m'aider encore .

Merci d'avance...

NewSky · Answer

Oups, j'ai oubli&#233;. Quand je met la ligne dans le TextBox, j'aimerai de pr&#233;f&#233;rence que le mot clef n'y apparaisse pas. Ca aussi c'est emb&#234;tant, car tous les mot clefs n'ont &#233;videment pas la m&#234;me taille. Il est donc fastidieu de pr&#233;-compter (manuellement) tous les mots pour pouvoir pr&#233;d&#233;finir les recherches. D'autant plus que le but de mon prog est de pouvoir fonctionner avec d'autre version d'Apache.

Merci

Récupérer une partie d'une ligne d'un texte

3 réponses

Discussions similaires