---
title: "ta bort dublett i en array"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/70411-ta-bort-dublett-i-en-array"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ampy"
published: "2003-03-07T17:20:10.000Z"
updated: "2004-09-27T16:50:23.000Z"
replies: 6
views: 313
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/70411-ta-bort-dublett-i-en-array"
---

# ta bort dublett i en array

## #1 — ampy, 2003-03-07T17:20Z

Jag har en array som heter **arrtal** och innehåller siffror av typen doble. Arrayen innehåller värden från arrtal(0) till arrtal(9).

Om det nu finns två eller fler av samma tal i arrayen vill jag ta bort så att bara finns en av det talet kvar.

Hur gör man detta?

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

## #2 — Vide, 2003-03-07T17:25Z

Varför finns det dubbletter med ifrån första början?

Kanske såhär:

```
for i = 0 to ubound( arrTal )
  for j = i to ubound( arrTal )
    if arrTal( i ) = arrTal( J ) then
      arrTal( i ) = ""
    end if
  next
next
```

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

## #3 — ampy, 2003-03-07T17:35Z

```
Körningsfel i Microsoft VBScript fel '800a000d' 

Inkompatibla typer 

/aktier.asp, rad 154
```

På raden med fetstil:

```
	for i = 0 to ubound(arrtal)
 		for j = i to ubound(arrtal)
    			[B]if arrtal(i) = arrtal(j) then[/B]
      				arrtal(i) = ""
    			end if
  		next
	next
```

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

## #4 — Vide, 2003-03-07T17:38Z

Innehåller den fler element än de tio du angivit?

```
	for i = 0 to ubound(arrtal)
 		for j = i to ubound(arrtal)
    			if [b]cdbl( arrtal(i) ) = cdbl( arrtal(j) )[/b] then
      				arrtal(i) = ""
    			end if
  		next
	next
```

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

## #5 — ampy, 2003-03-07T17:44Z

Nej, innehåller bara 10 element. Hade testat med cdbl men får samma fel.

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

## #6 — ampy, 2003-03-07T18:54Z

Löste det på detta sätt:

```
	for i = 0 to 9
		for j = 0 to 9
			if i <> j then
				if arrtal(i) <> "" and arrtal(j) <> "" then
					if cdbl(arrtal(i)) = cdbl(arrtal(j)) then
						arrtal(i) = ""
					end if
				end if
			end if
		next	
		
	next
```

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

## #7 — znyder, 2004-09-27T16:50Z

Hallå!
Precis det jag ville ha :D MEN! Det finns ett litet fel tror jag...
Jag har ett forum, ska visa senaste inlägg.

Men om en person har skrivit en topic och sen svarit i den (samma id) så skriver den inte ut nått..

TOPIC = 22
Svaret har amne_ID som är 22.

Men om sen medlemmen skriver i ett annat forum så funkar detta script perfekt :) Vad kan va felet?

EDIT:
Det är om medlemmen för första gången skriver i forumet.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/70411-ta-bort-dublett-i-en-array