Prueba de esta manera:
Código:
<select name="estadocivil">
<option value="Soltero" <%if RS("estadocivil")="Soltero" then%> selected <%end if%>>Soltero/a</option>
<option value="Casado" <%if RS("estadocivil")="Casado" then%> selected <%end if%>>Casado/a</option>
<option value="Separado" <%if RS("estadocivil")="Separado" then%> selected <%end if%>>Separado/a</option>
<option value="Viudo" <%if RS("estadocivil")="Viudo" then%> selected <%end if%>>Viudo/a</option>
</select>
De todas maneras lo mas senecillo, es que sabiendo cual es el que tienes que marcar, almacenalo en una variable, haz una nueva conexion a bbdd y en un do while solo tienes que poner un option, te lo explico con un ejemplo, imaginate que el estado civil lo tienes en una variable estadocivil
Código:
<%
estadocivil = RS("estadocivil")
'Te conectas de nuevo a la bbdd(rs2) o haces RS.MoveFirst
%><select name="estadocivil"><%
do while not rs2.EOF
%><option value=<%=rs2("estadocivil")%> <%if rs2("estadocivil")=estadocivil then%>selected<%end if%>><%rs2("estadocivil")%></option>
<%
rs2.Movenext
loop
%>
</select>
Espero que te sirva, ya me diras, ciao