I am trying display graphs from ASP page using EXCEL.
I am getting the following error:
Microsoft VBScript compilation error '800a03ee'
Expected ')'
/graphs/graphs.asp, line 17
(Left:=100, Width:=375, Top:=Top1, Height:=225)
-----^
here with I am providing the code which I used for
that.
************************
graphs.asp
<%@ Language=VBScript %>
<%
Dim xlApp
Dim xlWb
Dim xlWs
Dim Top1
Set xlApp = CreateObject("Excel.Application")
Set xlWb = xlApp.Workbooks.Add
Set xlWs = xlWb.Worksheets("Sheet1")
xlApp.Visible = True
xlApp.UserControl = True
For i = 1 To 3
Top1 = (225 + 3) * i
With xlWs.ChartObjects.Add _
(Left:=100, Width:=375, Top:=Top1,
Height:=225)
.Chart.SetSourceData
Source:=Sheets("Sheet1").Range("A3:G14")
.Chart.ChartType = xlXYScatterLines
End With
Next
fname = "test"
fname=fname & replace(date(),"/","_")&"_"&
Replace(Time(),":","_")
fname=fname&".xls"
path =Server.MapPath(".") & "\"& fname
xlwb.saveas (path)
xlApp.Quit ' Release Excel references
Set xlWs = Nothing
Set xlWb = Nothing
Set xlApp = Nothing
%>
************************************
can any one help me to sort out the issue...