immagino che a monte ci sia il ciclo DO WHILE ...


la logica è giusta
codice:
 <option value="<%=rs1("data_evento")%>" <%if Request.QueryString("data_evento") = rs1("data_evento") then%> selected="selected" <%end if%>>
<%=rs1("data_evento")%></option>
è l'IF il confronto che è sbagliato ...formatdatetime <-