codice:
<%
Dim objConn
Set objConn= Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("AddressBook.mdb")
objConn.open
' Recupero variabili provenienti da Flash
Notes = request("Notes")
sq_casa = request("sq_casa")
sq_trasf = request("sq_trasf")
id = request("id")
sqlString = "UPDATE Contacts SET Notes = '" & Notes & "', sq_casa ='" & sq_casa & "' , sq_trasf = '" & sq_trasf & "' WHERE id = " & id
objConn.Execute sqlString
Response.write("insereted=true")
objConn.Close
Set objConn = Nothing
%>