actualizar una base de datos de access desde un servicio web

Hola tengo un servicio web, que debe actualizar un campo en una abse de

en access pero cuando llega a la intruccion de UPDATE me da error, si

de Ustedes me puede colaborar les agradezco.
La base de datos esta ubicada dentro de la carpeta del localhost.

Aqui les voy a colocar el codigo del metodo del servicio web.

<WebMethod()> Public Sub CalcularReputacion(ByVal nombre As String, ByVal
conexionOK As Boolean, ByVal milisegundos As Integer, ByVal puntaje As

Dim repActual As Double = ConsultarReputacionActual(nombre)
Dim nuevaRep As Double = AlgoritmoReputacion(repActual,

milisegundos, puntaje)

Dim cnAccess As New OleDb.OleDbConnection(strdsn)
cnAccess.Open()
Dim cmdUddi As New OleDb.OleDbCommand("UPDATE uddi SET

+ nuevaRep + " WHERE NOMBRE=""" + nombre + """", cnAccess)
cmdUddi.CommandType = CommandType.Text
cmdUddi.ExecuteNonQuery()
cnAccess.Close()
End Sub

Gracias
Diana

Deberías poner el error que te dá, pero comprueba si tienes permisos de
escritura en la carpeta donde se encuentra el fichero .mdb para el usuario
que intenta actualizar la bbdd.

Un saludo.

"Diana" escribió en el mensaje
news:
> Hola tengo un servicio web, que debe actualizar un campo en una abse de
datos
> en access pero cuando llega a la intruccion de UPDATE me da error, si
alguno
> de Ustedes me puede colaborar les agradezco.
> La base de datos esta ubicada dentro de la carpeta del localhost.
>
> Aqui les voy a colocar el codigo del metodo del servicio web.
>
> <WebMethod()> Public Sub CalcularReputacion(ByVal nombre As String, ByVal
> conexionOK As Boolean, ByVal milisegundos As Integer, ByVal puntaje As
Double)
> Dim repActual As Double = ConsultarReputacionActual(nombre)
> Dim nuevaRep As Double = AlgoritmoReputacion(repActual,
conexionOK,
> milisegundos, puntaje)
>
> Dim cnAccess As New OleDb.OleDbConnection(strdsn)
> cnAccess.Open()
> Dim cmdUddi As New OleDb.OleDbCommand("UPDATE uddi SET
reputacion="
> + nuevaRep + " WHERE NOMBRE=""" + nombre + """", cnAccess)
> cmdUddi.CommandType = CommandType.Text
> cmdUddi.ExecuteNonQuery()
> cnAccess.Close()
> End Sub
>
> Gracias
> Diana
>

El error que me aparece es "la consulta debe ser actualizable"
Diana


"Diego (DCD)" escribió:

> Deberías poner el error que te dá, pero comprueba si tienes permisos de
> escritura en la carpeta donde se encuentra el fichero .mdb para el

> que intenta actualizar la bbdd.
>
> Un saludo.
>
> "Diana" escribió en el mensaje
> news:
> > Hola tengo un servicio web, que debe actualizar un campo en una abse

> datos
> > en access pero cuando llega a la intruccion de UPDATE me da error, si
> alguno
> > de Ustedes me puede colaborar les agradezco.
> > La base de datos esta ubicada dentro de la carpeta del localhost.
> >
> > Aqui les voy a colocar el codigo del metodo del servicio web.
> >
> > <WebMethod()> Public Sub CalcularReputacion(ByVal nombre As String,

> > conexionOK As Boolean, ByVal milisegundos As Integer, ByVal puntaje As
> Double)
> > Dim repActual As Double = ConsultarReputacionActual(nombre)
> > Dim nuevaRep As Double = AlgoritmoReputacion(repActual,
> conexionOK,
> > milisegundos, puntaje)
> >
> > Dim cnAccess As New OleDb.OleDbConnection(strdsn)
> > cnAccess.Open()
> > Dim cmdUddi As New OleDb.OleDbCommand("UPDATE uddi SET
> reputacion="
> > + nuevaRep + " WHERE NOMBRE=""" + nombre + """", cnAccess)
> > cmdUddi.CommandType = CommandType.Text
> > cmdUddi.ExecuteNonQuery()
> > cnAccess.Close()
> > End Sub
> >
> > Gracias
> > Diana
> >
>
>
>
>