se usi js puoi adattarti questo codice:
se invece usi vbscript...codice:<%@LANGUAGE = JScript%> <% var Cn = new ActiveXObject("ADODB.Connection"); Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("database.mdb")); var Mostra = Cn.Execute("SELECT * FROM tabella"); %> <table width="100%" border="1"> <% var i = 0; while (!Mostra.EOF) { if (i%2 == 0) { %> <tr> <td bgcolor="#FFFFFF"><%=Mostra("dato")%></td> </tr> <% }else{ %> <tr> <td bgcolor="#CCCCCC"><%=Mostra("dato")%></td> </tr> <% } i++; Mostra.MoveNext(); } %> </table> <%Cn.Close()%>
codice:<% Colore = 0 Do While Not rs.EOF if Colore Mod 2 = 0 Then strColore = "#FFFFFF" '<-- qua metti il colore che vuoi Else strColore = "#000000" '<-- qua metti il colore che vuoi End if %> <table width="95%" cellspacing="0" cellpadding="0"> <tr> <td bgcolor="<%= strColore %>"> </td> </tr> <% Colore = Colore + 1 Loop %> </table>![]()

Rispondi quotando