con html

[mj1984]

Hola gente, tengo un codigo en ASP en el que he introducido algo de html, para hacer un formulario. Uno de los campos del formulario es de tipo select, y lo he programado asi:

Código:

<td align="left">
	<select name="sltCompania" class="txtplano" style="width:195;">
							<option></option>
	<option value="Vodafone"selected>Vodafone</option>
	<option value="Orange">Orange </option>
	</select>						
</td>

Ahora kiero hacer un formulario de modificación, de forma que me imprima este campo con la opción que se hubiera seleccionado como seleccionada, y que las otras me aparezcan cuando despliegue la lista por si decido cambiar la opción.

Creo que dbe hacerse con algo de Response.Write, pero no consigo hacerlo bien.

Muchas gracias.

[a n g e l u s]

hola m1984:

hay no más tu redacción, pero como siempre respondo cosas raras te entendi, jojojo.

la respuesta seria algo asi:


<%
'-----------> PRIMER PASO RECUPERO LOS DATOS GUARDADOS ------------------------------

sqldatosguardados = "select * from tablaqueguardemisdatos where id=1"
set rsdatos = db.execute(sqldatosguardados)
if not rsdatos.eof then
compania_elegida = rsdatos("companiaguardada")
else
compania_elegida = ""
end if




'-----------> SIGUIENTE PASO HACER COINCIDER LOS DATOS CON LOS GUARDADOS -----------
sql = "select compania, id from sltcompania"

on error resume next
set rs = db.execute(sql)

if err <> 0 then
response.write err.description
response.end
else
if not rs.eof then
response.write "<select name=sltCompania class=txtplano style=width:195>"

do while not rs.eof then

if rs("compania") = compania_elegida then
selecciona = "selected"
else
selecciona = ""
end if


response.write "<option value="&rs("id")&" "&selecciona&">"&rs("compania")&"</option>"

rs.movenext
loop
response.write "<select>"


else
response.write "NO ENCONTRADO"
end if
end if
%>