| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1375 人关注过本帖
标题:不明白的代码?什么意思啊
只看楼主 加入收藏
gzbhappy
Rank: 2
等 级:论坛游民
帖 子:173
专家分:10
注 册:2008-3-30
结帖率:100%
收藏
 问题点数:0 回复次数:8 
不明白的代码?什么意思啊
<%
  Response.Expires = 0
  Response.Buffer = true
  Response.Clear

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'  This shows all the properties used by csDrawGraph, and their default values.
'  It also plots a pie chart with 3 data items.
'  Replace "Chart.GIFPie" with "Chart.GIFBar" or "Chart.GIFLine" to display
'  a different type of graph.
'  Properties that use the default settings do not actually need to be specified.
'  This file may be useful as a template when trying different property values.
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''


  Set Chart = Server.CreateObject("csDrawGraph.Draw")
  'Set Chart = Server.CreateObject("csDrawGraphTrial.Draw")

  'Pie Chart Properties
  Chart.CenterX = 175
  Chart.CenterY = 150
  Chart.PieDia = 200
  Chart.Offset = 10
  Chart.ShowPercent = false

  'Bar Chart Properties (some also apply to line graphs)
  Chart.OriginX = 50
  Chart.OriginY = 250
  Chart.MaxX = 250
  Chart.MaxY = 200
  Chart.BarWidth = 0
  Chart.BarGap = 0
  Chart.YTop = 0
  Chart.YGrad = 0
  Chart.XAxisText = ""
  Chart.YAxisText = ""
  Chart.AxisTextFont = "Arial"
  Chart.AxisTextSize = 8
  Chart.AxisTextBold = false
  Chart.AxisTextBGColor = "ffffff"
  Chart.AxisTextColor = "000000"
  Chart.LabelVertical = false
  Chart.ShowGrid = false
  Chart.GridStyle = 1
  Chart.GridColor = "000000"
  Chart.ShowBarTotal = false
  Chart.VerticalBars = true
  Chart.XValuesVertical = true

  'Stacked Bar Chart Properties
  Chart.ShowStackedValue = false
  Chart.StackedTextFont = "Arial"
  Chart.StackedTextSize = 8
  Chart.StackedTextBGColor = "ffffff"
  Chart.StackedTextColor = "000000"
  Chart.StackedTextTransparent = true
  Chart.StackedTextAlign = 0

  'Line Graph Properties
  Chart.XTop = 0
  Chart.XGrad = 0
  Chart.LineWidth = 1
  Chart.PointStyle = 0
  Chart.PointSize = 2
  Chart.UseXAxisLabels = false
  Chart.UseYAxisLabels = false
  Chart.XAxisNegative = 0
  Chart.YAxisNegative = 0
  Chart.XOffset = 0
  Chart.YOffset = 0
  Chart.XMarkSize = 4
  Chart.YMarkSize = 4
  Chart.HideVGrid = false
  Chart.HideHGrid = false

  'Line Graph Text Properties
  Chart.LineGraphTextFont = "Arial"
  Chart.LineGraphTextBGColor = "ffffff"
  Chart.LineGraphTextColor = "000000"
  Chart.LineGraphTextSize = 8
  Chart.LineGraphTextBold = false
  Chart.LineGraphTextAlign = 0
  Chart.LineGraphTextX = 0
  Chart.LineGraphTextY = 0
  Chart.LineGraphTextBorder = false
  Chart.LineGraphTextLeader = false
  Chart.LineGraphBorderColor = "000000"
  Chart.LineGraphLeaderColor = "000000"

  'General Properties
  Chart.Width = 400
  Chart.Height = 300
  Chart.BGColor = "ffffff"
  Chart.PlotAreaColor = "ffffff"
  Chart.ShowPlotBorder = false
  Chart.GraphPen = "000000"
  Chart.LegendX = 320
  Chart.LegendY = 20
  Chart.Square = 8
  Chart.Padding = 5
  Chart.ShowLegend = true
  Chart.ShowLegendBox = true
  Chart.LegendTextSize = 8
  Chart.LegendFont = "Arial"
  Chart.LegendBGColor = "ffffff"
  Chart.LegendColor = "000000"
  Chart.LegendVertical = true
  Chart.LegendAlign = 0
  Chart.ShowNumbers = true
  Chart.ShowLabel = true
  Chart.LabelFont = "Arial"
  Chart.LabelSize = 8
  Chart.LabelBold = false
  Chart.LabelBGColor = "ffffff"
  Chart.LabelColor = "000000"
  Chart.Title = "饼状图"
  Chart.TitleX = 0
  Chart.TitleY = 0
  Chart.TitleFont = "Arial"
  Chart.TitleSize = 8
  Chart.TitleBold = false
  Chart.TitleBGColor = "ffffff"
  Chart.TitleColor = "000000"
  Chart.TitleTextAlign = 0
  Chart.JpegQuality = 100
  Chart.RNDColor = 0
  Chart.Decimals = 0
  Chart.ShowSeparator = false
  Chart.Prefix = ""
  Chart.Suffix = ""
  Chart.Transparent = false
  Chart.TransColor = "ffffff"
  Chart.ShowPlotBorder = false
  Chart.UseLZW = true
'..........................................................................................
  'These 3 lines add some data for pie or bar charts
'  Chart.AddData "Item1", 17, "ff0000"
'  Chart.AddData "Item2", 28, "00ff00"
'  Chart.AddData "Item3", 5, "0000ff"
'..........................................................................................
sz_str1=split(tj_str1,",")
sz_str2=split(tj_str2,",")
sz_str3=split(tj_str3,",")
for i=0 to ubound(sz_str1)
if request.querystring("mode")="" then
    Chart.AddData sz_str1(i), sz_str2(i), sz_color(i mod 11)
else
    Chart.AddData sz_str1(i), sz_str3(i), sz_color(i mod 11)
end if
next
'..........................................................................................

  'These 4 lines add some points for a sample line graph
  Chart.AddPoint 0, 0, "ff0000", "Line1"
  Chart.AddPoint 30, 30, "ff0000", ""
  Chart.AddPoint 0, 10, "00ff00", "Line2"
  Chart.AddPoint 30, 25, "00ff00", ""

  'These 4 lines add some data for a stacked bar chart
  Chart.AddGroupedData "January", "Red things", 17, "ff0000"
  Chart.AddGroupedData "January", "Blue things", 28, "0000ff"
  Chart.AddGroupedData "February", "Red things", 5, "ff0000"
  Chart.AddGroupedData "February", "Blue things", 14, "0000ff"

  Response.ContentType = "Image/Gif"

  'Use one of the following lines to display a sample in GIF format

  Response.BinaryWrite Chart.GIFPie
  'Response.BinaryWrite Chart.GIFBar
  'Response.BinaryWrite Chart.GIFLine
  'Response.BinaryWrite Chart.GIFStackedBar
%>

这段代码看不明白,也不知道是什么意思
望高手指点一二
搜索更多相关主题的帖子: 代码 
2008-12-15 13:22
lackyking
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:186
专家分:0
注 册:2008-7-1
收藏
得分:0 
用asp画图,一般可以用来制统计图

http://www.,木公博客
2008-12-15 13:29
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
Set Chart = Server.CreateObject("csDrawGraph.Draw")
这个可能是自定义的ActiveX组件(已经将源代码封装入DLL文件的一种外部调用组件)
2楼分析得也是有道理,从代码来看很像画图组件。
2008-12-15 15:06
孙克孝
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2008-9-24
收藏
得分:0 
不知道!
2008-12-16 12:56
gzbhappy
Rank: 2
等 级:论坛游民
帖 子:173
专家分:10
注 册:2008-3-30
收藏
得分:0 
还是看不明白是怎么回事
2008-12-16 18:15
gzbhappy
Rank: 2
等 级:论坛游民
帖 子:173
专家分:10
注 册:2008-3-30
收藏
得分:0 
要是自定义的ActiveX组件(已经将源代码封装入DLL文件的一种外部调用组件),这个该怎么用呢,十分不解,大家帮忙分析分析!
2008-12-16 18:42
gzbhappy
Rank: 2
等 级:论坛游民
帖 子:173
专家分:10
注 册:2008-3-30
收藏
得分:0 
要是自定义的ActiveX组件(已经将源代码封装入DLL文件的一种外部调用组件),这个该怎么用呢,十分不解,大家帮忙分析分析!
2008-12-16 18:42
快速回复:不明白的代码?什么意思啊
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022976 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved