📄 pie.asp

📁 集合了学习asp的100个实例

💻 ASP

字号:

<html>

<head>

<title>AspChart组件示例(立体饼状图)</title>

</head>

<body bgcolor=white>

<blockquote>

<center>

<h2>AspChart组件示例(立体饼状图)</h2>

<%

  Dim Chart

  cBar    = 1

  cPie    = 3

  cNone    = 0

  cRectGradient =6

  Set Chart = Server.CreateObject ("ASPChart.Chart")

  Chart.AddSeries (cPie)

  Chart.AddValue 200, "第一小组", vbBlue

  Chart.AddValue 233, "第二小组", vbRed

  Chart.AddValue 220, "第三小组", vbGreen

  Chart.PanelColor = vbWhite

  Chart.BevelOuter = cNone

  Chart.ChartBGColor = vbWhite

  Chart.HintsVisible = true

  Chart.Height = 200

  Chart.Width = 550

  Chart.FileName = "c:\inetpub\wwwroot\images\smpchrt5.jpg"

  Chart.SaveChart

  Response.Write "<img src=""/images/smpchrt5.jpg""><p><br></p><p><br></p>"

  Set Chart = nothing

%>

</center>

</blockquote>

</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -