si quieres validar que el mensaje sea de un usuario valido haces lo siguiente
usuario=request.form("usuario")
Mensaje=request.form("mensaje")
SQL="select idusuario from usuarios where nombre ='"&usuario&"'"
Set RsUsuario=Conn.execute(SQL)
'te deberia devolver un registro
if not RsUsuario.eof then
Id=RsUsuario("IdUsuario")
SQL=insert into mensajes (idusuario,mensajes) values ('"&Id&"','"&Mensaje&am p;"')"
set Inserta=conn.execute(SQL)
else
'el usuario no esta registrado
end if
algo asi me imagino ...espero te sirva
<center><IMG SRC="http://www.550m.com/usuarios/altolacruz/aprendiz.gif" ALT="Visitame en AlSurNet.com -- E-Learning E-Commerce Multimedia E-Business--"></center>