---
title: "Leta text och ordet till höger om detta"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/69658-leta-text-och-ordet-till-höger-om-detta"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Patrik.Runald"
published: "2003-02-28T10:55:35.000Z"
updated: "2003-03-01T15:12:37.000Z"
replies: 10
views: 320
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/69658-leta-text-och-ordet-till-höger-om-detta"
---

# Leta text och ordet till höger om detta

## #1 — Patrik.Runald, 2003-02-28T10:55Z

Hej.

Jag har en textsträng där jag behöver leta efter ett visst ord och sedan lägga in ordet till höger om detta in i en variabel.

Exempel
\======

Texten jag har ser ut så här:

\----
Datum: 2003-02-28
Användare: Kalle Anka
Åtgärd: Fungerade
\----

Jag vill då få datumet, användaren och åtgärden i tre olika variabler. Antar att man använder RegExp på någe sätt men har ingen aning om hur.

Kan någon hjälpa mig?

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

## #2 — LarsG, 2003-02-28T12:02Z

```
items = split(str,vbcrlf)
```

Då får du en array där varje element innehåller en rad från texten.

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

## #3 — Patrik.Runald, 2003-02-28T13:50Z

Tack för svaret Lars!

Vet inte riktigt om det blev rätt. Det jag vill få ut i ovanstående är alltså "2003-02-28", "Kalle Anka" och "Fungerade". Inte hela raden.

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

## #4 — LarsG, 2003-02-28T14:04Z

Då kan du använda split en gång till med :

```
dim i,a,t,s,x()
s = "Datum 2003-02-28" & vbcrlf & "Användare: Kalle Anka" & vbcrlf & "Åtgärd: Fungerade"

redim x(ubound(a))
a = split(s,vbcrlf)
for i = 0 to ubound(a)
  t = split(a(i),":")
  x(i) = t(1)
next
```

Då får du det som står efter kolon på varje rad i X

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

## #5 — Patrik.Runald, 2003-02-28T15:54Z

Får hela tiden "Type mismatch: 'ubound' på raden redim x(ubound(a))

Vad är fel?

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

## #6 — Engine^, 2003-02-28T16:01Z

Ja... a är ju inte initierad.

```
redim x([i]antal vbcrlf i s[/i] + 1)
```

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

## #7 — LarsG, 2003-02-28T16:05Z

Lite fel ordning

```
dim i,a,t,s,x()
s = "Datum 2003-02-28" & vbcrlf & "Användare: Kalle Anka" & vbcrlf & "Åtgärd: Fungerade"

a = split(s,vbcrlf)
redim x(ubound(a))

for i = 0 to ubound(a)
  t = split(a(i),":")
  x(i) = t(1)
next
```

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

## #8 — Engine^, 2003-02-28T16:13Z

Hmm... bör inte loopen vara

```
for i = 0 to ubound(a) [b]- 1[/b]
```

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

## #9 — Patrik.Runald, 2003-02-28T16:49Z

Nu kom jag längre men inte riktigt hela vägen. Nu säger den:

Subscript out of range: '\[number: 1\]' 

på raden för "x(i) = t(1)"

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

## #10 — Patrik.Runald, 2003-03-01T11:27Z

Fast... jag undrar om detta verkligen ger det resultat jag vill.

Säg att jag endast vill söka på ordet "Åtgärd: " och få ut till det höger om detta i en variabel. Hur gör jag då? Då är troligen Arrays rätt sätt, eller??

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

## #11 — Engine^, 2003-03-01T15:12Z

> **Patrik.Runald skrev:**
>
> Nu kom jag längre men inte riktigt hela vägen. Nu säger den:
> 
> Subscript out of range: '\[number: 1\]' 
> 
> på raden för "x(i) = t(1)"

Det betyder att den raden inte innehöll några kolon...

```
If Ubound(t) > 1 Then x(i) = t(1)
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/69658-leta-text-och-ordet-till-höger-om-detta