Cita: Pero requiero que el campo "antiguo" quede intacto a excepción del campo estatus, una vez hecho esto, insertar un nuevo registro .... y a este nuevo registro hacerle la actualización de referencia, supongo que solo es invertir las sentencias SQL ¿o como funciona la prioridad de ejecuciones?
Si mal no te entendí, es precisamente lo que hace el codigo, mira:
Aqui solo actualizas la referencia, el campo te queda intacto
Cita: 'actualizamos el estatus a 1
Sql="UPDATE historia SET estatus = 0, referencia = '" & estatus & "' where id_historial = " & id_historial
oConn.Execute(SQL)
y aqui haces la copia con el campo referencia en 1
Cita:
'y generamos un nuevo registro con los mismos datos pero con estatus 1
Sql="INSERT INTO historia "
Sql=Sql & "SELECT id_tipo, 1,referencia WHERE where id_historial = " & id_historial
Ahora, si no era eso lo que habías explicado, hazlo con dibujitos porque como es Lunes ando muuuuyyyy lento
Saludos!