Den här koden funkar att köra från en Windowsapplication men ej ifrån en aspX sida vet någo varför ?

Private Sub ExportToExcel()

Dim ea As New Excel.Application()
Dim wb As Excel.Workbook
Dim ws As Excel.Worksheet
Dim r As Excel.Range

wb = ea.Workbooks.Open("c:/kontaktmall")

ws = wb.Worksheets("A-Prospects")

r = ws.Range("A8:I8")
r(1, 1) = 1
r(1, 2) = "2002-03-15"
r(1, 3) = "Saab Aviocomp"
r(1, 4) = "Brandväggsjobb"
r(1, 5) = "Thomas Ericsson"
r(1, 6) = ""
r(1, 7) = 50
r(1, 8) = "2002-12-31"

' bort filen för att inte få upp dialog (vill du skriva över)
System.IO.File.Delete("c:/res.xls")

wb.SaveAs("c:/res.xls")
ea.Quit()

'excel avslutas inte med en gång
'vet ej om det avslutas efter en tid av inaktivitet

End Sub


Ni får gärna skicka kod om hur jag ska göra !!!!!!

Hej!
Kan tyvärr inte svara på varför det inte funkar från en aspX sida.
En tanke slog mig bara lite snabbt. Finns Excel installerat på webservern?

Dessutom tänkte jag bidra med ett litet tips.

Du använder följande rad:
' bort filen för att inte få upp dialog (vill du skriva över)
System.IO.File.Delete("c:/res.xls")

Istället skulle du kunna använda en rad som gör att Excel applikationen inte visar nån fråga, så slipper du ta bort filen.

' stänger av varningsmeddelanden och frågor
ea.DisplayAlerts=False

Och sen om du av någon anledning vill ställa tillbaka det.

' sätter igång varningsmeddelanden och frågor
ea.DisplayAlerts=True

Mvh
/Magnus