urgente

[yoyi2002]

este el codigo, el response.write me captura bien el valor. el problema es que no me lo selecciona. me los muestra todos pero no el seleccionado cual sera el problema????'

<%

if session("mostrar")=1 then
CAMPO=rs("rubro_cliente")
response.write CAMPO
end if

Function Selected(Actual,Valor)
If Actual = Valor then
Response.Write " SELECTED"
End if
End function
%>

<select name="rubro_cliente" style="width:115" >
<option value="Servicios" <%Call Selected("Servicios",CAMPO)%>>Serv icios</option>
<option value="Forestal" <%Call Selected("Forestal",CAMPO)%>>Fores tal</option>
<option value="Agropecuario" <%Call Selected("Agropecuario",CAMPO)%>>A gropecuario</option>
</select>