Hola Edan16
Eso sale cuando querés hacer un update desde un RecordSet, y no lo has abierto en el modo correcto.
Una forma muy sencilla y que a mi me ha dado excelentes resultados para evitarme talse problemas es la siguiente:
Código PHP:
'Creamos un objeto conexión y lo abrimos'
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DBQ="& curDir...
'Creamos un Objeto RecordSet y o asignamos a dicha conexión'
Dim Rs
Set Rs = Server.CreateObject("ADODB.Recordset")
Set Rs.ActiveConnection = Conn
'Para consultas (SELECT) usamos el objeto Recordset'
Rs.source= "select * from origen order by numero"
Rs.Open
'Hasta allí todo igual ¿cierto?, aquí viene la diferencia'
'Para inserts, deletes y updates NO USAMOS el objeto Recordset'
'Lo hacemos directamente con el objeto conexión'
Conn.Execute "insert into origen (numero, nombre) values ..."
Conn.Execute "delete from origen where numero = ..."
Conn.Execute "update origen set nombre = ..."
Suerte
