RE: VB Collections in ASP

[Software FX]

>> Is it possible to use a VB Collection in ASP to pass data to ChartFX2000? 

Yes. The CfxData.Array supports VBScript arrays and objects that support the IEnumVariant COM interface (We have tested VB collections under VB and they work fine).

Is there a way for you to send us the QuerySelector object so that we can test why your code is not working ? 

Regards, 

Juan Cegarra 

Software FX, Inc. 

http://support.softwarefx.com 

-----Original Message----- 

From: Tarik Khan [ mailto:tkhan@hydro.mb.ca] 

Posted At: Thursday, July 13, 2000 12:13 PM 

Posted To: Server 

Conversation: VB Collections in ASP 

Subject: VB Collections in ASP 

Is it possible to use a VB Collection in ASP to pass data to ChartFX2000? 

This seems similar to passing arrays to ChartFX but I cannot get the chart 

to generate my data. Here is the code I use to generate the chart. 

<% 

Set ChartFX1=Server.CreateObject("ChartFX.WebServer.4") 

Set Data=Server.CreateObject("QuerySelector") 

Set CfxArray = CreateObject("CfxData.Array") 

Server.ScriptTimeout=360 

Connect = Data.connectDB() 

Response.Write(connect) 

Query = Data.getEnergyCon(start,tend,CustID) 

Response.Write(Query) 

ChartFX1.RgbBk=RGB(255,255,255) 

 ChartFX1.Rgb2DBK=RGB(178,176,176) 

 ChartFX1.ChartType=LINES 

 ChartFX1.Chart3D=false 

 ChartFX1.AllowDrag=false 

 ChartFX1.AllowEdit=false 

 ChartFX1.SerLegBox=true 

 ChartFX1.ToolBar=true 

 ChartFX1.SerLegBoxObj.Docked=TGFP_BOTTOM 

 ChartFX1.MarkerShape=0 

 Set myKW = Data.theKW       ' this is a VB Collection Object 

 Set myKVAR = Data.theKVAR   'this is a second VB Collection Object 

 CfxArray.AddArray myKW 

 CfxArray.AddArray myKVAR 

 ChartFX1.serleg(0)="KW" 

 ChartFX1.serleg(1)="KVAR" 

 ChartFX1.DataType(0)=CDT_VALUE 

 ChartFX1.DataType(1)=CDT_VALUE 

  ChartFX1.GetExternalData CfxArray 

%> 

<%=ChartFX1.GetHtmlTag("95%","90%") 

%> 

Tarik Khan 

Manitoba Hydro