Ahora me da este error que indico abajo, luego de haber dejado el código de esta manera:
--------------------------------------------------------------------------------------------------------------------
<%
dim vfecha, vtitulo, vnoticia, vfuente, id_noticia
'se recogen los datos del formulario, declarando las diferentes variables
vfecha=request.form("fecha")
vtitulo=request.form("titulo")
vnoticia=request.form("noticia")
vfuente=request.form("fuente")
Set Conn=Server.CreateObject("ADODB.connection")
Conn.open "miservidor.mdb"
sql = "insert into noticias (fecha, titulo, noticia, fuente) values ('"&vfecha&"','"&vtitulo&"','"&vnoticia&"','"&vfue nte&"')"
conn.execute sql
%>
<%
Set rs =Server.CreateObject("ADODB.RecordSet")
sql ="select top 1 from noticias order by id_noticia desc"
rs.open SQL, conn
id_noticia= rs("id_noticia")
%>
<a href="administrador/anexos.asp?id_noticia="<%=id_noticia%>>Agregar nueva oferta de empleo </a>
<p align="center"><a href="index.asp">Volver al listado de noticias </a>
<%
rs.close
Conn.close
Set rs=nothing 'se cierra la conexión
Set Conn=nothing
'se libera el objeto conexión
%>
-----------------------------------------------------------------------------------------------------------------
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][Controlador ODBC Microsoft Access] La instrucción SELECT incluye una palabra reservada, le falta un argumento o está mal escrito, o bien los signos de puntuación no son correctos.
/its/administrador/noticias/agreganoticia.asp, línea 62
------------------------------------------------------------------------------------------------------------------
Gracias de antemano por la colaboración