salve con questo codice, ho fatto una tabella per visualizzare tre record è questo tutto bene, poi ho fatto un controllo per calcolare dei tre valore quale è più grande partendo da primo.
ma adeso dovre seganalare con colore rosso i due o uno dei tre valore che sono più gardi rispetto al primo...spero di essere stao chiaro.
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Nuova pagina 1</title> </head> <body> <table border="1" cellspacing="1" bgcolor="white" cellpadding="1" align="center" bordercolor="blue" <caption>Monitoraggio Report settimanle</caption>
<tr>
<th bgcolor="#DCDCDC" scope="col" colspan="1">data</th>
<th bgcolor="#DCDCDC" scope="col" colspan="3">TIMOTY</th>
</tr>
<tr>
<td>data</td>
<td>IVR</td>
<td>ASP</td>
<td>WEB</td>
</tr>
</table>
</body>
</html>
<%
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")
if (rs1("DMC_IVR")>rs1("DMC_ASP")) and (rs1("DMC_IVR")>rs1("DMC_WEB")) then
codice=rs1("DMC_IVR")
elseif (rs1("DMC_ASP")>rs1("DMC_IVR")) and (rs1("DMC_ASP")>rs1("DMC_WEB")) then
codice=rs1("DMC_ASP")
else
codice=rs1("DMC_WEB")
end if
%>
<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>
<tr>
<%
rs1.movenext
Loop
'chiudo e distruggo la connessione
objConn.close
set objconn=nothing
%>
<%
else
%>
Non sono stati trovati documenti
<%
end if
%>
</table>
<p align="center"><input type="button" value="Torna Indietro" onclick="history.back()"></p>
</body>
</html>
Rispondi quotando
