Chiedo scusa per utilizzare questo canale improprio per un problema banale.
In una pagina .asp ho la necessità di elaborare dati presenti su .xls utilizzando ado.
La logica prevede di aggiornare alcune celle del file .cls con dati presenti su un recordset access.
Non riesco ad aggiornare le celle del file ,xls

Ho provato varie soluzioni

1) soluzione

xls_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & NomeFile & "; Extended Properties=""Excel 8.0;HDR=Yes;"""
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open xls_Conn_Str

Strsql = "UPDATE [Foglio1$] SET " & _
" Comunicazione = " & AdjustSql(x_Comunicazione) & _
", DataCom = " & AdjustSql(DtDec)


objConn.Execute(Strsql)

2) soluzione

SQL = "SELECT * from [Foglio1$]"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, objconn, ,adLockOptimistic
rs.Fields(0).value = x_Comunicazione
rs.Fields(6).value = DtDec
rs.Update

3) soluzione

Strsql = "SELECT * from [Foglio1$]"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open Strsql, objConn, adOpenStatic
do while not rs.eof
rs.Fields(0).Value = x_Comunicazione
rs.Fields(6).Value = DtDec
rs.Update
rs.movenext
loop


4) soluzione

Strsql = "SELECT * from [Foglio1$]"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open Strsql, objConn, adOpenStatic
do while not rs.eof
Strsql1 = "UPDATE [Foglio1$] SET " & _
" Comunicazione = " & AdjustSql(x_Comunicazione) & _
" WHERE Matricola=" & rs(1)

objConn.Execute(Strsql1)
rs.movenext
loop

Potete aiutarmi ?
Grazie ancora per l'uso improprio dello spazio, ma non so come altro fare.
ciao
Moreno