Código:
Un saludo set miconexion = Server.CreateObject("ADODB.Connection") miconexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\bbdd.mdb" set rs=Server.CreateObject("ADODB.RecordSet") sql = "SELECT * FROM tabla" rs.open sql, miconexion, 3, 3 if rs.eof then rs.Addnew rs("campo")=campo rs.Update end if