---
title: "Problem med att fetmarkera mer än ett ord"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/113084-problem-med-att-fetmarkera-mer-än-ett-ord"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "saw"
published: "2004-10-07T10:48:02.000Z"
updated: "2004-10-08T00:24:34.000Z"
replies: 2
views: 346
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/113084-problem-med-att-fetmarkera-mer-än-ett-ord"
---

# Problem med att fetmarkera mer än ett ord

## #1 — saw, 2004-10-07T10:48Z

Jag försöker att via regex markera mer än ett ord i min sökmotor. 

```
Function boldText(myString,strReplace) ...
Function boldText(myString,strReplace)
dim nWord,kW,strText
      Set objRegExp = New regexp
      objRegExp.Global = true
      objRegExp.IgnoreCase = true

      if instr(strReplace," ") then'finns det mer än ett ord
          nWord = split(strReplace," ")'splitta på mellanslag

              kW =""(" 'denna funktionen lägger ihop sökorden t ex "(Access|databas|DSN)"
              
              for i = 0 to ubound(nWord)
                  if i <> ubound(nWord) then
                 kW = kW & nWord(i) & "|"
                elseif i = ubound(nWord) then
                 kW = kW & nWord(i) & ")&quot;"
                  end if
              next

            objRegExp.Pattern =kW
			for i = 0 to ubound(nWord)
			strText=strText & "<B>$" & i & "</B>"
			next
			boldText =objRegExp.Replace(myString,strText)'här skall den ersätta alla med fet text
              boldText = replacestring
      else
        'det fanns bara ett sökord
          objRegExp.Pattern = TRIM(strReplace)
          replacestring = objRegExp.Replace(myString, "<B>" & strReplace & "</B>")
          boldText = replacestring
      end if
End Function
```

 

Skriver jag in ett ord, så fungerar det perfekt, men skriver jag t ex två ord, så händer ingenting. 
Vad missar jag?
 :q

Permalänk: https://www.webforum.nu/p/113084

## #2 — solbulle, 2004-10-07T22:58Z

```
replacestring =objRegExp.Replace(myString,strText)'här skall den ersätta alla med fet text
```

Permalänk: https://www.webforum.nu/p/1456734

## #3 — saw, 2004-10-08T00:24Z

Jo jag såg det, och ändrade det, men ingen större skillnad. Ibland kan den markera två ord, men oftast inte.

Permalänk: https://www.webforum.nu/p/1456744

---

Tråden på webben: https://www.webforum.nu/amne/asp/113084-problem-med-att-fetmarkera-mer-än-ett-ord