Porque no actualiza con UPDATE
Publicado por Anaasinco (24 intervenciones) el 01/07/2005 12:12:10
Hola y gracias por leerme.
Tengo un problema y es que necesito actualiar una tabla dentro de una base de datos pero no consigo que se realice la actualización, simplemente la ignora y no hace nada en la tabla. ¿A que se debe esto? Muestro el codigo:
Dim bdB
set bdB=Server.CreateObject("adodb.connection")
bdB.open "BolsaFacilAqui"
Dim rstMC
Set rstMC = Server.CreateObject("adodb.recordset")
'rstMC.CursorType = adOpenKeyset .......'Prove poniendo esto tambien y no funciona
rstMC.CursorType=1
rstMC.LockType = adLockOptimistic
rstMC.Open "MCHistorico", bdB
.
.
.
if (fechabuscada = hoy) then
SQLActualiza = "UPDATE MCHistorico SET ultimo = "&ultimopos&" WHERE fecha = #"& hoy &"# AND codigo= "& codigopos &""
bdB.execute(SQLActualiza)
end if
Ayuda por favor!!
Gracias
Tengo un problema y es que necesito actualiar una tabla dentro de una base de datos pero no consigo que se realice la actualización, simplemente la ignora y no hace nada en la tabla. ¿A que se debe esto? Muestro el codigo:
Dim bdB
set bdB=Server.CreateObject("adodb.connection")
bdB.open "BolsaFacilAqui"
Dim rstMC
Set rstMC = Server.CreateObject("adodb.recordset")
'rstMC.CursorType = adOpenKeyset .......'Prove poniendo esto tambien y no funciona
rstMC.CursorType=1
rstMC.LockType = adLockOptimistic
rstMC.Open "MCHistorico", bdB
.
.
.
if (fechabuscada = hoy) then
SQLActualiza = "UPDATE MCHistorico SET ultimo = "&ultimopos&" WHERE fecha = #"& hoy &"# AND codigo= "& codigopos &""
bdB.execute(SQLActualiza)
end if
Ayuda por favor!!
Gracias
Valora esta pregunta
0