 |
| | <%=mostraEtiqueta(cnn,"capsalera4",obreT("taula"),"wwwTaules")%> | <%=mostraEtiqueta(cnn,"capsalera4_2",obreT("taula"),"wwwTaules")%> | |
<% id=trim(session("idioma"))
select case id
case "CAT" set n = cnn.execute ("select * from wwwTaulaFormacioContinua where idioma='CAT' order by tipus,matricula,dates,id")
case "ESP" set n = cnn.execute ("select * from wwwTaulaFormacioContinua where idioma='ESP' order by tipus,matricula,dates,id")
case else response.Write("No tenim idioma")
end select %>
<%
function miraTipus(tip)
' Aquesta funció escriu el que toqui a la capçalera segons el tipus del curs
select case tip
case "C" miraTipus= mostraEtiqueta(cnn,"etiqueta9",obreT("taula"),"wwwTaules")
case "J" miraTipus= mostraEtiqueta(cnn,"etiqueta10",obreT("taula"),"wwwTaules")
case "P" miraTipus= mostraEtiqueta(cnn,"etiqueta11",obreT("taula"),"wwwTaules")
case else miraTipus= mostraEtiqueta(cnn,"etiqueta12",obreT("taula"),"wwwTaules")
end select
end function
%>
<%
function miraMat(mat)
' Aquesta funció escriu el que toqui a la capçalera segons el tipus del matricula
select case mat
case "O" miraMat=mostraEtiqueta(cnn,"etiqueta13",obreT("taula"),"wwwTaules")
case "T" miraMat=mostraEtiqueta(cnn,"etiqueta14",obreT("taula"),"wwwTaules")
case "P" miraMat=mostraEtiqueta(cnn,"etiqueta15",obreT("taula"),"wwwTaules")
case else miraMat= mostraEtiqueta(cnn,"etiqueta12",obreT("taula"),"wwwTaules")
end select
end function
%>
<%
' recuperem el que hi hagi a la taula
'set n = cnn.execute ("select * from wwwTaulaFormacioContinua order by tipus,matricula,dates,id")
if n.eof then
' la taula és buida
response.Write("No hi ha cap curs per mostrar")
else
' hi ha alguna cosa, mostrem tot
n.moveFirst
tipusActual=n.fields("tipus")
%>
<%=miraTipus(tipusActual)%> |
| <%=mostraEtiqueta(cnn,"etiqueta1",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta3",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta4",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta5",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta6",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta7",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta8",obreT("taula"),"wwwTaules")%> |
<%
while not n.eof
tipusSeguent=n.fields("tipus")
if tipusActual=tipusSeguent then
' un altre al mateix quadre
select case n.fields("teLink")
case "S" %>| "><%=n.fields("curs")%> | <%
case else %> | <%=n.fields("curs")%> | <%
end select
' recuperem coses que ens caldran
%>
<%
select case n.fields("inscripcio")
case "0" %><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
case "1" %>&pElements=<%="A"%>&pRao=<%=n.fields("curs")%>"><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
case "2" %><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
case "3" %><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
end select
%>
|
<%=miraMat(n.fields("matricula"))%> |
<%=n.fields("objectius")%> |
<%=n.fields("dates")%> |
<%=n.fields("horari")%> |
<%=n.fields("hores")%> |
<%=n.fields("import")%> |
| |
<%
else
%>
<%=miraTipus(tipusSeguent)%> |
| <%=mostraEtiqueta(cnn,"etiqueta1",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta3",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta4",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta5",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta6",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta7",obreT("taula"),"wwwTaules")%> |
<%=mostraEtiqueta(cnn,"etiqueta8",obreT("taula"),"wwwTaules")%> |
<%
select case n.fields("teLink")
case "S" %>| "><%=n.fields("curs")%> | <%
case else %> | <%=n.fields("curs")%> | <%
end select
' recuperem coses que ens caldran
%>
<%
select case n.fields("inscripcio")
case "0" %><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
case "1" %>&pElements=<%="A"%>&pRao=<%=n.fields("curs")%>"><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
case "2" %><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
case "3" %><%=mostraEtiqueta(cnn,"etiqueta2",obreT("taula"),"wwwTaules")%><%
end select
%>
|
<%=miraMat(n.fields("matricula"))%> |
<%=n.fields("objectius")%> |
<%=n.fields("dates")%> |
<%=n.fields("horari")%> |
<%=n.fields("hores")%> |
<%=n.fields("import")%> |
| |
<%
end if
tipusActual=tipusSeguent
n.moveNext
wend
%>
<%
end if
%>
|
|