在ASP.NET页面中实现数据棒图

string sRouter = "c:\\db.mdb" ;
//获得当前Access数据库在服务器端的绝对路径
string strCon = " Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " + sRouter ;
//创建一个数据库连接
OleDbConnection myConn = new OleDbConnection ( strCon ) ;
string strCom = " SELECT YF ,SL FROM Table01 ORDER BY YF" ;
myConn.Open ( ) ;
OleDbCommand myCommand = new OleDbCommand ( strCom , myConn ) ;
OleDbDataReader myOleDbDataReader = myCommand.ExecuteReader ( ) ;
//创建OleDbDataReader实例，并以此实例来获取数据库中各条记录数据
int [ ] iXiaoSH = new int [ 12 ] ;
//定义一个数组，用以存放从数据库中读取的销售数据
string [ ] sMoth = new string [ 12 ] ;
//定义一个数组，用以存放从数据库中读取的销售月份
int iIndex = 0 ;
while ( myOleDbDataReader.Read ( ) )
{
iXiaoSH [ iIndex ] = myOleDbDataReader.GetInt32 ( 1 ) ;
sMoth [ iIndex ] = myOleDbDataReader.GetInt32 ( 0 ) .ToString ( ) + "月" ;
iIndex++ ;
}
//读取Table01数据表中的各条数据，并存放在先前定义的二个数组中
myConn .Close ( ) ;
myOleDbDataReader .Close ( ) ;
//关闭各种资源
Bitmap bm = new Bitmap ( 600 , 250 ) ;
//创建一个长度为600，宽带为250的Bitmap实例
Graphics g ;
g = Graphics.FromImage ( bm ) ;
//由此Bitmap实例创建Graphic实例
g .Clear ( Color .Snow ) ;
//用Snow色彩为背景色填充此绘画图面
g .DrawString ( " ××公司××器件2002年度销售情况一览表" , new Font ( "宋体" , 16 ) , Brushes .Black , new Point ( 5 , 5 ) ) ;
//在绘画图面的指定位置，以指定的字体、指定的颜色绘制指定的字符串。即为图表标题
//以下代码是是实现图01中的右上部
Point myRec = new Point ( 535 , 30 ) ;
Point myDec = new Point ( 560 , 26 ) ;
//以上是在图01中为下面绘制定位
g .DrawString ( "单位：万套" , new Font ( "宋体" , 9 ) , Brushes .Black , new Point ( 525 , 12 ) ) ;
for ( int i = 0 ; i < sMoth.Length ; i++ )
{
g .DrawRectangle ( Pens.Black , myRec .X , myRec .Y , 20 , 10 ) ;
//绘制小方块
g .FillRectangle ( new SolidBrush ( GetColor ( i ) ) , myRec .X , myRec .Y , 20 , 10 ) ;
//填充小方块
g .DrawString ( sMoth [ i ] .ToString ( ) , new Font ( "宋体" , 9 ) , Brushes .Black , myDec ) ;
//绘制小方块右边的文字
myRec .Y += 15 ;
myDec .Y += 15 ;
}
//以下代码是绘制图01中的Bar图，及其销售数量
int iBarWidth = 40 ;
int scale = 10 ;
for ( int i = 0 ; i < iXiaoSH .Length ; i++ )
{
g .DrawRectangle ( Pens.Black , ( i * iBarWidth ) + 15 , 250 - ( iXiaoSH [ i ] * scale ) , 20 , ( iXiaoSH [ i ] * scale ) + 5 ) ;
//绘制Bar图
g .FillRectangle ( new SolidBrush ( GetColor ( i ) ) , ( i * iBarWidth ) + 15 , 250 - ( iXiaoSH [ i ] * scale ) , 20 , ( iXiaoSH [ i ] * scale ) + 5 ) ;
//以指定的色彩填充Bar图
g .DrawString ( iXiaoSH [ i ] .ToString ( ) , new Font ( "宋体" , 9 ) , Brushes .Black , ( i * iBarWidth ) + 20 , 235 - ( iXiaoSH [ i ] * scale ) ) ;
//显示Bar图代表的数据
}
//以下代码是绘制图01中的边框，并形成Jpeg文件，供浏览器显示出来
Pen p = new Pen ( Color.Black , 2 ) ;
g .DrawRectangle ( p ,

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!