|
ax.MajorTickMarks = oconst.chTickMarkNone(不显示数值轴主要刻度线)
ax.MajorGridlines.Line.Color ="white" (设置指定坐标轴上主网格线的颜色和线宽)
ax.MajorGridlines.Line.Weight = 5
分类(X)轴标题它是用于描述分类轴绘制内容的标题。
s e t a x = o c h a r t . A x e s ( o c o n s t .chAxisPositionBottom)
ax.hastitle=true(显示分类轴标题)
ax.Title.Caption= “季度”(设置分类轴标题的内容)
set fnt=ax.title.font(以下为设置分类轴标题的字体、字号、颜色、字形)
fnt.name=“黑体”
fnt.size=“10”
fnt.color=“#000000”
fnt.bold=true
fnt.italic=true
分类(X)标志也称为刻度线标志。这些标志显示了分类轴上的分类名称。分类是由图表中每个数据系列的一个数据点构成的一组相关数据点。
a x . P o s i t i o n = o c o n s t .chAxisPositionBottom (指定分类标志的显示位置，对有些图表显示类型，该设定不起作用。指定图表显示类型为折线型时可看到设定的效果)
分类标志显示内容的设置见“数据标志”。
图例为图表中数据系列或分类指定的图案或颜色标示。
ochart.HasLegend=True(显示图例)
oChart.Legend.Position = oconst.
chLegendPositionLeft (设置图例的位置在左边，位置可修改)
系列名称是一个名称，用于描述构成一个数据系列的一组相关数据点。系列名称显示在图例项标识旁的图例中。在前面的图表示例中，“预计”和“实际”都是对应于图表中数据标记的系列名称。
set fnt=oChart.Legend.Font (以下为设置系列名称的字体、字号、颜色、字形)
fnt.name=“黑体”
fnt.size=“10”
fnt.color=“#000000”
fnt.bold=true
fnt.italic=true
数据标志它是用于提供有关数据标记附加信息的标志，而其中的数据标记则代表单个数据点或值。对于不同的图表类型，数据标志可以显示值、数据系列或分类的名称、百分比，或者显示这些项的组合。
set oseries(i)=oChart.SeriesCollection.add ' 生成一条series 曲线
with oseries(i)
.DataLabelsCollection.Add(在指定系列中添加数据标志)
.caption=“XXXX”(设置分类标志显示的具体内容)
.SetData oconst.chDimCategories,oconst.chDataLiteral,XXX (设置X轴的数据值)
.SetData oconst.chDimValues,oconst.chDataLiteral,XXX(设置Y 轴的数据值)
.type=0(设置图表显示的类型，0 表示普通柱形图)
end with
对照图片，我们可以知道，X 轴为日期(季度)，Y轴为销售额，绘图区为具体的销售额数据。
OWC支持在同一张图表中显示两条以上的曲线(或两个不同颜色的柱子，如上图所示的预计与实际)。因此，要生成我们所看到的图片，只需先生成一条series 曲线(即在绘图区中先绘出预计的销售额图表)，然后再添加一条series曲线(即在绘图区中绘出实际的销售额图表)就行了
先定义及设置参数
dim strChartAbsPath
dim strChartRelPath
strChartAbsPath = Server.MapPath("temp")
strChartRelPath = "temp"
以下是生成、删除图片的函数
Function ExportChartToGIF(objCSpace, strAbsFilePath, strRelFilePath)
Dim strFileName
Randomize
strFileName = Timer & Rnd & ".gif"
o b j C S p a c e . E x p o r t P i c t u r estrAbsFilePath & "/" & strFileName, "gif",300(图片高度), 500(图片宽度，以上两值均可由程序动态设置))
ExportChartToGIF = strRelFilePath &"/" & strFileName
上一篇:ASP用规则公式确认表单输入
下一篇:ASP实用函数库(5)
|
精品推荐