report

[pagineasp2]

<table border="1" cellspacing="1" bgcolor="white"cellpadding="1" align="center" bordercolor="blue">

<tr>
QUI DOVREBBE VENIRE UN CAPPELLO
<th bgcolor="#DCDCDC" >DATA</th>
<th bgcolor="#DCDCDC" >DMC_IVR</th>
<th bgcolor="#DCDCDC" >DMC_ASP</th>
<th bgcolor="#DCDCDC" >DMC_WEB</th>
QUI DOVREBBE VENIRE UN CAPPELLO
<th bgcolor="#DCDCDC" >DWHC_IVR</th>
<th bgcolor="#DCDCDC" >DWHC_ASP</th>
<th bgcolor="#DCDCDC" >DWHC_WEB</th>
QUI DOVREBBE VENIRE UN CAPPELLO
<th bgcolor="#DCDCDC" >TIMOTY_IVR</th>
<th bgcolor="#DCDCDC" >STIMOTY_ASP</th>
<th bgcolor="#DCDCDC" >TIMOTY_WEB</th>



</tr>

<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = c:/mdb/Gestione_PI_Tickets.mdb")

set rs1 = server.createobject("ADODB.recordset")

sql1 = "select * from query-tymoty"

rs1.open sql1, objconn



if not rs1.eof then
do while not(rs1.eof)
dim variabil1
variabile1 = rs1("id")
%>

<tr>
<td><font size="2" face="verdana"><%response.write(rs1("DATA_INIZIO_S ETTIMANA"))%></font></td>
<td><font size="2"face="verdana"><%response.write(rs1("DMC_I VR"))%></font></td>
<td><font size="2" face="verdana"><%response.write(rs1("DMC_ASP"))%></font></td>
<td><font size="2"face="verdana"><%response.write(rs1("DMC_W EB"))%></font></td>
<td><font size="2"face="verdana"><%response.write(rs1("DWHC_ IVR"))%></font></td>
<td><font size="2" face="verdana"><%response.write(rs1("DWHC_ASP"))%> </font></td>
<td><font size="2"face="verdana"><%response.write(rs1("DWHC_ WEB"))%></font></td>
<td><font size="2" face="verdana"><%response.write(rs1("TIMOTY_IVR")) %></font></td>
<td><font size="2"face="verdana"><%response.write(rs1("TIMOT Y_ASP"))%></font></td>
<td><font size="2"face="verdana"><%response.write(rs1("TIMOT Y_WEB"))%></font></td>
<tr>