Ciclos,combos,bd

[Fabian olmos]

hoal a todos, para alguien que me pueda ayudar, esto es lo que sucede. estoy tratando llenar un combo con estados de venezuela desde un vector siempre y cundo el estado del vector no este en la bd, admas tiene que cumplir que el campo sexo sea igual a una session llamada sexo si esta es igual se llena el combo o se verifica la similitud que existe entre los estados del vector contro el estado de la bd. este me funciona bien pero el problema que esta es que cuando hay mas de una registro me llena el combo las veces que el comparo yo lo que deseo es que en dicho combo se llenen los estados una sola vez y que se eliminen los estados que sean iguales, es decir , vector ("estados")= bd(estados).

este es lo que estoy haciendo


Response.Write "<select name='estado' id='estado'><option>ESTADOS</option>" & VbCrlf
valida.movefirst
DO WHILE valida.EOF=FALSE
for i= lbound(estado) to ubound(estado)
if (valida("sexo")= session("sexo")) then
if (valida("estado")<>estado(i)) then
Response.Write "<option value="&estado(i)&">"&estado(i)&"</option>"
end if
else
Response.Write"<option value="&estado(i)&">"&estado(i)&"</option>"
end if
next
valida.MOVENEXT
LOOP
Response.Write "</select>" & VbCrlf

gracia spor la ayuda.