Hejsan!
Jag har ett litet problem.. Jag går igenom en HTMLfil och letar efter taggar som mina användare kan sätta.. jag får ut mina taggar precis som jag vill från HTMLfilen men jag skulle behöva sätta en funktion på svaret jag får ut.
Så här ser koden ut nu..
set oRegExp = new regexp
oRegExp.global=true
oRegExp.ignorecase = true
oRegExp.pattern = "<!Data=""Test:(.*?)"">"
HTML = oRegExp.replace(HTML,"$1")
Skulle behöva få in min funktion med namn TestFunc som nedan
set oRegExp = new regexp
oRegExp.global=true
oRegExp.ignorecase = true
oRegExp.pattern = "<!Data=""Test:(.*?)"">"
HTML = oRegExp.replace(HTML,TestFunc("$1"))
Du få lägga det i en Match collection, och loopar ut collectionen, ersätt Submatchningen... något i stil med:
Set oRegExp = New RegExp
oRegExp.IgnoreCase = True
oRegExp.MultiLine = True
oRegExp.Pattern = "<!Data=""Test:([\s\S]*?)"">"
Set dataMatches = oRegExp.Execute(HTML)
For Each dataMatch In dataMatches
HTML = Replace(HTML, dataMatch, TestFunc(dataMatch.SubMatches(0)))
Next
Har inte testat koden, men det är något i den stilen..