<% estado = Request.QueryString("estado") sql = "Select * from onde where estado like '%"&estado&"%'" Set rsevento = con.Execute(sql) if rsevento.Eof Or rsevento.Bof Then %>

Sem representantes no estado

<% else %>

Estado - <%=estado%>

<% do while not rsevento.EOF code = code + 1 %>

<%=code%>	<%=rsevento("empresa")%>
	<%=rsevento("cidade")%> - <%=rsevento("estado")%>
	<%=rsevento("telefone")%>
	" target="_blank"><%=rsevento("link")%>

<% rsevento.MoveNext loop End if %>