Creare semplici grafici a barre con ASP

di Daniele Bochicchio, in Classic ASP, Grafici,

Benchè di default Classic ASP non abbia meccanismi in grado di permette la creazione dinamica di grafici, con qualche piccolo accorgimento ed un po' di HTML si può avere lo stesso effetto visivo.
In particolare in questo esempio vedremo come creare al volo un semplice grafico a barre, con i dati prelevati da un array:

<%
'lunghezza massima della barra in pixel
lunghezza = 150

' definizione colori
colori = "yellow;red;pink;orange;navy;blue;"
colori = Split(colori, ";")

' definizione intestazioni e valori
' sostituire con estrazione da database
intestazione="Windows NT 4;Windows 2000;Windows Server 2003;Windows 95;Windows 98;Windows ME;"
valori = "15;200;150;4;10;12;"

intestazione = Split(intestazione, ";")
valori = Split(valori, ";")

' leggere valore massimo dal db
massimo = 200

Response.Write("<table border=0>")

for i = 0 to ubound(intestazione)-1
 Response.Write("<tr><td>")
 
 ' calcolo lunghezza della cella
 cella = CInt((100*valori(i)/massimo)*(lunghezza/100))
 
 ' output a video della tabella
 Response.Write("<table width=" & cella & "><tr>")
 Response.Write("<td bgcolor=" & colori(i) & "> </td></tr></table>")
 
 Response.Write("</td><td><b>" & intestazione(i) & "</b></td></tr>")

next

Response.Write("</table>")

%>

E' sufficiente sostituire la lettura dall'array con quella da database per personalizzare il codice.

Si può vedere questo script all'opera su
https://www.aspitalia.com/liste/usag/esempi.asp?ID=556

Commenti

Visualizza/aggiungi commenti

| Condividi su: Twitter, Facebook, LinkedIn

Per inserire un commento, devi avere un account.

Fai il login e torna a questa pagina, oppure registrati alla nostra community.

Approfondimenti

Nessuna risorsa collegata

I più letti di oggi