<%@ Language=Vbscript %> <% option explicit %> <% Dim objTotip set objTotip = Server.createobject ("ADODB.RecordSet") objTotip.open "Totip", objconn, adopenkeyset, adcmdtable objTotip.movelast %> Servizi Totogol : quote dell'ultimo concorso totogol


Colonna vincente Totip+

<% Dim Rcount, ColoreRiga,Par RCount=True For Par=1 to 6 if RCount then ColoreRiga="#E9F8EF" else ColoreRiga="#D3EFDE" end if Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " RCount=Not RCount next if RCount then ColoreRiga="#E9F8EF" else ColoreRiga="#D3EFDE" end if ' RCount=Not RCount Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " Response.Write " " %>

Concorso Nº <% Response.Write objTotip ("Numero") %> del <% Response.Write FormatData (objTotip ("Data")) %>

" & Par & "

" & "  1º Arrivato" & "

" & Mid ( objTotip ("Colonna"),Par*2-1,1) & "

" & "  2º Arrivato" & "

" & Mid (objTotip ("Colonna"),Par*2,1) & "

" & "Corsa+" & "

" & "  1º Arrivato" & "

" & objTotip ("CorsaPiu1") & "

" & "  2º Arrivato" & "

" & objTotip ("CorsaPiu2") & "

  


Quote del concorso Totip N.  <% Response.Write objTotip("Numero") %> del <% Response.Write formatdata(objTotip("Data")) %>


  
Montepremi : <% Response.Write formatvaluta(objTotip("Montepremi")) %>
 

Punti

Vincitori

Quota

 14   <% Response.Write objTotip("Punti14") %>        <% if objTotip("Punti14") > 0 then Response.Write formatvaluta(objTotip("Quota14")) else Response.Write "Jackpot " & formatvaluta(objTotip("Quota14")) end if %>
 12   <% Response.Write objTotip("Punti12") %>        <% Response.Write formatvaluta(objTotip("Quota12")) %>
 11   <% Response.Write objTotip("Punti11") %>        <% Response.Write formatvaluta(objTotip("Quota11")) %>
 10   <% Response.Write objTotip("Punti10") %>        <% Response.Write formatvaluta(objTotip("Quota10")) %>