PublicEvent EventHandler OnMyFunction
' call this method and the above event gets firedPrivateSub TriggerEvent()
Private Thingy as MyThingy()
Thingy = New MyThingy
' and since we wired the event to a specific method (in this class), AddHandler Thingy.OnMyFunction, AddressOf LocalOnMyFunctionImplementation
EndSub' causing this method to executePublicOverridableSub LocalOnMyFunctionImplementation(Objectas Sender, e As EventArgs)
Just learning it.
Bastard Programmer from Hell if you can't read my code, try converting it here[^]
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 - InitializationDim oRs, oRs2, strQuery
'strXML will be used to store the entire XML document generatedDim strXML
'Create the recordset to retrieve dataSet 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 factorySet 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 recordsetSet oRs2 = Nothing
Wend'Finally, close <chart> element
strXML = strXML & "</chart>"Response.Buffer=trueresponse.write strXML
'response.end Set oRs = nothing'Create the chart - Line Chart with data from strXMLCall renderChart("MyWeb/includes/FCF_Line.swf", "", strXML, "FactorySum", 650, 450)
Chances are really god that you're going to have to ask your question here[^] because you're trying to use a 3rd party library. The odds of someone here who has used this thing and wandering by your question are slim. If you've got questions about a library, you go to a forum dedicated to that library for the best chance of getting your questions answered.
First of all I want to apologize in advance if this is the wrong section to post this. I was looking for VBScript section and I wasn't able to find one. I have a Database (Access) and I'm trying to insert information in it. I keep getting the following error:
Microsoft JET Database Engine error '80040e07'
Data type mismatch in criteria expression.
/ordersconnection3.asp, line 33
There are around 19 fields. Some are defined as text, number, currency, date/time. How do I define the variables datatype in VBscrpit. On Visual Basic it was as easy as Dim X As Double. From what I've researched As in Dim is not allowed.
Last Visit: 31-Dec-99 19:00 Last Update: 25-Mar-17 7:12