fogli excel con asp

[paolaccio]

salve a tuttti..
Ho l'esigenza di creare un file excel in asp ma con due fogli di lavoro..
per crearne uno uso le istruzioni:

response.buffer = true
response.ContentType = "application/vnd.ms-excel"
response.AddHeader "content-disposition", "inline; filename=" & FileName1 %>


avete suggerimenti?
grazie in anticipo
ciao paolo

[Vitacillina]

Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Visible = false  

Set objWorkbook = ExcelApp.Workbooks.Add()
Set objWorksheet = objWorkbook.Worksheets(1)
Set colSheets = objWorkbook.Sheets
colSheets.Add objWorksheet,,3

ExcelApp.Workbooks(1).WorkSheets(1).Name = "A"
ExcelApp.Workbooks(1).WorkSheets(2).Name = "B"
ExcelApp.Workbooks(1).WorkSheets(3).Name = "C"
ExcelApp.Workbooks(1).WorkSheets(4).Name = "D"

Const xl_AlignmentCenter = &HEFF4

ExcelApp.Sheets("A").Select
ExcelApp.Range("A1").Select
ExcelApp.ActiveCell.Value = "AAA"
ExcelApp.Range("A1").HorizontalAlignment = xl_AlignmentCenter
ExcelApp.ActiveCell.Borders.Color = RGB(0, 0, 0)
ExcelApp.ActiveCell.Font.Name = "Arial" 
ExcelApp.ActiveCell.Font.Bold = True
ExcelApp.ActiveCell.Font.Size = 8
ExcelApp.ActiveCell.Font.Color = vbBlack
ExcelApp.ActiveCell.Interior.ColorIndex = 44
ExcelApp.ActiveCell.ColumnWidth = 27

objWorkbook.Worksheets(6).Delete 
objWorkbook.Worksheets(5).Delete

ExcelApp.ActiveWorkbook.SaveAs(Server.MapPath("F.xls"))
ExcelApp.Quit

Set ExcelApp = Nothing
Set objWorkbook = Nothing
Set objWorksheet = Nothing
Set colSheets = Nothing

[paolaccio]

greazie mille per il codice..

ho provato a creare un file .asp con il tuo codice ma quando richiamo la ppagina mi dà il seguente errore..

Microsoft VBScript runtime error '800a01ad'

ActiveX component can't create object: 'application/vnd.ms-excel'


sapresti indicarmi il tipo di problema??
grazie ancora

[paolaccio]

scusa l'errore è il seguente..

Microsoft VBScript runtime error '800a01ad'

ActiveX component can't create object: 'Excel.Application'

[gangalev]

Ciao, per utilizzare il codice che ti è stato suggerito devi avere installato sul server excel altrimenti non puoi utilizzare l'oggetto COM di excel. Se utilizzi l'oggeto COM non è più necessario il codice relativo a contenttype ed header.