<% Response.Expires = 0 set objRs2=server.createobject("ADODB.recordset") ObjRs2.cachesize=5 ObjRs2.pagesize=10 ramo="MANUTENÇÃO" ID=4 strQuery2 = "SELECT * FROM tprojetos WHERE manutencao='Sim' and visualizacao='Externamente' AND codempresa='6' order by anocontrato Desc, diacontrato Desc, mescontrato, codigo Desc" ObjRs2.open strQuery2,objconn,1 pagina=request("qualpagina") if pagina="" then pagina=1 end if tamanhopagina=request("pagesize") if tamanhopagina=" " then tamanhopagina=10 end if if ObjRs2.EOF = True then on error resume next end if contador=ObjRs2.recordcount maxpaginas=cint(ObjRs2.pagecount) maxregistros=cint(ObjRs2.PageSize) ObjRs2.absolutepage=pagina registros=0 Response.Expires = 0 set objRs=server.createobject("ADODB.recordset") strQuery = "SELECT distinct tipoclientefinal FROM tprojetos WHERE manutencao='Sim' and visualizacao='Externamente' AND codempresa='6' Order by tipoclientefinal" 'strQuery = "SELECT * FROM ttipo_clientefinal Order by nome" ObjRs.open strQuery,objconn,1 %> Emac - Especialista em Manutenção
 
Emac
 
Saiba mais detalhes sobre alguns contratos de manutençã da EMAC, clicando em um dos seguimentos ou projetos abaixo.
<% set objRs_cont=server.createobject("ADODB.recordset") strQuery_cont = "SELECT * FROM tprojetos WHERE (codempresa = '6') AND (visualizacao = 'EXTERNAMENTE')" ObjRs_cont.open strQuery_cont,objconn,1 DO until objRS_cont.EOF total=total+1 objRS_cont.MoveNext loop if total <= 0 then total=0 end if %> Total de <%=total%> projetos cadastrados no site.
<%if ID="1" then%> AQUECIMENTO SOLAR <%end if%> <%if ID="2" then%> AR CONDICIONADO <%end if%> <%if ID="3" then%> FILTRO ELETROSTÁTICO <%end if%> <%if ID="4" then%> MANUTENÇÃO <%end if%> <%if ID="5" then%> AUTOMAÇÃO <%end if%> PROJETOS
<%while not ObjRs.eof%> <% ObjRs.movenext wend%>
&ID=<%=ID%>" class="preto"> <%=objRS.fields("tipoclientefinal").value%>
<%DO until objRS2.EOF or registros>=maxregistros%> <%if ObjRs2.fields("imagens").value="Sim" then%>
  " class="preto">Cliente Final: <%=objRS2.fields("clientefinal").value%>
  " class="preto">Local: <%=objRS2.fields("localizacao").value%>
  " class="preto">Ano do Contrato: <%=objRS2.fields("anocontrato").value%>
<%end if if ObjRs2.fields("imagens").value="Não" then%>
" class="preto">Cliente final:<%=objRS2.fields("clientefinal").value%>
  " class="preto">Local: <%=objRS2.fields("localizacao").value%>
  " class="preto">Ano do Contrato: <%=objRS2.fields("anocontrato").value%>
<%end if%> <% objRS2.MoveNext registros=registros+1 Loop response.Write "PÁGINAS: " for cont=1 to maxpaginas ref="" & cont & "" else ref=ref & " class=texto>" & cont & "" end if response.write ref & " " next%>


Entre em contato com a emac, teremos prazer
em atendê-lo: admcentral@emac.com.br
Atualizada em: 10/2007.
Sugestões: gapd@emac.com.br
 
 

 

Emac - Especialista em Manutenção Visite o site empresastuma.com.br