Foros del Web » Programando para Internet » ASP Clásico »

Ir al primer registro en MySQL

Estas en el tema de Ir al primer registro en MySQL en el foro de ASP Clásico en Foros del Web. Saludos Estoy tratando de modificar datos a mi db mysql desde asp,pero no me permite hacerlo ya que me da el siguiente error: Tipo de ...
  #1 (permalink)  
Antiguo 19/01/2006, 13:01
Avatar de Boxmaster  
Fecha de Ingreso: agosto-2004
Ubicación: Ahorita... frente a mi PC
Mensajes: 74
Antigüedad: 19 años, 10 meses
Puntos: 0
Exclamación Ir al primer registro en MySQL

Saludos

Estoy tratando de modificar datos a mi db mysql desde asp,pero no me permite hacerlo ya que me da el siguiente error:

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E29)
El conjunto de filas no admite desplazamiento hacia atrás.
/miepi/edit2.asp, línea 12

y el codigo es el siguiente:

<%
conn_string = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=pastores;USER=ro ot;PASSWORD=123;OPTION=3;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open(conn_string)
%>
<%
strQuery = "SELECT * FROM Data"
Set objRS = Conn.Execute(strQuery)

El error me lo da aqui -----> objRS.Find "Clave='" & request("Clave") & "'"
(en una pagina asp muestro las consultas a la db, y si es administrador le permito modificar los datos previsulizados, el problema es que necesito ir al primer registro para que pueda hacer la búsqueda en la db mysql para modificar el registro en cuestion.)
(Si tienen otra solucion se los agradeceria mucho)

objRS("Nombre") = request.form("txtNombre")
objRS("Apellidos") = request.form("txtApellidos")
objRS("Municipio") = request.form("txtMunicipio")
objRS("Cargo") = request.form("txtCargo")
objRS("Calle") = request.form("txtCalle")
objRS("Colonia") = request.form("txtColonia")
objRS("CP") = request.form("txtCP")
objRS("Estado") = request.form("txtEstado")
objRS("Mail") = request.form("txtMail")
objRS("Lada") = request.form("txtLada")
objRS("Tel") = request.form("txtTelefono")
objRS("Cel") = request.form("txtCelular")
objRS("Escuela") = request.form("txtEscuela")
objRS("Pais") = request.form("txtPais")

objRS.update

objRS.close
set objRS = nothing
%>
  #2 (permalink)  
Antiguo 19/01/2006, 13:51
Avatar de JoseGCB  
Fecha de Ingreso: noviembre-2004
Ubicación: Caracas Venezuela
Mensajes: 91
Antigüedad: 19 años, 6 meses
Puntos: 0
Por que no haces de una vez
Código:
strQuery = "SELECT * FROM Data where Clave= '" & request("Clave") & "'"

Set objRS = Conn.Execute(strQuery)
__________________
:-D El peor error es no hacer nada
por pensar que es poco lo que se puede hacer..!!!
  #3 (permalink)  
Antiguo 19/01/2006, 14:36
Avatar de Boxmaster  
Fecha de Ingreso: agosto-2004
Ubicación: Ahorita... frente a mi PC
Mensajes: 74
Antigüedad: 19 años, 10 meses
Puntos: 0
Exacto...

Ya intente esto:

strQuery = "SELECT * FROM Data WHERE clave LIKE ('%" & request("clave") & "%')"
Set objRS = Conn.Execute(strQuery)

Es algo similar a codigo que me enseñas... pero nada.

me da el siguiente error:

Tipo de error:
ADODB.Recordset (0x800A0CB3)
El Recordset actual no admite actualizaciones. Puede ser una limitación del proveedor o del tipo de bloqueo seleccionado.
/miepi/edit2.asp, línea 15

pero lo curioso es que el error lo empieza a marcar aqui:

--------> objRS("Nombre") = request.form("txtNombre")
objRS("Apellidos") = request.form("txtApellidos")
objRS("Municipio") = request.form("txtMunicipio")
objRS("Cargo") = request.form("txtCargo")
objRS("Calle") = request.form("txtCalle")
objRS("Colonia") = request.form("txtColonia")
objRS("CP") = request.form("txtCP")
objRS("Estado") = request.form("txtEstado")
objRS("Mail") = request.form("txtMail")
objRS("Lada") = request.form("txtLada")
objRS("Tel") = request.form("txtTelefono")
objRS("Cel") = request.form("txtCelular")
objRS("Escuela") = request.form("txtEscuela")
objRS("Pais") = request.form("txtPais")

objRS.update

objRS.close
set objRS = nothing


Gracias por su colaboracion.

Apenas estoy programado en db de MySQL y ya me duele la cabeza...
Espero prosperar en esto rapido.-)
  #4 (permalink)  
Antiguo 19/01/2006, 14:38
Avatar de Boxmaster  
Fecha de Ingreso: agosto-2004
Ubicación: Ahorita... frente a mi PC
Mensajes: 74
Antigüedad: 19 años, 10 meses
Puntos: 0
Estoy abriendo la db de esta forma:

<%
conn_string = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=pastores;USER=ro ot;PASSWORD=123;OPTION=2;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open(conn_string)
%>

sera que tengo que darle permiso de escritura a la db?


si es asi como le asigno el permiso de escritura?


Gracias por sus respuestas
  #5 (permalink)  
Antiguo 19/01/2006, 16:58
Avatar de Boxmaster  
Fecha de Ingreso: agosto-2004
Ubicación: Ahorita... frente a mi PC
Mensajes: 74
Antigüedad: 19 años, 10 meses
Puntos: 0
Si tienen una respuesta de como lo hacen en PHP se los agradeceria mucho, ya que MySQL lo usan en Linux y PHP,

POr el momeneto uso MySQL en ASP y espero sacar provecho de este servidor de db.

Ok
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 23:36.