IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBScript Discussion :

Pb avec les expressions régulieres


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Avril 2006
    Messages
    44
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 44
    Par défaut Pb avec les expressions régulieres
    Bonjour,

    je me suis basé sur la FAQ écrite sur ce site pour faire mon expression régulière en vb, mais je n'y arrives pas.
    Meme en recopiant bêtement le code fourni dans la FAQ ca ne marche pas.

    Mon probleme est simple, je dois supprimer ts les fichiers dont l'extension est du type .aaaammjj , j ai donc opté pour les expressions régulieres .

    voici mon code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Set RegularExpressionObject = New RegExp
     
    	With RegularExpressionObject
    		.Pattern = "^(.(1|2)[0-9]{3}(1-2)[0-9][0-3][0-9])$"
    		.IgnoreCase = False
    	End With
     
     
    MsgBox RegularExpressionObject.Test(".20091105")
    MsgBox RegularExpressionObject.Test(".30091105")
    Je n'ai aucun message qui apparait que ce soit avec mon code ou avec le code fourni par la FAQ.

  2. #2
    Rédacteur
    Avatar de omen999
    Profil pro
    Inscrit en
    Février 2006
    Messages
    1 302
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 1 302
    Par défaut
    salut,
    Je n'ai aucun message qui apparait
    inquiétant... car tu devrais au moins avoir le message "Faux"

    à moins que les extensions ne soient listées dans un fichier texte global, je ne vois pas trop l'intérêt d'utiliser les expressions régulières dans ce cas précis

    pourquoi ne pas tirer parti de la fonction IsDate ?

    un truc comme ça (avec un test pour écarter les années futures) :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    sExt="20091102"
    If Left(sExt,4) < 2011 Then 
    	MsgBox IsDate(Left(sExt,4) & " " & Mid(sExt,5,2) & " " & Right(sExt,2))
    End If
    nomen omen, nemo non omen - Consultez la FAQ VBScript et les cours et tutoriels VBScript
    le plus terrible lorsqu'une voiture renverse un piéton, c'est que ce sont les freins qui hurlent. (ramón)
    pas de questions techniques par mp

Discussions similaires

  1. [RegEx] Couper un mot avec une expression réguliere ?
    Par mLk92 dans le forum Langage
    Réponses: 4
    Dernier message: 24/08/2006, 09h34
  2. [RegEx] Difficultés avec une expression réguliere
    Par saint-pere dans le forum Langage
    Réponses: 10
    Dernier message: 24/06/2006, 13h47
  3. [VB.net][vs2005] Problème avec les expressions régulières
    Par zouhib dans le forum Windows Forms
    Réponses: 13
    Dernier message: 22/06/2006, 15h56
  4. Problème avec les expressions régulières
    Par Premium dans le forum Collection et Stream
    Réponses: 11
    Dernier message: 18/06/2006, 16h41
  5. aide sur les expressions régulieres
    Par STEPH69000 dans le forum Langage
    Réponses: 7
    Dernier message: 31/05/2006, 17h54

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo