PROVA

<%numerodigara=request.querystring("numerodigara")%> <% database=request.querystring("campionato")%> <% Set conn = Server.CreateObject("ADODB.Connection") 'conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../mdb-database/COPPAITALIA2012.mdb") conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/" & database & ".mdb") Set rs = Server.CreateObject("ADODB.Recordset") Set rs2 = Server.CreateObject("ADODB.Recordset") Set rs3 = Server.CreateObject("ADODB.Recordset") numerodigara=request.querystring("numerodigara") %><% sql = "SELECT * FROM Tabellone where numerodigara='" & numerodigara & "'" sql2 = "SELECT * FROM Giocatore WHERE NumeroDiGara='" & numerodigara & "' and numero<" & 9999 & " and casafuori='0' order by id_squadra,numero" sql3 = "SELECT * FROM Giocatore WHERE NumeroDiGara='" & numerodigara & "' and numero<" & 9999 & " and casafuori='1' order by id_squadra,numero" 'response.write(sql) rs.Open sql, conn, 3, 3 rs2.open sql2, conn, 3, 3 rs3.open sql3, conn, 3, 3 %> <% on error resume next rs.MoveFirst%> <% nomea=rs.fields("nomea") nomeb=rs.fields("nomeb") puntia=rs.fields("puntia") puntib=rs.fields("puntib") puntia1=rs.fields("puntia1") puntib1=rs.fields("puntib1") puntia2=rs.fields("puntia2") puntib2=rs.fields("puntib2") puntia3=rs.fields("puntia3") puntib3=rs.fields("puntib3") puntia4=rs.fields("puntia4") puntib4=rs.fields("puntib4") puntia5=rs.fields("puntia5") puntib5=rs.fields("puntib5") puntia6=rs.fields("puntia6") puntib6=rs.fields("puntib6") puntia7=rs.fields("puntia7") puntib7=rs.fields("puntib7") puntia8=rs.fields("puntia8") puntib8=rs.fields("puntib8") minutitabellone=rs.fields("minutitabellone") seconditabellone=rs.fields("seconditabellone") %> <%else%><% response.write(seconditabellone)%><% end if%> <% response.write(nomea)%> – <% response.write(nomeb)%> Parziali quarti <% response.write(puntia)%> – <% response.write(puntib)%> <% response.write(puntia1)%> <% if rs.fields("tempodigioco")=1 then%>1<% else%>1<% end if%> <% response.write(puntib1)%> <% if rs.fields("tempodigioco")<2 then%><% response.write(puntia2)%><% else %><% response.write(puntia2)%><% end if%> <% if rs.fields("tempodigioco")=2 then%>2<% else%>2<% end if%> <% if rs.fields("tempodigioco")<2 then%><% response.write(puntib2)%><% else %><% response.write(puntib2)%><% end if%> <% if rs.fields("tempodigioco")<3 then%><% response.write(puntia3)%><% else %><% response.write(puntia3)%><% end if%> <% if rs.fields("tempodigioco")=3 then%>3<% else%>3<% end if%> <% if rs.fields("tempodigioco")<3 then%><% response.write(puntib3)%><% else %><% response.write(puntib3)%><% end if%> <% if rs.fields("tempodigioco")<4 then%><% response.write(puntia4)%><% else %><% response.write(puntia4)%><% end if%> <% if rs.fields("tempodigioco")=4 then%>4<% else%>4<% end if%> <% if rs.fields("tempodigioco")<4 then%><% response.write(puntib4)%><% else %><% response.write(puntib4)%><% end if%> <% response.write(minutitabellone)%> : <% if seconditabellone<10 then response.write("0") response.write(seconditabellone)%> <% if rs.fields("tempodigioco")<5 then%><% response.write(puntia5)%><% else %><% response.write(puntia5)%><% end if%> <% if rs.fields("tempodigioco")=5 then%>ot1<% else%><% end if%> <% if rs.fields("tempodigioco")<5 then%><% response.write(puntib5)%><% else %><% response.write(puntib5)%><% end if%> <% if rs.fields("tempodigioco")<6 then%><% response.write(puntia6)%><% else %><% response.write(puntia6)%><% end if%> <% if rs.fields("tempodigioco")=6 then%>ot2<% else%><% end if%> <% if rs.fields("tempodigioco")<6 then%><% response.write(puntib6)%><% else %><% response.write(puntib6)%><% end if%> <% if rs.fields("tempodigioco")<7 then%><% response.write(puntia7)%><% else %><% response.write(puntia7)%><% end if%> <% if rs.fields("tempodigioco")=7 then%>ot3<% else%><% end if%> <% if rs.fields("tempodigioco")<7 then%><% response.write(puntib7)%><% else %><% response.write(puntib7)%><% end if%> <% if rs.fields("tempodigioco")<8 then%><% response.write(puntia8)%><% else %><% response.write(puntia8)%><% end if%> <% if rs.fields("tempodigioco")=8 then%>ot4<% else%><% end if%> <% if rs.fields("tempodigioco")<8 then%><% response.write(puntib8)%><% else %><% response.write(puntib8)%><% end if%> <% squadraa=rs.fields("nomea") squadrab=rs.fields("nomeb") do until rs.EOF rs.MoveNext loop %>