Hola otra vez.
Lo he hecho asi:
<%
Dim cond
Set cond = Server.CreateObject("ADODB.Connection")
cond.Open "DSN.email"
cond.Execute "Update email set estado = 1"
%>
Y me ha actualizado la db entera de un tirón.
Si funcina supongo que será correcto ¿no?
Saludos y Gracias.