---
title: "Dela upp sträng i en array, med reguljärt uttryck."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/146927-dela-upp-sträng-i-en-array-med-reguljärt-uttryck"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "paddan"
published: "2006-05-16T17:56:34.000Z"
updated: "2006-05-16T17:56:34.000Z"
replies: 0
views: 306
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/146927-dela-upp-sträng-i-en-array-med-reguljärt-uttryck"
---

# Dela upp sträng i en array, med reguljärt uttryck.

## #1 — paddan, 2006-05-16T17:56Z

Hej!
Har en klurig fråga.
Skulle vilja dela upp en sträng efter ett att den har skrivit ut 4st \[a\]\[/a\]. 
Har denna koden som klipper efter ett antal tecken, 

```
text = "Om jag har en text med tex 100 tecken. Kan jag välja att dela upp den i 5 lika stora delar? typ i en array eller nåt med 20 tecken i varje array så jag kan skriva ut array(1) så kommer de första 20 tecknen."

function textdel(variabel,del)
   Dim text,raknare, arrayraknare, textlangd
   Dim textarray(5)
   textlangd = (int(len(variabel) / 5)) ' Hur stor en del är
   raknare = 1 ' räknar startvärdet i mid
   arrayraknare = 0 'raknar aktuell post i arrayen 
   Do until arrayraknare = 5
   textarray(arrayraknare) = mid(variabel,raknare,textlangd)
   arrayraknare = arrayraknare + 1
   raknare = raknare + textlangd
   Loop
    textdel = textarray(del)
end function

response.Write(textdel(text,0))
```

 

Alltså ska den leta efter \[a\]\[/a\] , när det har hittats 4st så ska den texten läggas i en array, sen letar den vidare i texten och tills fyrs \[a\]\[/a\] skrivs ut igen, då läggs det in i arrayn.
Ja ni fattar?

Någon med några bra ideer?

Mvh martin

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/146927-dela-upp-sträng-i-en-array-med-reguljärt-uttryck