Fejl i array

Jeg har det her script som jeg har prøvet at kommentere så godt jeg kan. Det er meningen at den skal hente nogen variabler ind fra forskellige form's og sætte dem ind i en database...hvis jeg har 2 valgt (så der kommer 2 numre i arrLinkNy) indsætter den samme værdi 2 gange. Og udskriver jeg insrtSql går den helt galt, for så får jeg:

Insert into Link (Link_Adresse, Link_Navn) Values('http://XXX.dk','Beskrivelse')
Insert into Link (Link_Adresse, Link_Navn) Values('http://XXX.dk','Beskrivelse')
Insert into Link (Link_Adresse, Link_Navn) Values('http://XXX.dk','Beskrivelse')

Altså det samme 3 gange...

Er der nogen der kan se nogen fejl?


'Hent variabler fra en checkbox
'******************************
arrLinkNy = Split(ValgNY,",")
For t = LBound(arrLinkNy) to UBound(arrLinkNy)

'Her hentes formen ved navn Link[tal] tallet svarre til
'variablen i chekboxen
'******************************************
Link_AdresseNy = "Link" & arrLinkNy(t) 
LinkNy = Request.Form(Link_AdresseNy)

'Hvis ikke at formen er tom så:
'******************************
If NOT LinkNy="" Then
Link_NameNy =  "Navn" & arrLinkNy(t)
NameNy = Request.Form(Link_NameNy)   
If NameNy = "" Then
NameNy="None"
End if
'Værdierne indsættes
'**********************
insrtSql = "Insert into Link (Link_Adresse, Link_Navn) Values('" & LinkNy & "','" & NameNy & "')"
End if
Conn.Execute(insrtSql)
'Start forfra med at hente de næste variabler og indsæt dem
'**********************************************************
next