I'm having problems with my code, it ain't doing what it's supposed to do. It is supposed to get a value from a dropdownlist and check if it exists in the array. if not it removes that item from the dropdown list and select the next value from the list. But when I run my application it just won't remove the damn value that doesn't exist in the array from the droep down list.
Anyone got an idea what I'm doing wrong??
'========================================================
Session.Item("vergelijkteller" = 1
Session.Item("vergelijkteller2" = 0
Dim y As Integer
For y = 0 To vergelijkarrayI.Length - 1
While Session.Item("vergelijkteller2" <> vergelijkarrayI.Length - 1
If vergelijkarrayI(Session.Item("vergelijkteller2") = ddlWederpartij.Items.Item(Session.Item("vergelijkteller").Text Then
Session.Item("vergelijkteller" = Session.Item("vergelijkteller" + 1
Exit While
Else
Session.Item("vergelijkteller2" = 0
'ddlWederpartij.Items.RemoveAt(Session.Item("vergelijkteller")
ddlWederpartij.Items.RemoveAt(Session.Item("vergelijkteller")
Session.Item("vergelijkteller" = Session.Item("vergelijkteller" + 1
Exit While If Session.Item("vergelijkteller2" = vergelijkarrayI.Length - 1 Then
Else
Session.Item("vergelijkteller2" = Session.Item("vergelijkteller2" + 1
End If
End If
End While
Next
Session.Item("vergelijkteller" = 0
Session.Item("vergelijkteller2" = 0
'=====================================
Exit Select
End If
Session.Item("vergelijkteller2" = 0
'========================================================
You can better regret that you have done something than regret the fact you done nothing