dim rx, m set rx = new RegExp rx.global = true rx.ignorecase = true rx.pattern = "\[[^\[]*\]" set m = rx.Execute(linje) if m.count > 0 then response.write m(0) else response.write "ingen match." end if
Hvis du vil have alle forkomster (uden [] omkring) kan du gøre sådan:
dim rx, m, linje linje = "*** FLOP *** [7s 5h 6s] *** FLOP *** [6s 4h 5s]" set rx = new RegExp rx.global = true rx.ignorecase = true rx.pattern = "(?!\[)[^\[]*(?=\])" set m = rx.Execute(linje) if m.count > 0 then for each i in m response.write i & "<br>" next else response.write "ingen match." end if
dim rx, m, linje linje = "*** FLOP *** [7s 5h 6s] *** TURN *** [5c]" set rx = new RegExp rx.global = true rx.ignorecase = true rx.pattern = "\*\*\*\sFLOP\s\*\*\*\s\[([^\[]*)\]" set m = rx.Execute(linje) if m.count > 0 then for each i in m response.write i & "<br>" for each sm in i.submatches response.write sm & "<br>" next next else response.write "ingen match." end if
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.