asp e Excel

[tigre2209]

Per leggere un file excel ho provato cosi:

set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
Set sh = Worksheets("Foglio1")

ma alla riga
"Set sh = Worksheets("Foglio1")"

mi da questo errore:
Tipo non corrispondente Worksheets

come posso risolvere?
vorrei copiare le celle su un database cosi;
sh.Range("A1")

[michele.santoro]

Originariamente inviato da tigre2209
Per leggere un file excel ho provato cosi:

set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
Set sh = Worksheets("Foglio1")

ma alla riga
"Set sh = Worksheets("Foglio1")"

mi da questo errore:
Tipo non corrispondente Worksheets

come posso risolvere?
vorrei copiare le celle su un database cosi;
sh.Range("A1")

Provato con :

Set sh = Worksheets("Foglio1$")

Comunque prova anche a fare così:

<%
SQL = "SELECT * from [Foglio1$]"
strProvider="DRIVER=Microsoft Excel Driver (*.xls); DBQ=" & Server.MapPath ("cartel1.xls")  
Set rs = Server.CreateObject("ADODB.recordset") 
rs.Open SQL, strProvider

dove cartel1.xls è il nome del file excel naturalmente.