Error 500

[rocjfl]

Hola a todos:

Trato de poner en funcionamiento un libro de visitas en mi pagina web. Lo hago mediante ASP y ACCESS. El código que estoy utilizando para grabar el registro es el siguiente:

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\librovisitas.mdb"))

set rs=createobject("ADODB.Recordset")
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic

rs.open "visitas",conn
rs.addnew
rs("nombre")=request.form("nombre")
rs("mail")=request.form("mail")
rs("web")=request.form("web")
rs("pais")=request.form("pais")
rs("opinion")=request.form("opinion")
rs("como")=request.form("como")
rs("ip")=request.servervariables("REMOTE_ADDR")
rs("fecha")=now()
comentarios=replace(request.form("comentarios"),ch r(10),"<br>")
rs("comentarios")=comentarios
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
response.redirect "default.asp?insertado=si"

La ejecutar el código, el servidor da un error 500.

La comprobación que he podido hacer es que si suprimo desde rs.addnew... hasta .... rs.update, la rutina funciona, pero sin gravar registro alguno.

Podeis, por favor, indicarme que me esta pasando

Gracias y un saludo

[rocjfl]

¡ Ya lo averigüe !

El problema no está en la programación sino en la protección ( solo lectura ) del mdb.

Cuando subimos el mdb al servidor, éste pone el atributo de solo lectura al fichero.

Un saludo.

El hilo se puede cerrar.

[gdasoft]

Hola rocjfl,

Solo para tu información y como apunte, aunque hayas solucionado el tema, que sepas que tu navegador muestra el error 500 como un error general, para que internet explorer muestre el error especifico debes acceder a las opciones del navegador y opciones avanzadas y desmarcar la opción "Mostrar mensajes de errore HTTP descriptivos"

Despues de realizar esto vuelve a ejecutar tu codigo y se especificara el problema que tengas.

Un saludo