• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 572
  • Last Modified:

How to Use the MS Chart Web Component

I am trying to implement the code found in the MS article "HOW TO: Use Server-Side Charting to Generate Charts Dynamically", which utilizes the Chart Web Component (http://support.microsoft.com/support/kb/articles/Q244/0/49.ASP).  When I run the code, however, I get the error message:  "ActiveX component can't create object: 'OWC.Chart'".

I'm totally new to ASP coding, but is this message not similar to the type of message received when you try to run a Visual Basic ap on a workstation which is missing an .OCX file?

If so, what do I need to install on the web server before I can use this object?  If not, what should I do to get it running?  

0
Dreaming_Eagle
Asked:
Dreaming_Eagle
  • 4
  • 2
1 Solution
 
yas022100Commented:
You need Office 2000, do you have that?
0
 
yas022100Commented:
Or, You may just install OCX, Msowc.dll
0
 
mgfranzCommented:
The ActiveX object needs to be installed client-side.
0
Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
mgfranzCommented:
belay that...
0
 
yas022100Commented:
Snippet of my code...

     <object id=ChartSpace1 classid=CLSID:0002E500-0000-0000-C000-000000000046
     style="width:50;height:50"
     CODEBASE="/otg/MSOWC.CAB#version=9,0,0,2710"
     VIEWASTEXT></object>

     <Script Language="VBScript">

     Sub Window_OnLoad()

        Dim oChart
        Dim oSeries1, oSeries2
        dim oConst
         
        Set oConst = ChartSpace1.Constants
       
        'Create a new chart in the ChartSpace
        Set oChart = ChartSpace1.Charts.Add
         
        'Add a series of type Column
        Set oSeries1 = oChart.SeriesCollection.Add
        With oSeries1
            .SetData oConst.chDimCategories, oConst.chDataLiteral, _
                     Array("S2T3")
            .SetData oConst.chDimValues, oConst.chDataLiteral, _
                     Array(5485)
            .Type = 1
        End With
         
         'Add a second series of type Line
        Set oSeries2 = oChart.SeriesCollection.Add
        With oSeries2
            .SetData oConst.chDimCategories, oConst.chDataLiteral, _
                     Array("S2T3")
            .SetData oConst.chDimValues, oConst.chDataLiteral, _
                     Array(5315)
            .interior.color = "#FFFFFF"
            .Type = 1
        End With
         
          oChart.HasLegend = false
          oChart.Axes(0).HasTickLabels = False
          oChart.Axes(1).HasTickLabels = False
          oChart.Axes(0).HasMinorGridlines = False
          oChart.Axes(0).scaling.maximum = 11500
         
     End Sub
         
     </Script>
0
 
Dreaming_EagleAuthor Commented:
Bingo!  
Thanks.
0
 
yas022100Commented:
Bingo!
Glad I could help!

^_^
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

  • 4
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now