Jump to content
Software FX Community

Problem supplying data to a chart using VBScript


User (Legacy)

Recommended Posts

From: "Mike Evans" <mikeevans850@hotmail.com>

Subject: Problem supplying data to a chart using VBScript

Date: Wed, 5 Jun 2002 22:21:54 +0100

Lines: 98

X-Priority: 3

X-MSMail-Priority: Normal

X-Newsreader: Microsoft Outlook Express 6.00.2600.0000

X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000

Message-ID: <6ZrtScNDCHA.2452@webserver1.softwarefx.com>

Newsgroups: chartfx.internet.55

Path: webserver1.softwarefx.com

Xref: webserver1.softwarefx.com chartfx.internet.55:1044

NNTP-Posting-Host: pc-62-30-120-183-cr.blueyonder.co.uk 62.30.120.183

Hello!

I have taken the code below directly from your help file.

Supplying dynamic data using VBScript.

Chart FX can also receive the data to be charted using VBScript (or

JavaScript). You can use VBScript to supply the data as follows

<OBJECT CLASSID="CLSID:21F49842-BFA9-11d2-A89C-00104B62BDDA"

TYPE="application/x-oleobject"

WIDTH="500" HEIGHT="350" ID="Chart1"

CODEBASE=/download/CfxIEAx.cab#Version=4,4,11,3>

<PARAM NAME="LICENSE" VALUE="/license/CfxIE.lic">

</OBJECT>

<SCRIPT LANGUAGE="VBS">

SUB Window_OnLoad

Chart1.OpenDataEx 1,2,4

' First series (set of data)

Chart1.ThisSeries = 0

Chart1.Value(0) = 20.5

Chart1.Value(1) = 16

Chart1.Value(2) = 30

Chart1.Value(3) = 12.4

' First series (set of data)

Chart1.ThisSeries = 1

Chart1.Value(0) = 32

Chart1.Value(1) = 16.2

Chart1.Value(2) = 17

Chart1.Value(3) = 19

Chart1.CloseData 1

END SUB

</SCRIPT>

I then incorporated it into the following ASP page

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

<OBJECT CLASSID="CLSID:21F49842-BFA9-11d2-A89C-00104B62BDDA"

TYPE="application/x-oleobject"

WIDTH="500" HEIGHT="350" ID="Chart1"

CODEBASE=/download/CfxIEAx.cab#Version=4,4,11,3>

<PARAM NAME="LICENSE" VALUE="/license/CfxIE.lic">

<PARAM NAME="TITLE(1)" VALUE="This is a test for the PARAM tag">

</OBJECT>

<SCRIPT LANGUAGE="VBS">

SUB Window_OnLoad()

Chart1.OpenDataEx 1,2,4

' First series (set of data)

Chart1.ThisSeries = 0

Chart1.Value(0) = 20.5

Chart1.Value(1) = 16

Chart1.Value(2) = 30

Chart1.Value(3) = 12.4

' First series (set of data)

Chart1.ThisSeries = 1

Chart1.Value(0) = 32

Chart1.Value(1) = 16.2

Chart1.Value(2) = 17

Chart1.Value(3) = 19

Chart1.CloseData 1

END SUB

</SCRIPT>

<body bgcolor="#FFFFFF" text="#000000" onLoad="Window_OnLoad()">

Supplying dynamic data using VBScript.

Chart FX can also receive the data to be charted using VBScript (or

JavaScript). You can use VBScript to supply the data as follows

</body>

</html>

For some very annoying reason this does not work. PLEASE can someone help

me asap. Ideally can anyone provide a working example of the above code? I

need the <PARAM NAME="TITLE(1)" VALUE="This is a test for the PARAM tag">

line to stay as I may need to set certain attributes via the client rather

than ASP. I know it sounds strange, but I have my reasons which are too

long and boring to go through here!

Cheers

Mike

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...