Bdd modificar
Tengo una conexión a una bdd que almacena noticias. Tiene campos de id, titulo, descripción, contenido, fecha y clicks. Bueno consigo que los datos se muestren en una página de cualquier noticia (¿con leer_noticia.asp? Id=3) (aviso: soy novato en asp) pero no consigo sumarle 1 al valor del campo clicks. Tengo el siguiente código, es obvio que algo esta mal, pero no se qué es:
strsql = "SELECT * FROM noticias where id=" & cual
' Creamos la conexion a la base de datos
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("general/noticias.mdb")
Set RSnoticias = Server.CreateObject("ADODB.Recordset")
Todavía no abro el recordset para leer, primero modifico (lo intento) lo hago una consulta con sql:
dim cliks
cliks=rsnoticias("clicks")
strsql2 = "UPDATE noticias SET clicks = cliks WHERE id =" & cual
RSnoticias.Open strSQL2, oConn,2,2
rsnoticias.close
y luego seria cuando abro el recordset para leer:
RSnoticias.Open strSQL, oConn,2,2
Ayudame con el código para modificar la bdd por favor, llevo bastante tiempo con este problema.
Muchas gracias.
strsql = "SELECT * FROM noticias where id=" & cual
' Creamos la conexion a la base de datos
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("general/noticias.mdb")
Set RSnoticias = Server.CreateObject("ADODB.Recordset")
Todavía no abro el recordset para leer, primero modifico (lo intento) lo hago una consulta con sql:
dim cliks
cliks=rsnoticias("clicks")
strsql2 = "UPDATE noticias SET clicks = cliks WHERE id =" & cual
RSnoticias.Open strSQL2, oConn,2,2
rsnoticias.close
y luego seria cuando abro el recordset para leer:
RSnoticias.Open strSQL, oConn,2,2
Ayudame con el código para modificar la bdd por favor, llevo bastante tiempo con este problema.
Muchas gracias.
1 respuesta
Respuesta de reynerd
1