Räkna antal gånger jag reg.exp träffar.

antal = regexp.execute(strText).count

Nu blev det svårt här :l
Får enbart fram Objekt krävs.: 'regexp'

Var är det man ska lägga in koden? Förstår inte. :r

antal = objregexp.execute(strText).count

ok, tack!
Men det var tyvärr inte det jag förväntade mig.
Det jag hade tänkt mig är att varanan tabellrad skulle ha olika färg. Tänkte att man efter varje gång ett [TR] ... [/TR] hittades skulle totalsumman adderas med ett och och sedan beroende på om det blev ojämt eller jämt tal tilldela TR-taggen en "ojämn" eller "jämn" bakgrundsfärg.

Men req.exp verkar ju inte loppa igenom texten utan replacear allt på en gång. Kan man på något annat sätt få olika bakgrundsfärger?

Då kanske du skall beskriva lite mer. Hur skall det hela visas? Var skall summan presenteras?

Nu är jag lite osäker på hur RegExp.Replace jobbar, men man skulle väl kanske kunna sätta en variabel till False och sedan switcha den i Replacen...

Dim bSwitch
bSwitch = False
.
.
.
objRegExp.Replace(strText, IIf(Eval(Not bSwitch), "<TR bgcolor=white>$1</TR>", "<TR bgcolor=black>$1</TR>"))

Jag har ingen aning om detta fungerar, men det är kanske något att fundera på.

Jesper T skrev:

Då kanske du skall beskriva lite mer. Hur skall det hela visas? Var skall summan presenteras?

Jag har i databasen text varvat med forumkod, bla [TR] som req.exp ska exventera till <TR> för att bygga rader i en tabell. Så långt fungerar allt som jag vill. Men jag skulle även vilja att varanan rad får ex. svart bakgrund och resterande vit bakgrund för att öka läsbarheten vid breda tabeller.
Sen hur det gör det spelar ingen större roll. Det där med siffror och räknare ovan var ett sett som jag trodde skulle fungera, vilket det inte gjorde.

Varför skall du räkna och vad?

Tänkte att detta skulle fungera:

 

Dim TotalTR
TotalTR = 0

objRegExp.Pattern = "\[TR\]((.|\s)*?)\[/TR\]"

TotalTR = TotalTR + 1
  If TotalTR mod 2 = 0 then
    TRbgc = "#FFFFFF"
  Else
    TRbgc = "#000000"
  End if

strText = objRegExp.Replace(strText,"<TR BGCOLOR=""" & TRbgc & """>$1</TR> ")

Men kom sedan på att reqexp inte loopar igen träff för träff utan exekverar allt samtidigt. Eller har jag fel?

Nja, den loopar inte va? Men hur gick det med Engine^s kod? http://www.webforum.nu/showthread.php?s=&postid=594260#post594260

Just ja, den hade jag glömt totalt. :r
Efter lite sökning efter Iff och Eval men kunde inte hitta någon förklaring som jag förstod.
Vad betyder dessa och hur använder jag dom?

Varför inte testa?

Mmm, nu haver man testat och inte mycket klokare blev man för det :|

Please solbulle! Help! :)

Eval
IIf
Alltså, om variabeln är true skall elementet vara svart i annat fall vitt. :)
Men IIf funkar inte i vbScript endast i VB