On Tue, 20 Feb 2001 22:08:20 GMT, Jonathan Stein <jstein@image.dk>
wrote:
>"Ghashûl" wrote:
>
>> Hvilket wildcard skal jeg erstatte det med for at det virker i regexp?
>
> I regular expressions, betyder "." (punktum) et vilkårligt tegn og ".+"
>(punktum plus) et eller flere vilkårlige tegn. ".*" betyder nul eller
>flere vilkårlige tegn. Du kan måske også få brug for "[^ ]*", som betyder
>nul eller flere tegn, der _ikke_ er mellemrum.
> Med lidt (eller meget) tålmodighed, burde det være muligt at finde en
>komplet beskrivelse af syntaksen på
http://msdn.microsoft.com
Jeg kan ikke lige få det til at virke.
Det er sådan her jeg tjekker for regexp:
Function ReplaceTest(S, Pat)
Dim re
Set re = New RegExp
'Un-escape Pat
re.Pattern = "([\?\*\+\.\|\{\}\\\[\]\(\)])"
re.IgnoreCase = True
Pat = re.Replace(Pat, "\\$1")
' Udfør
re.Pattern = "(" & Pat & ")"
re.IgnoreCase = True
re.Global = True
ReplaceTest = re.Replace(S, "<b><A
STYLE=""background=#44640D"">$1</A></b>")
End Function
For n = LBound(Words) To UBound(Words)
Lyrics = ReplaceTest(Lyrics, Words(n))
Next
Det jeg har gjort er så at køre en Replace(Keyword,"%",".") men der
sker ikke noget. (keyword er listen over ord, før den bliver lavet til
et array. Den replace bliver kørt i starten af siden, før det bliver
kørt igennem funktionen.
--
Regards Sir Ghashûl, Knight of The alt.Roundtable <><
ICQ: 7223629
E-mail: stefan@bruhn.to
URL:
http://www.ghashul.dk