Haber, como introducir un dato en toda la db a la vez

[almaluz]

Hola,

Necesito introducir un dato en toda la base de datos.

Ejemplo:

reemplazar todos los registros "estado" con 1,
o
reemplazar todos los registros "pueblo" con Sevilla

Como podria introducir una instrucción de este tipo?, es que tengo una base de datos de email con 3000 emails y le he añadido un campo más "estado" y me gustaria ponerlo todo a 1

supongo que es facil pero no se por donde empezar, supongo que habra que hacer algo asi...

crear objeto conexion
crear objeto recordset
crear sql "Replace estado from email with 1" ? ( no se que poner)
ejecutar recordset
cerrar y destryur conexiones

Una ayudita please


Juan

[lubetpic]

set campo=db.execute("select * from tabla")
while not campo.eof
id=campo("id")
db.execute("insert into tabla (dato1, dato2) values ('1', '2') where id="&id&")

campo.movenext
wend



algo asi, revisalo porque estoy

[almaluz]

ok.

voy a probar,

gracias lubetpic

[almaluz]

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.