intenta creando un recordset con el catálogo completo de las opciones que va a mostrar el combobox:
Código:
<%
sSQL="Select ID, descripcion From CATALOGO " ' Utiliza tu catálogo
set rsCat = oConn.execute(sSQL)
%>
Prueba con el siguiente código:
Código:
<label>Tipo</label>
<%
sSQL="Select Tipo From Tipotelefonia "
set rs = oConn.execute(sSQL)
%>
<select name="Tipo">
<%
do while not rs.eof
If (CStr(rs("Tipo")) = CStr( rsCat(ID) )) Then Seleccionado = " selected=""selected"" " else Seleccionado = ""
%>
<option value="<%=rsCat("ID")%>" <%=Seleccionado%> > <%=rsCat("descripcion")%>
<%RS.movenext
loop
%>
</select>
Espero te sirva