qué es agenda? ahí deberia haber una consulta sql.
has definido las constantes adOpenStatic y adCmdTable ? son los cursores del recordset (creo que te dije que los buscaras ayer)
de todas maneras yo lo cambiaria a ésto:
Código:
Dim fecha,hora,desc,enlace,conn,RS
hora=""
desc=""
enlace=""
fecha=""
fecha=Request.Form("p_fecha")
hora=Request.Form("p_hora")
desc=Request.Form("p_desc")
enlace=Request.Form("p_enlace")
Set conn = Server.CreateObject ("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.mappath("../bd/icsme.mdb")&";Persist Security Info=False;Jet OLEDB:Database Password=icsme;"
sql="inset into agenda(fecha,hora,acto,enlace) values ("&fecha&","&hora&",'"&desc&"','"&enlace&"')"
conn.execute sql
Conn.Close
SET Conn = Nothing