<%set rs_vagas = Server.Createobject("ADODB.Recordset")
if pc_vaga <> "" then ' procura
sql = "select vagas.* from vagas where aprovado = '1' and (vagas.descricao_anuncio like '%" & preparaPalavra & "%') "
if (cat_vaga <> "" and cat_vaga <> "0") then
sql = sql & " and vagas.codigo_categoria = "&cat_vaga&" "
end if
if (uf_vaga <> "" and uf_vaga <> "0") then
sql = sql & " and vagas.estado_anuncio = '"&uf_vaga&"' "
end if
sql = sql & " order by data_inclusao desc"
else ' categoria
sql = "select vagas.* from vagas where vagas.codigo_categoria = "&codigo_categoria&" and aprovado = '1' order by data_inclusao desc"
end if
'Response.Write sql
rs_vagas.Open sql,conexao,3,3
if not rs_vagas.eof then
set rs_ct = Server.createobject("adodb.recordset")
while not rs_vagas.eof%>
<%rs_ct.open "select nome_categoria from categorias where codigo_categoria = "&rs_vagas("codigo_categoria")&"",conexao
if not rs_ct.eof then
nm_categoria = rs_ct("nome_categoria")
end if
rs_ct.close%>
Cargo: <%=nm_categoria%> (<%=rs_vagas("data_inclusao")%>) Descrição: <%=rs_vagas("descricao_anuncio")%> Contato: <%=rs_vagas("contato_anuncio")%> Cidade: <%=rs_vagas("cidade_anuncio")%>, <%=rs_vagas("estado_anuncio")%>
','Envia','resizable=no; width=640, height=650;')" style="color: #0000FF; WIDTH: 108px; HEIGHT: 15px; text-align: left; font-family: Verdana; font-size: 10px; border: 0px solid #F8F4FF; background-color: #FFE3E3; cursor: hand; text-decoration:underline">
<%rs_vagas.movenext
wend
else%>
Não foram encontradas vagas para a categoria.
<%end if
rs_vagas.close
set rs_vagas = nothing%>
