<% dim objdc,objrs set objdc=server.createobject("ADODB.Connection") objdc.connectionTimeout=15 objdc.CommandTimeout=30 objdc.open "united" set objrs=server.createobject("ADODB.Recordset") %>
<% objRS.Open "SELECT DISTINCT workexp FROM recruit", objDC, 3, 1 %>

<% objRS.Open "SELECT DISTINCT job FROM recruit", objDC, 3, 1 %>

Years of Experience Search:	No Preference <% objrs.movefirst do while not objrs.eof workexp = objrs("workexp") Response.Write "" response.write objrs("workexp") & "" objrs.movenext loop objrs.close %>
Job Title Search:	No Preference <% objrs.movefirst do while not objrs.eof job = objrs("job") Response.Write "" response.write objrs("job") & "" objrs.movenext loop %>