繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 用ASP.NET动态生成图像（转2）
- ASP.NET
- ASP.NET开发:简化应用程序的开发支持Web标准
- asp.net XMLHttpRequest实现用户注册前的验证
- asp.net 页面间传值方法小结
- asp.net url重写浅谈
- asp.net 验证码生成和刷新及验证
- C#精髓 GridView72大绝技 学习gridview的朋友必看
- 实例说明asp.net中的简单角色权限控制
- asp.net网站开发包wq.dll打包下载
- js与ASP.NET 中文乱码问题
- asp.net checkbox 动态绑定id GridView删除提示
- asp.net TextBox回车触发事件 图片在img显示
- asp.net 脏字典过滤问题 用正则表达式来过滤脏数据
- asp.NET 脏字过滤算法
- asp.NET 脏字过滤算法 修改版
- asp.net sql 数据库处理函数命令
- asp.net Javascript 的几种写法与提示
- ASP.NET MVC学习笔记
- asp.net 中国身份证号码验证代码 非正则
- Asp.net中使用Sqlite数据库的方法
- asp.net 中文字符串提交乱码的解决方法
用ASP.NET动态生成图像（转2）
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 121 ::
收藏到网摘: n/a
<script language="VB" runat=server>
Sub ChartBtn_Click(Sender as Object, E as EventArgs)
chart.ImageUrl = "ImageGenerator_Vb.aspx?"
chart.Visible = true
For i=0 to Stocks.Items.Count-1
If (Stocks.Items(i).Selected = true) Then
chart.ImageUrl = chart.ImageUrl & "symbols=" & Stocks.Items(i).Value & "&"
End If
Next
End Sub
</script>
<html>
<body>
<form runat=server>
<h1>Scott's Stock Picker</h1>
<asp:checkboxlist id="Stocks" runat=server>
<asp:listitem>MSFT</asp:listitem>
<asp:listitem>SUN</asp:listitem>
</asp:checkboxlist>
<asp:button text="Chart Your Selected Stocks" OnClick="ChartBtn_Click" runat=server/>
<hr>
<asp:Image id="chart" ImageUrl="" Visible=false runat=server/>
</form>
</body>
</html>
ImageGenerator_VB.aspx:
<%@ Page Language="VB" ContentType="image/jpeg" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Drawing2D" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<%@ Import Namespace="ChartGenerator" %>
<%@ OutputCache Duration="10" %>
<script language="VB" runat=server>
Function GetStockDetails(Symbol as String) as ChartLine
Dim myChartLine as new ChartLine
if (symbol = "msft") then
Dim StockValues() as Single = { 60, 110, 120, 180, 185, 190, 240, 290 }
myChartLine.Width = 5
myChartLine.Color = Color.Blue
myChartLine.LineStyle = DashStyle.Solid
myChartLine.Title = "Microsoft Corp. (MSFT)"
myChartLine.Symbol = "MSFT"
myChartLine.Values = StockValues
return myChartLine
elseif (symbol = "sun") then
Dim StockValues() as Single = { 180, 155, 125, 60, 25, 15, 10, 3 }
myChartLine.Width = 5
myChartLine.Color = Color.Red
myChartLine.LineStyle = DashStyle.Dot
myChartLine.Title = "Sun Corp. (Sun)"
myChartLine.Symbol = "Sun"
myChartLine.Values = StockValues
return myChartLine
end if
return nothing
End Function
Sub Page_Load(Sender as Object, E as EventArgs)
' Generate Chart Data For Image....
Dim XAxes() as String = { "9:00AM", "9:30AM", "10:00AM", "11:00AM", "12:00AM", "1:00PM", "1:30PM" }
Dim MyChartData as New ChartData
MyChartData.YTickSize = 20
MyChartData.YMax = 250
MyChartData.YMin = 0
MyChartData.XAxisTitles = XAxes
Dim Symbols() as String = Request.QueryString.GetValues("symbols")
if (Not Symbols = Nothing) then
for i=0 to Symbols.Length-1
Dim stockValue as ChartLine = GetStockDetails(symbols(i).ToLower)
If (stockValue <> nothing) then
myChartData.Lines.Add(stockValue)
End if
Next
end if
' Create In-Memory BitMap of JPEG
Dim MyChartEngine as New ChartEngine
Dim StockBitMap as BitMap = MyChartEngine.DrawChart(600, 400, myChartData)
' Render BitMap Stream Back To Client
StockBitMap.Save(Response.OutputStream, ImageFormat.JPEG)
End Sub
</script>
ChartEngine.cs:
using System.WinForms;
using System.Collections;
using System.Collections.Bases;
using System.Drawing;
using System.Drawing.Drawing2D;
using System.Drawing.Imaging;
using System.ComponentModel;
using System;
using System.IO;
namespace ChartGenerator {
//Core Line Data structure
public struct LineData {
public float[] LineValues ;
public string LineTitle ;
public string LineSymbol ;
}
//Line Data plus display style information
public class ChartLine {
private Color lineColor ;
private LineData lineData ;
private DashStyle lineStyle ;
private int lineWidth ;
//Constructors
public ChartLine() :base() {}
public ChartLine(LineData lineData) :base() {
this.lineData = lineData;
}
//Properties
public Color Color {
get { return lineColor ; }
set { lineColor = value ; }
}
public DashStyle LineStyle {
get { return lineStyle ; }
set { lineStyle = value ; }
}
public st
评论 (0) All
