Ho trovato questo esempio per creare un file excel,
ma mi da errore sulla prima riga e precisamente:


Errore di run-time di Microsoft VBScript (0x800A0046)
Autorizzazione negata: 'CreateObject'
/varie/excel2.asp, line 1
--------------------------------------------------------------


1 - Set objXL = CreateObject("Excel.Application")

objXL.visible=true
objXL.Workbooks.add 'Aggiunge un foglio vuoto

objXL.Sheets(1).Name = "Giovanni"
objXL.Sheets(1).select

'Ora scrivo l'intestazione nella cella B1
objXL.cells(1,2)="Intestazione"


'trova l'ultima Riga occupata dai dati...
'partendo dal fondo così risolvo eventuali celle vuote nelle intestazioni.
UltimaRiga=10000
do while objxl.cells(ultimaRiga,1)=""
UltimaRiga=UltimaRiga-1
loop
'Ora UltimaRiga ha un valore valido

objXL.cells(1,1).Select 'seleziona la cella a1

set obXL=nothing