Caractère générique dans instruction INSTRRésolu

Question

Bonjour,


 


Je souhaite inclure dans la cha&#238;ne de texte &#224; chercher de ma fonction INSTR(ouf !!) un caract&#232;re g&#233;n&#233;rique.


Je m&#146;explique : 


Je cherche dans un fichier texte, un ou des cha&#238;nes de texte du style : &#171;  Dede.hmtl/user.id=2256.html &#187;


Je peux avoir aucune, une ou plusieurs cha&#238;nes. La seule chose qui change, et que je ne connais pas &#224; l&#146;avance, est le numero ID du User inclus dans la cha&#238;ne. Dans mon exemple le : 2256. Je n&#146;ai aucun moyen de le r&#233;cup&#233;rer avant.


En faites dans ma fonction INSTR il faudrait que j&#146;ajoute un caract&#232;re g&#233;n&#233;rique du type &#171; * &#187;. Comme ceci : 


If instr(1,Texte, &#171; Dede.hmtl/user.id=&#148;&&#148;*&#148;&&#148;.html&#148;) <>0 then


Comment faire ?


Merci d&#146;avance


Zoglub

crenaud76 · Accepted Answer

Utilises l'op&#233;rateur Like

If Str Like "Dede.hmtl/user.id=*.html" Then
   ' La chaine est a priori OK
EndIf

Christophe R

Utilisateur anonyme · Answer

Salut,

Pourquoi un If ? , tu veut ajouter un caract&#232;re, pas besoins de condition

  Dim Str As String
  Str = "Dede.hmtl/user.id=2256.html"
  Str = Left(Str, InStrRev(Str, "=")) & "*" & Right(Str, Len(Str) - InStrRev(Str, "="))
  
Kenji
 
Merci de cliquer sur "R&#233;ponse accept&#233;e" si une r&#233;ponse vous convient.

Utilisateur anonyme · Answer

Petite erreur,
J'ai ajouter "*" apr&#232;s le "=" au lieu d'apr&#232;s le "."

  Dim Str As String
  Str = "Dede.hmtl/user.id=2256.html"
  Str = Left(Str, InStrRev(Str, ".")) & "*" & Right(Str, Len(Str) - InStrRev(Str, "."))
  
Voil&#224;,

Kenji
 
Merci de cliquer sur "R&#233;ponse accept&#233;e" si une r&#233;ponse vous convient.

Caractère générique dans instruction INSTR

3 réponses

Discussions similaires