---
title: "ta bort allt utan..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10708-ta-bort-allt-utan"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "DavidB"
published: "2001-07-21T21:00:00.000Z"
updated: "2001-07-21T21:27:00.000Z"
replies: 1
views: 192
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/10708-ta-bort-allt-utan"
---

# ta bort allt utan...

## #1 — DavidB, 2001-07-21T21:00Z

hur gör man om man har en text som ligger i en variabel och man matchar ett ord med hjälp av RegExp och vill att all annan text utan dessa ord tas bort så att endast dessa ord ligger kvar i variabeln?

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

## #2 — PatrikB, 2001-07-21T21:27Z

ngt liknande kanske:

```
<%
Function getWords(ByVal vData, ByVal sMatch)
	Dim objRegExp, match, matches, vOutPut, aMatch
	aMatch = Split(sMatch)
	Set objRegExp = New RegExp
		objRegExp.Global = True
		objRegExp.IgnoreCase = true
		For I = 0 To UBound(aMatch)
			objRegExp.Pattern = aMatch(I)
			Set matches = objRegExp.Execute(vData)
			For Each match In matches
				vOutPut = vOutPut & match
			Next
		Next
		Set matches = Nothing
	Set objRegExp = Nothing
	getWords = vOutPut
End Function

strText = "Detta vill jag få ut från min sökning. Det jag vill få ut är: ingenting."

strResult = getWords(strText,"få jag")

Response.Write strResult
%>
```

cya,
PatrikB

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10708-ta-bort-allt-utan
