Ciao a tutti vovelo attraverso uno script aggiornare delle
tabelle di MSAccess; ho provato però non funziona, chi sa aiutarmi in merito?allego il
codice per maggior chiarezza
<%@ Language=VBScript %>
<%
Dim adoCon, objRS, strSQl
'Istanzio l'oggetto Connection
'Set adoCon = Server.CreateObject("ADODB.Connection")
Set adoCon = CreateObject("ADODB.Connection")
'apertura connessione
adoCon.Open = "Provider=Microsoft.Jet.OLEDB.4.0;DataSource="c:\d ataEntry\public\Dati\Gestione_Distributori.mdb";Pe rsist Security Info=False";"
'select
strSQl = "insert into BT_domestici_r select * from BT_domestici"
'definizione oggetto recorset
'Set objRS = Server.CreateObject("ADODB.Recordset")
Set objRS = CreateObject("ADODB.Recordset")
objRS.execute strSQl, adoCon, 1
'chiusura del recorset
objRS.Close
'elimino l'oggetto recorset
Set objRS = Nothing
'chiusura oggetto connessione
adoCon.Close
Set adoCon = Nothing
%>
grazie mille
giuseppe