hola he estado intentando hacer esto pero no puedo hacer que me escriba los nueve digitos solo me muestra el ultimo.
espero alguien pueda ayudarme.
aqui esta el codigo que estoy utilizando
Código:
Set rsMunicipios = Connect.Execute ("select IdDistrito from Localidad where IdMunicipio=" & ID)
distritos = 0
if not rsMunicipios.EOF then
rsMunicipios.MoveFirst
do while not rsMunicipios.EOF
if not distritos = rsMunicipios("IdDistrito") then
nomDistrito = rsMunicipios("IdDistrito")
response.write(nomDistrito) ' aqui si me imprime nueve registros 1 2 3 4 5 6 7 8 9
end if
distritos = rsMunicipios("IdDistrito")
rsMunicipios.moveNext
loop
rsMunicipios.close()
end if
response.write(nomDistrito) 'Aqui es donde quiero ponerlo pero en lugar de arrojarme los 9 numeros solo me arroja el ultimo registro solo el 9