<% dim idarea, nomearea idarea=request("id") nomearea=request("nome") set conn=server.createobject("ADODB.Connection") conn.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("dati/dati.mdb") conn.open set rs=server.createobject("Adodb.recordset") if idarea="" then rs.open "Select idcorso, DesQualif, DesOra, Costo, stato, destin_desdest, destin_1_desdest from corsi WHERE VISIBILE = TRUE ORDER BY idcorsocont DESC", conn else rs.open "Select idcorso, DesQualif, DesOra, Costo, stato, destin_desdest, destin_1_desdest from corsi WHERE VISIBILE = TRUE AND area_tematica=" & idarea & " ORDER BY idcorsocont DESC", conn end if %>

Corsi gratuiti / Corsi finanziati - Torino

<%=nomearea%>

<% if not rs.eof then do while not rs.eof %> <% 'contatore= contatore + 1 rs.movenext loop else %> <% end if rs.close %>
Titolo Orario Costo Stato
<%=rs("desqualif")%> <%=rs("desora")%> <%=rs("costo")%> <%=rs("stato")%>
Nessun corso caricato in questa sezione

Corsi in evidenza

<%set rs=server.createobject("Adodb.recordset") 'if idarea="" then 'rs.open "Select TOP 5 idcorso, DesQualif, desora,costo from corsi WHERE VISIBILE = TRUE ORDER BY desqualif", conn rs.open "SELECT Corsi.idcorso, Corsi.DesQualif, Corsi.Costo, Corsi.DesOra, tblaree_tematiche.area_tematica, tblaree_tematiche.idareatematica " & _ "FROM tblaree_tematiche RIGHT JOIN Corsi ON tblaree_tematiche.idareatematica = Corsi.area_tematica WHERE Corsi.VISIBILE = TRUE AND Corsi.in_evidenza=true ORDER BY idcorsocont DESC", conn 'else 'rs.open "Select TOP 5 idcorso, DesQualif, desora,costo from corsi WHERE VISIBILE = TRUE AND area_tematica=" & idarea & " ORDER BY desqualif", conn ' rs.open "SELECT Corsi.idcorso, Corsi.DesQualif, Corsi.Costo, Corsi.DesOra, tblaree_tematiche.area_tematica, tblaree_tematiche.idareatematica " & _ ' "FROM tblaree_tematiche RIGHT JOIN Corsi ON tblaree_tematiche.idareatematica = Corsi.area_tematica WHERE Corsi.VISIBILE = TRUE AND Corsi.in_evidenza=true AND Corsi.area_tematica=" & idarea, conn 'end if %>
    <% if not rs.eof then do while not rs.eof %>
  • <%=rs("desqualif")%>

    <%=rs("desora")%>

    <%=rs("costo")%>

    ...leggi tutto
  • <% 'contatore= contatore + 1 rs.movenext loop else %>
  • Nessun corso

  • <% end if rs.close %>