---
title: "dela upp en stäng"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/178304-dela-upp-en-stäng"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "mats47"
published: "2009-04-27T11:41:45.000Z"
updated: "2009-04-28T09:12:21.000Z"
replies: 7
views: 623
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/178304-dela-upp-en-stäng"
---

# dela upp en stäng

## #1 — mats47, 2009-04-27T11:41Z

jag har flera varor med artnr
kunden har olika varor redan
den informationen får jag från en sträng

tex kunden har fyra varor
LIST;11;15;13;16; 

när jag skriver ut varje vara från listan så vill jag att den kollar mot strängen
om kunden finns så vill jag att den inte kommer med.

if 15 = list then
kod ej med
end if

hur gör jag att den bara kollar på 11 15 13 16
strängen kan va tom eller jättelång

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

## #2 — voigtann1, 2009-04-27T11:46Z

kör en split så du får en array och loopar ut det, altenativ kör du InStr (<http://www.w3schools.com/Vbscript/func_instr.asp>)

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

## #3 — mats47, 2009-04-27T12:02Z

Dim My_String
Dim My_Array
My_String="LIST;11;15;13;16; " 

My_Array=split(My_String,";")
For Each item In My_Array

Next

var ska jag läga in if saterna?

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

## #4 — voigtann1, 2009-04-27T12:20Z

```
Dim My_String
Dim My_Array
My_String="LIST;11;15;13;16; "

My_Array=split(My_String,";")
For Each item In My_Array
	If Item = 16 Then
		IsInArray = True
		Exit For
	End If
Next

If IsInArray Then
	'16 Fanns i Arrayn
End If
```

Hade gjort en ny funktion istället:

```
Function InArray(Value, ArrayList)
	Dim i
	InArray = False
	If IsArray(ArrayList) Then
		For i = 0 to UBound(ArrayList)
			If Value = ArrayList(i) Then
				InArray = True
				Exit Function
			End If
		Next
	End If
End Function
```

Och kör den som:

```
If InArray(16, Split(My_String,";")) Then
```

Så kan man återanvända den.

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

## #5 — mats47, 2009-04-27T13:08Z

var ska jag lägga Function

i ett \<script type="text/javascript"\>?

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

## #6 — voigtann1, 2009-04-27T13:10Z

Eftersom du postar i ASP forumet så gör jag en ASP funktion, är det en javascript sträng du är ute efter?

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

## #7 — mats47, 2009-04-28T08:49Z

Fick det att fungera

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

## #8 — voigtann1, 2009-04-28T09:12Z

Sätt tråden som löst + slutgiltigt svar.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/178304-dela-upp-en-stäng