Errore 438 Proprietà O Metodo Non Supportati Dall'oggetto Aprendo

[misonsanbea]

grazie a tutti gli amici

da dentro una pagina ASP voglio aprire un file XLS.

il codice usato è il seguente

Dim oApp, oWks, oSheet '<-- creo gli oggetti dichiarandone i tipi

Set oApp = CreateObject("Excel.Application") '<-- assegno all'oggetto l'istanza di Excel

if Err.Number <> 0 then

MessErroreListino = "caricatoOrdiniXls check_01 - Errore " & err.number & " " & Err.description

exit function

end if

Set oWks = oApp.Workbooks

Set oSheet = oWks.Worksheets

if Err.Number <> 0 then

MessErroreListino = "caricatoOrdiniXls check_02 - Errore " & err.number & " " & Err.description

exit function

end if

esce sulla definizione in rosso con il codice d'errore 438 Proprietà o metodo non supportati dall'oggetto

qualcuno sa darmi una mano ?

grazie

Moreno