A
Aymer
Scenario: On a web page, I have a pivotable and pivotchart. The pivotchart's datasource is pointed to the pivottable. I use a data-stored xml string of a previous pivotchart for the chart layout. The previous chart's xml string was saved as a 3d graph, however, when the chart image is rendered into the page, the chart is in 2d.
Problem: How can Idisplay the image as a 3d chart?
Additional Information: I am using asp vbscript server-side code. In my office computer, the program works perfectly. The image renders 3d. In my laptop, the image renders 2d. I figure there is a setting in my laptop that will allow me to render chart images in 3d.
Here is the code:
<%@ Language=VBScript %><% option explicit %><%
Dim strTableXML
strTableXML = request.Form("tableXML")
Dim strChartXML
strChartXML = request.Form("chartXML")
Dim oChart, cConst, oData, oTable, iStart, iLen, oview
Set oTable = server.CreateObject("OWC10.PivotTable")
Set oChart = server.CreateObject("OWC10.Chartspace")
Set cConst = oChart.Constants
set oData = oChart.Charts.Add()
Set oView = oTable.ActiveView
oTable.XMLData = strTableXML
oChart.XMLData = strChartXML
oChart.DataSource = oTable
oChart.PlotAllAggregates = 1
oChart.Charts(0).HasLegend = true
oChart.DisplayToolbar = False
oChart.DisplayFieldButtons = False
oChart.AllowPropertyToolbox = False
Response.ContentType = "image/GIF"
Response.BinaryWrite oChart.GetPicture("GIF", 800,450)
%>
peace,
aymer
aymerb1980[@]hotmail.com
Problem: How can Idisplay the image as a 3d chart?
Additional Information: I am using asp vbscript server-side code. In my office computer, the program works perfectly. The image renders 3d. In my laptop, the image renders 2d. I figure there is a setting in my laptop that will allow me to render chart images in 3d.
Here is the code:
<%@ Language=VBScript %><% option explicit %><%
Dim strTableXML
strTableXML = request.Form("tableXML")
Dim strChartXML
strChartXML = request.Form("chartXML")
Dim oChart, cConst, oData, oTable, iStart, iLen, oview
Set oTable = server.CreateObject("OWC10.PivotTable")
Set oChart = server.CreateObject("OWC10.Chartspace")
Set cConst = oChart.Constants
set oData = oChart.Charts.Add()
Set oView = oTable.ActiveView
oTable.XMLData = strTableXML
oChart.XMLData = strChartXML
oChart.DataSource = oTable
oChart.PlotAllAggregates = 1
oChart.Charts(0).HasLegend = true
oChart.DisplayToolbar = False
oChart.DisplayFieldButtons = False
oChart.AllowPropertyToolbox = False
Response.ContentType = "image/GIF"
Response.BinaryWrite oChart.GetPicture("GIF", 800,450)
%>
peace,
aymer
aymerb1980[@]hotmail.com