
15/01/2008, 04:19
|
| | 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. |