http://developer.netscape.com/docs/technote/javascript/graph/

解决方案 »

  1.   

    CSDN上原来的帖子有,我看到过,自己找一下。
      

  2.   

    用xml+xsl+VBscript
    然后让程序动态生成xml就可以了template如下:<SCRIPT language="vbscript">
    sub window_onload()Dim length,i
    Dim categories(<xsl:value-of select="count(Chart/Xaxis/Category)"/>), values(<xsl:value-of select="count(Chart/Bar[position()=1]/Data)"/>)
    '将横坐标的值赋给Vbscript环境下的数组categories
    <xsl:for-each select="Chart/Xaxis/Category">
      categories(<xsl:value-of select="position()"/>) = "<xsl:value-of select="CatTitle"/>"
    </xsl:for-each>
    ChartSpace1.Charts.Add '将图表添加到图表工作区中
    '将变量c设置为 Constants 属性所返回的对象,
    '因为在 VBScript 中不能使用已命名的常量
    Set c = ChartSpace1.Constants
    ChartSpace1.Charts(0).hastitle=true '图表有标题
    ChartSpace1.Charts(0).Title.Font.Name = "仿宋_GB231280" '标题字体
    ChartSpace1.Charts(0).Title.Font.size=20 '标题字体大小
    ChartSpace1.Charts(0).Title.caption="<xsl:value-of select="Chart/Title"/>" '标题内容
    ChartSpace1.Charts(0).HasLegend = True '指定图表具有图例
    ChartSpace1.Charts(0).Legend.Select
    ChartSpace1.Selection.Position = 2ChartSpace1.Charts(0).PlotArea.Interior.Color="white"
    ChartSpace1.Charts(0).PlotArea.border.Color="white"
    ChartSpace1.Charts(0).axes(0).majorgridlines.line.color = "white"'给图表赋横坐标的值
    ChartSpace1.Charts(0).Setdata c.chDimCategories, c.chDataLiteral,categories<xsl:for-each select="Chart/Bar">
        <xsl:if test="position() > 1">
         ChartSpace1.Charts(0).SeriesCollection.Add
        </xsl:if>
    ChartSpace1.Charts(0).SeriesCollection(<xsl:value-of select="position()-1"/>).Caption="<xsl:value-of select="Title"/>"
    ChartSpace1.Charts(0).SeriesCollection(<xsl:value-of select="position()-1"/>).MarkerSize = 2
    <xsl:for-each select="Data">
    values(<xsl:value-of select="position()"/>) =  "<xsl:value-of select="."/>"
    </xsl:for-each> ChartSpace1.Charts(0).SeriesCollection(<xsl:value-of select="position()-1"/>).type = <xsl:value-of select="Type"/>
    ChartSpace1.Charts(0).SeriesCollection(<xsl:value-of select="position()-1"/>).Setdata c.chDimValues, c.chDataLiteral, values
    </xsl:for-each>
    '指定纵坐标轴有标题,并赋值,然后指定数据的显示格式
    ChartSpace1.Charts(0).axes(c.chAxisPositionLeft).hastitle=true
    ChartSpace1.Charts(0).axes(c.chAxisPositionLeft).title.caption="<xsl:value-of select="Chart/Yaxis/Title"/>"
    ChartSpace1.Charts(0).Axes(c.chAxisPositionLeft).NumberFormat = "0.##"
    '指定横坐标轴有标题,并赋值
    ChartSpace1.Charts(0).axes(c.chAxisPositionBottom).hastitle=true
    ChartSpace1.Charts(0).axes(c.chAxisPositionBottom).title.caption="<xsl:value-of select="Chart/Xaxis/Title"/>"end sub
    </SCRIPT>
    以上是我前次项目的一部分。你可以参考一下
      

  3.   

    如果需要时时显示,估计需要用到组建,一是js速度比较慢,而是没有提供图形处理功能。
    也许可以用vml,不过如果是象股票分析那样,还是别用,刷新速度太慢,会闪烁,搂住可以考虑使用java,那会好一点,对于一般的图形要求java可以满足了。
    听到时时就头痛,单纯的用frame可能无法使用缓冲的技术,实现不了时时要求。
      

  4.   

    客户端实现:
    vml(仅IE)http://expert.csdn.net/Expert/TopicView1.asp?id=840502
    activex(仅IE)http://expert.csdn.net/Expert/topicview.asp?id=956699
    script(IE,NS,MOZ)http://expert.csdn.net/Expert/TopicView1.asp?id=1238516组件:
    http://www.fcsoft.com.cn:8080/webgraphsample/index.htm
    http://www.object-refinery.com/jfreechart/
    ...