Ver Mensaje Individual
  #1 (permalink)  
Antiguo 15/01/2008, 04:19
baditxuk
 
Fecha de Ingreso: enero-2007
Mensajes: 284
Antigüedad: 18 años, 3 meses
Puntos: 1
actualizar campo BD MySQL

hola.
tengo una pagina donde tengo que añadir, modificar,... una serie de campos en una BD MySQL.
Para añadir un campo utilizo este codigo y me funciona bien.

Dim connStr
Set connStr = Server.CreateObject("ADODB.Connection")
connStr.Open "Driver={MySQL ODBC 3.51 Driver};SERVER=localhost;Port=3306;Database=web;Ui d=root;Pwd=123123;Option=3;"


' Recordset
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "datos", connStr, 2, 2

' Insertando datos
rs.AddNew
rs("texto1")=texto
rs("foto1").AppendChunk fileData
rs("nombre1")=fileName
rs.Update

El problema me surge a la hora de modificar un campo dentro de una tabla. En esa tabla solo tengo una fila y quiero modificar el campo foto.
el codigo que utilizo es:

Dim connStr
Set connStr = Server.CreateObject("ADODB.Connection")
connStr.Open "Driver={MySQL ODBC 3.51 Driver};SERVER=localhost;Port=3306;Database=web;Ui d=root;Pwd=123123;Option=3;"


' Recordset
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
sqltext = "SELECT * FROM bienvenido"

rs.open sqltext, connStr, 2, 2

' Modificando datos
rs("foto").AppendChunk fileData
rs("nombre")=fileName
rs.Update

El error que me sale es:

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
Error en la actualización basada en consultas: no se encontró la fila para actualizar.

Me dice que no encuentra la fila a actualizar pero solo tengo una fila en la tabla por lo que sqltext = "SELECT * FROM bienvenido" me da la fila que tengo.

Donde puede estar el error???

Gracias.