Ver Mensaje Individual
  #1 (permalink)  
Antiguo 15/12/2004, 17:43
Avatar de Stickmaster2004
Stickmaster2004
 
Fecha de Ingreso: septiembre-2004
Ubicación: Barranquilla
Mensajes: 568
Antigüedad: 20 años, 7 meses
Puntos: 0
Problemilla con graficas

lo que pasa es que intento hacer un grafico de barras con datos de una tabla de mysql, bueno ya lo hago el problemilla es que intento mostrar unos nombres de la base de datos justo debajo de las barras generadas, pero me los muestra es al lado como corrigo este error, tengo el sgte codigo:

<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<p>Grafico Vertical</p>
<CENTER>
<table width="100%" border="1" cellspacing="2" cellpadding="10" height="200" BGCOLOR="SKYBLUE">
<tr valign="bottom">
<td height="50">
<p><CENTER><B><font color="#0033FF"> Programa del Adulto Mayor en la IPS Servir S.A </font></CENTER></p>
<%
Dim c
set oConn=Server.CreateObject("ADODB.Connection")
oConn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};Server=127.0.0.1;uid=root;DataBase=datos1"
oConn.Open
SQL="SELECT valor,nom_control,avg(valor) as pollino FROM controles_hipertensos where codigo='1' and fec_control='2004-11-23' group by nom_control,valor order by nom_control asc"
set rs=oConn.Execute(SQL)
While (not rs.Eof)
response.write rs.fields("nom_control")



%>




<img src=azul.gif width=10 height="<%=rs.fields("valor")%>">


<%

rs.MoveNext
Wend
rs.Close
oConn.Close
set rs = nothing
set oConn = nothing

%>
</td>

</tr>

</table>
<p>&nbsp;</p>
<p><br>
</p>
</body>
</html>
__________________
Solo el que se basa en conocimiento basico y cultiva el aprendizaje obtendra sabiduria