Fråga : Using RegExp som simulerar något liknande

Jag behöver att utföra ”en något liknande” testar stränger på i en VBScript med mönstrar, som innehåller * wildcards.  Förmiddag I sure detta kan göras med RegExp, men jag får inte egentligen hur den fungerar.  Kan någon råda hur man avslutar detta kodifiera?
dunkla RXObject, RXPattern
fastställda RXObject = NewRexExp
för

Function IsLike (värdera, mönstra), med RXObject
. Globalt = True
.IngoreCase = True
RXPattern = ......
.RXPattern = RXPattern
IsLike =. Testa (värdera),
avslutar With
fastställda RXObject = Nothing
End Function

Mike
" klar "

Svar : Using RegExp som simulerar något liknande

Se på något liknande för något liknande:

Fungera IsLike (värdera, mönstra),
Dunkel regEx
   
    Fastställd regEx = CreateObject (”vbscript.regexp”)
        Med regEx
            . Globalt = True
            .IgnoreCase = True
            . Mönstra = ”^” & byt ut (mönstra, ”*”,”. {0,} ”) & ”$”,
            IsLike =. Testa (värdera),
        Avsluta med
    Fastställd regEx = ingenting
Avsluta fungerar

Ska acceptera kontrollerar kodifierar mellan stränger eftersom

Fungera IsLike (ByVal TextVal, ByVal mönstrar),
  Dunkel RXP
  IsLike = falskt
  Uppsättning RXP = nya RegExp
    Med RXP
      . Globalt = True
      .IgnoreCase = True
      . Mönstra = ”^” & byt ut (mönstra, ”*”,” [\ x20- \ x7E] * ") & ”$”,
      IsLike =. Testa (TextVal)
    Avsluta med
  Uppsättning RXP = ingenting
Avsluta fungerar

Ska se till att de enda teckenen mellan delarna är visningar och vanligt interpunktion.

Chris
Andra lösningar  
 
programming4us programming4us