Añadir registro con un recordset

[Vicente]

Hola, que tal.

Al querer añadir un registro a una base de datos me da el siguiente error:


-Tipo de error:
Microsoft JET Database Engine (0x80040E09)
No se puede actualizar. Base de datos u objeto de sólo lectura.
/foro_asp//nuevomsg.asp, línea 133

No sé que puede ser, el error está aquí:


Conectar
SQL="SELECT * FROM Mensajes WHERE FechaHora=#"&f&"#;"
Registro rs
rs.Open SQL, oConn, 2, 2
¡¡¡¡¡¡¡¡ rs.AddNew ¡¡¡¡¡¡¡¡¡¡¡¡¡¡
rs.Fields("IdForo")=idforo
rs.Fields("IdCabecera")=idcabecera
rs.Fields("IdPadre")=idpadre
rs.Fields("Autor")=autor
rs.Fields("Email")=email
rs.Fields("FechaHora")=f
rs.Fields("Tema")=tema
rs.Fields("Cuerpo")=cuerpo

rs.Update


¿Que puedo hacer?,Ayuda, porfavor¡¡¡¡
Gracias de antemano.
Un saludo ,Vicente.