Consulta SQL

[victorlj92]

Me da este error:

Microsoft JET Database Engine error '80004005'

La operación debe usar una consulta actualizable.

/Temporalasp/Encuestas/respuesta.asp, line 38

La linea 38 está marcada en azul

¿Que he escrito mal?
La estructura de la tabla es:

A : Texto
B: Texto
C: Texto
D: Texto

Y está hecha en Access
<%
Dim conexion, consulta1, consulta2
Dim path, file
Dim respuesta
Dim mes
Dim ano
Dim datoanterior


path = Request.ServerVariables("PATH_TRANSLATED")
file= Left(path, instrRev(path, "\")) & "Encuesta.mdb"

Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open "provider=microsoft.jet.oleDB.4.0;data source=" & file

respuesta = request.Form("respuesta")
consulta1 = "SELECT " + respuesta + " FROM Tabla1"
Set resultado = Server.CreateObject("ADODB.RecordSet")
resultado.open consulta1, conexion, adOpenKeyset
datoanterior = resultado(respuesta)
datoanterior = Cint(datoanterior)+1
datoanterior = Cstr(datoanterior)

consulta2 = "UPDATE Tabla1 SET Tabla1." + respuesta + " = """ + datoanterior + """"
Response.Write consulta2
38: conexion.Execute consulta2, adCmdText
Response.Cookies("Votado") = "True"
mes = month(date)
ano = year(date)
Response.Cookies("Votado").Expires = mes+"/31/"+ano
'Response.redirect("resultados.asp")
resultado = nothing
conexion.close()

End If
%>

[malpika]

hacer las konsultas asi es valido?

yo pondria:

UPDATE Tabla SET campo=nuevodato where camo=datoanterior

[eaguilar]

Me parece que solo debes colocar conexion.execute consulta2.
Si me equivo corrigeme, pero no debes incluir el adCmdText.

[_Brian_]

mira los permisos de la tabla

[victorlj92]

Y como se miran los permisos en ACCESS?
O en la pagina ASP?

[PaXXeL]

Hola!
A mi me pasa lo mismo y no se ya que mirar.
Tipo de error:
Microsoft JET Database Engine (0x80004005)
La operación debe usar una consulta actualizable.
/encuestas/verencuesta.asp, línea 26

y lo he puesto como decían arriba y sigue igual, aquí va el codigo:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/Tencuestas.mdb"))


if request.form("opcion")<>"" then


select case true

case request.form("opcion")=0
campo="r1"
case request.form("opcion")=1
campo="r2"
case request.form("opcion")=2
campo="r3"
case request.form("opcion")=3
campo="r4"
end select

sqltxt="update encuestas set "&campo&" = "&campo&"+1 where activa=True"

conn.execute sqltxt
end if
%>conn.execute sqltxt

MUCHAS GRACIAS X ADELANTADO

[bakanzipp]

es un error de permisos.

revisen los permisos de su carpeta donde esta la base de datos...debiera tener acceso full control y revisen los permisos del archivo...debe tener deschekeado el check box read-only.

saludos

[PaXXeL]

he revisado los permisos y parecen estar bien, lo único raro es que cada vez que deschekeo el check de solo lectura, cuando vuelvo a entrar en la carpeta, no aparece chekeado, pero aparece como con un cuadrado de color verde sobre el cuadrado, como si quedara medio chekeado, no se es muy raro (XP prof)
Sigue sin funcionarme, me da el mismo error

[bakanzipp]

hhmmm...

reitero es problema de permisos hay uno de los permisos que no te permite actualizar la informacion de la base de datos, revisaste la carpeta?


http://www.us.es/foros/read.php?f=54&i=104&t=104
**************************************************
'La operación debe usar una consulta actualizable.'

¿Os sale este error cuando intentais modificar (insertar o borrar) la base de datos desde una página asp?
A mi me salía hasta hace 10minutos. Llevo toda la mañana buscando la causa del problema y ya he dado con ella.
Dejo este mensaje para solucionarle la vida al que le ocurra lo mismo.

El problema son los permisos de lectura/escritura del archivo *.mdb
Si tienes Windows 2000 no tendrás este problema, pero si usas bases de datos de Access en Windows XP te debe haber ocurrido.

Por ahí he leido que "...es un problema originado por los MDAC del sistema..." No tengo ni idea de lo que es eso, pero lo cuento por si a alguien le aclara algo :P

El caso es que hay que habilitar el permiso de escritura para el archivo *.mbd.
Para ello abres el explorador de windows, haces click con el segundo boton sobre tu archivo *.mbd, click en propiedades y luego en la pestaña SEGURIDAD.

Probablemente no veas esta pestaña, eso es porque no aparece por defecto. En la ventana del explorador de windows haces click en Herramientas/Opciones de carpeta. Te vas a Ver y desmarcas: Utilizar uso compartido simple de archivos (recomendado)

Bien, ahora que ya estamos todos en la pestaña SEGURIDAD, en el cuadro Nombres de grupos o usuarios seleccionas TODOS y finalmente, debajo, en Permisos de Administradores marcas Control Total.

Con esto ya puedes añadir, modificar y borrar cosas en la base de datos.

Un saludo,

Luis!
**************************************************

[PaXXeL]

OK ESO YA ESTA SOLUCIONADO MUCHIIISIMAS GRACIAS.
Esto de XP son la leche. . .jeje
Saludos

[bakanzipp]

yep....XP no lo paso ni con aceite

saludos

[reycoy]

He hecho lo que me decíais y creo que he subido la base de datos aplicándole todos los permisos de escritura, aunque la verdad es que subo "Todos" con control total y cuando lo vuelvo a bajar pq no me funciona, control total no está seleccionado pero está habilitado y las demás opciones(Modificar,Lectura y ejecucion,...) están seleccionadas aunque con el checkbox inhabitilado.
Además mi administrador de hosting me dice que esa carpeta donde está situada la base de datos tiene permiso de escritura.
En fin no sé cual puede ser el error, pq incomprensiblemente me sigue apareciendo.
Si me podéis echar un cable os lo agradecería.

[bakanzipp]

si tienes tu base de datos en un hosting tu no tienes que hacer nada...el hosting debe proveerte los permisos necesarios tanto del archivo como de la carpeta para el tema de los permisos

si te arroja este error debes volver a insister al hosting que hay problemas de permisos en tu archivo o carpeta

saludos

[reycoy]

Mi hosting me dice que los archivos que se suben a determinada carpeta adquieren los permisos propios de esa carpeta y esa carpeta tiene permisos de escritura.
¿Es posible que esté teniendo algún problema en el código para que me de ese error?
<%
Dim conexion, resultado, files, consulta
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Mode = adModeReadWrite

'CONEXION CON DSN
'conexion.Open "DSN=taltal.tal.tal"'; User=tal234; Password=taltal"
'CONEXION SIN DSN
files = "D:\tal\tal\tal\tal\bbdd.mdb"
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & files & ";Persist Security Info=False"

consulta = "UPDATE Tabla SET c2_texto1 = 'He cambiado el texto'"

Set resultado = conexion.Execute(consulta, ,adCmdText)
%>

[bakanzipp]

pero como?...te dieron al rut fisica de tu archivo?....no deberias usar ServerMapPath para cuando subes tu base a un host?

[reycoy]

La carpeta esta por seguridad no está en lo que es la raiz cuando yo accedo con un servidor ftp, sino en otro lado, por eso no puedo acceser con ServerMapPath.....¿o sí?.
¿Me lo podrías explicar un poco más lo que quieres decir?