---
title: "Egenskaper för en div med RegExp."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/127385-egenskaper-för-en-div-med-regexp"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Frezze"
published: "2005-04-30T10:15:34.000Z"
updated: "2005-05-05T08:09:23.000Z"
replies: 3
views: 246
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/127385-egenskaper-för-en-div-med-regexp"
---

# Egenskaper för en div med RegExp.

## #1 — Frezze, 2005-04-30T10:15Z

Hejsan.
Har försökt tänka mig olika sätt jag kan lösa mitt problem på, men jag kommer inte på något.
Det är så att jag ska använda mig av en såkallad egen kod, som då vid användning, ska man kunna ändra bakgrunden, ramen och bredden på diven, och jag vet hur man ska göra annars för att få det att fungera, men nu är det så att jag vill kolla så att back endast innehåller siffror och bokstäver (HEX code) samma med ram, och width, endast siffror och ett värde mellan typ, 20 och 100.
Men, vad koden just nu gör, är att den lägger det den hämtat ut, som matchar, och så läggs det i en variabel alltihop för att man ska kunna arbeta med det. Men nu är det så att inte vet något bra sätt att leta i variabeln, på dom värdena, förutom med regexp., men regexp i en regexp kod går väll bara inte?

Och till andra fråga, hur gör jag för att köra flera objMatches för att söka efter olika saker, som här då, så den inte bara söker efter cube, eller måste jag göra fler funktioner?

Kod-dummy:

```
Function Cube(text)
Set regExp = New regexp
regExp.Global = true
regExp.IgnoreCase = true
text = server.HTMLEncode(text)
text = Replace(text,vbCrLf,"<br>")
RegExp.Pattern="\&lt; *cube *back *=(.*?) *border *=(.*?) *width *=(.*?)\&gt;(.*?)\&lt;/cube&gt;"
Set objMatches=regExp.Execute(text)
Set regExp = Nothing

strResult=""
lngPos=1
For each objMatch in objMatches
   If objMatch.FirstIndex>lngPos Then
      strResult=strResult & Mid(text, lngPos, objMatch.FirstIndex-lngPos+1)
   End If
   strFound=objMatch

   'Arbeta med strFound

   strResult=strResult & strFound
   lngPos=objMatch.FirstIndex+objMatch.Length+1
Next
strResult=strResult & Mid(text, lngPos)

Cube = strResult
End Function
```

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

## #2 — Frezze, 2005-05-05T07:17Z

Har sett andra göra detta, så jag "bumpar" lite nu.

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

## #3 — @nders, 2005-05-05T08:07Z

När du ändå håller på och bumpar, redigera in \[kod\]-taggar också, så koden går att läsa lite bättre.

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

## #4 — Frezze, 2005-05-05T08:09Z

> **@nders skrev:**
>
> När du ändå håller på och bumpar, redigera in \[kod\]-taggar också, så koden går att läsa lite bättre.

Haha, jag glömmer alltid det, tack för påminelsen, fixat nu ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/127385-egenskaper-för-en-div-med-regexp