Problema al llenar un combobox

[Blakjac]

Objetivo: Que una de las opciones del combobox este seleccionada
Cumplida esta condicion: cuando un valor almacenado en varMAT
sea igual a un valor recuprado en el RS del campo ID_MATERIA.

Problema: La ultima opcion es la que aparece seleccionada
Solicutud: Alguien puede decirme en donde esta mi herror.



A continuacion les muestro el codigo .....
GRacias por su atencion prestada.

localhost/est/upGrupos.asp?vgru=2&vcat=201895&vmat=BAA.02&vcar=8 146&vper=1&vdia=&vhora=2&vsal=1

<%
varMAT = Request.QueryString("vmat")
%>
<%
Call Conecta()
strSQL="EXECUTE SelMaterias "
set Rs = Conn.Execute(strSQL)
%>
<select id="Select1" name="cboMAT">
<%
Do Until Rs.Eof

IF Rs("ID_MATERIA") = varMAT THEN
varSEL="SELECTED"
Else
varSEL= " "
END IF
%>
<option value="<%=Rs("ID_MATERIA")%>" selected="<%=varSEL%>"><%=Rs("ID_MATERIA")%></option>
<%
Rs.MoveNext
Loop
%>
</select>

[Esfinge02]

Creo que lo tienes que poner asi;

<option value="<%=Rs("ID_MATERIA")%>" <%iF varSEL = Rs("ID_MATERIA") Then response.write("selected") %>><%=Rs("ID_MATERIA")%></option>

[orharo2003]

dando por hecho q los valores q se comparan vienen correctamente :

<option value="<%=Rs("ID_MATERIA")%>" <%=varSEL%>><%=Rs("ID_MATERIA")%></option>

[Blakjac]

Gracias por sus respuestas :D
al final lo encontre una forma de hacerlo funcionar

<%
Do Until Rs.Eof
IF cstr(Rs("ID_MATERIA")) = varMAT THEN
%>
<option value="<%=Rs("ID_MATERIA")%>" selected="selected"><%=Rs("MATERIA")%></option>
<%
Else
%>
<option value="<%=Rs("ID_MATERIA")%>"><%=Rs("MATERIA")%></option>
<%
End If

Rs.MoveNext
Loop
%>

pero igual probare las suyas :B