<option value="<%Response.write(Rs("tuvalor"))%>" <%If Rs("tuvalor") =Rs2("Valorquecomparas") then %>selected=selected<%End If%>>Valor combo</option>