ta bort dublett i en array

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?

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

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

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

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

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

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.