Click here to Skip to main content
12,819,538 members (34,154 online)

Visual Basic

 
GeneralRe: Function Not Found From Dll Component Pin
Eddy Vluggen12-Oct-12 2:25
memberEddy Vluggen12-Oct-12 2:25 
GeneralRe: Function Not Found From Dll Component Pin
AmbiguousName12-Oct-12 2:54
memberAmbiguousName12-Oct-12 2:54 
GeneralRe: Function Not Found From Dll Component Pin
Eddy Vluggen12-Oct-12 3:10
memberEddy Vluggen12-Oct-12 3:10 
QuestionBlank Asp webpage. Pin
Member 94936398-Oct-12 1:08
memberMember 94936398-Oct-12 1:08 
Dear all,

The following script is not reading the xml data and translating it into the graph.

The output is currently showing a blank webpage, and I am not sure why is?
<BODY>

   <%   
   'In this example, we show how to connect FusionCharts to a database.
   'For the sake of ease, we've used an Access database which is present in
   '../DB/FactoryDB.mdb. It just contains two tables, which are linked to each
   'other. 

   'Database Objects - Initialization
   Dim oRs, oRs2, strQuery
   'strXML will be used to store the entire XML document generated
   Dim strXML

   'Create the recordset to retrieve data
    Set oRs = Server.CreateObject("ADODB.Recordset")

   'Generate the chart element
    'Generate the chart element
	strXML = "<graph caption='Deals Output report' subCaption='By Quantity' decimalPrecision='0' showNames='1'  numberSuffix=' Units'  pieSliceDepth='30' formatNumberScale='0'>"
	
 'Iterate through each factory
  strQuery = "select * from deal_price2"
  Set oRs = oConnection.Execute(strQuery)

  While Not oRs.Eof

  'Now create second recordset to get details for this factory
  Set oRs2 = Server.CreateObject("ADODB.Recordset")
  strQuery = "select sum(price) as TotOutput from deal_price where deal_id=" &  ors("deal_id")
  Set oRs2 = oConnection.Execute(strQuery) 
  'Generate <set name='..' value='..'/> 
  strXML = strXML & "<set name='" & ors("date") & "' value='" & ors2("TotOutput") & "' />"

	
 'Close recordset
  Set oRs2 = Nothing
  oRs.MoveNext
Wend

 'Finally, close <chart> element
  strXML = strXML & "</chart>"
Response.Buffer=true
response.write strXML
response.flush
'response.end 
  Set oRs = nothing

'Create the chart - Line Chart with data from strXML
 Call renderChart("MyWeb/includes/FCF_Line.swf", "", strXML, "FactorySum", 650, 450)
%>


Any help would be very much appreciated.

Thanks in advance for your help.
AnswerRe: Blank Asp webpage. Pin
Cloud Cray8-Oct-12 8:49
memberCloud Cray8-Oct-12 8:49 
GeneralRe: Blank Asp webpage. Pin
miss7869-Oct-12 2:14
membermiss7869-Oct-12 2:14 
GeneralRe: Blank Asp webpage. Pin
Dave Kreskowiak9-Oct-12 2:51
mvpDave Kreskowiak9-Oct-12 2:51 
GeneralRe: Blank Asp webpage. Pin
Dave Kreskowiak9-Oct-12 2:55
mvpDave Kreskowiak9-Oct-12 2:55 
GeneralRe: Blank Asp webpage. Pin
miss7869-Oct-12 4:54
membermiss7869-Oct-12 4:54 
QuestionQuestion about variables in Classic ASP VBScript Pin
Diego Carrion7-Oct-12 6:32
memberDiego Carrion7-Oct-12 6:32 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.


Advertise | Privacy | Mobile
Web02 | 2.8.170308.1 | Last Updated 22 Mar 2017
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid