No, no, no.. o no me expliqué bien o no me estás entendiendo (que sería lo mismo
)
Fijate el código de lo que marcaste como gráfica 1:
Cita: Código Array para Grafica 1 ( este es el que tu me pasaste)
<%
' Acá definís el alto máximo, en pixeles, que va a tener el gráfico:
AltoMAX_Graf = 100 'en px
' Meto todos los valores en un array para detectar posteriormente el valor máximo:
Dim arrValores(5)
arrValores(0) = rs("ProM2Lun")
arrValores(1) = rs("ProM2Mar")
arrValores(2) = rs("ProM2Mie")
arrValores(3) = rs("ProM2Jue")
arrValores(4) = rs("ProM2Vie")
arrValores(5) = rs("ProM2Sab")
' Acá detecto el valor máximo:
For Idaz = 0 To Ubound(arrValores)
If arrValores(Idaz) > valorMax Then valorMax = arrValores(Idaz)
Next
' Acá pongo proporcionalmente los valores devueltos al alto máximo definido anteriormente:
AltoBarraLun = Int((arrValores(0)/valorMax)* AltoMAX_Graf)
AltoBarraMar = Int((arrValores(1)/valorMax)* AltoMAX_Graf)
AltoBarraMie = Int((arrValores(2)/valorMax)* AltoMAX_Graf)
AltoBarraJue = Int((arrValores(3)/valorMax)* AltoMAX_Graf)
AltoBarraVie = Int((arrValores(4)/valorMax)* AltoMAX_Graf)
AltoBarraSab = Int((arrValores(5)/valorMax)* AltoMAX_Graf)
%>
Allí estás usando el campo
ProM2DiaSemana cuando en realidad deberías usar el campo
ProM1DiaSemana (tanto para el lun, mar, mie, jue, vie y sab)
¿Me explico ahora?