Moverse en un listbox

[loquillo7]

Buenas foreros mi consulta es que yo me muevo por una base de datos por un movenext,pero cuando entro a a la pagina despues de haberme logueado donde username es el nombre del q ingreso, como podria hacer para q por medio de un listbox salga ese username por defecto, se q es con <option selected> pero como colocaria el else para que añada al listbox los siguientes nombres de usarios porfa le agradeceria bastante


Do while not rsArchivo.EOF
<OPTION <%if username=nombredelosusuarios then Response.Write("SELECTED ")%>>
<%=username%>

'(else...???? que prosiga escribiendo el listbox el siguiente nombre de usuario
nose como se pondria el else para q siga ñadiendo al listbox los siguientes nombres de usarios)

</OPTION>
rsResponsable.MoveNext


Muchas Gracias de antemano.

[Cbas]

Sin poner el else.

Do while not rsArchivo.EOF
<OPTION <%if username=nombredelosusuarios then Response.Write("SELECTED ")%>>
<%=username%>

Dejalo así y no pongas end if... porque cuando es una sola condición no necesitás end if.

SALUDOS!

[Saruman]

facil...

Código:

<select name="usuarios">
<%
	while not RSUsuarios.eof
		if RSUsuarios("idusuario") = idusuario_login_actual then
			response.Write(vbtab & "<option value=""" & RSUsuarios("idusuario") & """ selected>" & RSUsuarios("nombre_usuario") & "</option>" & vbcrlf)
		else
			response.Write(vbtab & "<option value=""" & RSUsuarios("idusuario") & """>" & RSUsuarios("nombre_usuario") & "</option>" & vbcrlf)
		end if
		RSUsuarios.movenext
	wend
%>
</select>