6 messages in com.mysql.lists.mysql-esProblema con los stored procedures en...
FromSent OnAttachments
Martín G. M.13 Aug 2005 12:06 
CLS Carlos Puero15 Aug 2005 06:45 
Edwin Cruz15 Aug 2005 07:06 
Martín G. M.18 Aug 2005 09:24 
CLS Carlos Puero18 Aug 2005 09:30 
Mark19 Aug 2005 08:32 
Subject:Problema con los stored procedures en Visual Basic 6
From:Martín G. M. (epul@hotmail.com)
Date:08/13/2005 12:06:30 PM
List:com.mysql.lists.mysql-es

Hola a todos.

Les escribo para solicitarles una ayuda. Resulta que estoy comenzando mi camino de aprendizaje con mysql, y estuve probando los stored procedure. La creacion de los mismos fue todo un exito como asi tambien la ejecucion desde el Mysql Query Browser. El problema surgio cuando comence a acceder desde Visual Basic 6. Alli pude ejecutar los stored procedure que insertan y modifican registros de las tablas, pero tuve problemas con los que devuelven registros.

En el mysql he creado el stored procedure "buscar" de la siguiente forma:

------------------------------ DELIMITER $$

DROP PROCEDURE IF EXISTS `baseprueba`.`buscar`$$ CREATE PROCEDURE `baseprueba`.`buscar`(pusuario varchar(20)) BEGIN SELECT * FROM Usuarios WHERE Usuario = pusuario; END$$ DELIMITER ;

------------------------------

El codigo que utilizo en visual basic es:

---------------------------------- Dim rs As New ADODB.Recordset Dim cnn As New ADODB.Connection

rs.CursorLocation = adUseClient

cnn.Open "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=localhost; PORT=3306;" & _ "DATABASE=BasePrueba; USER=root; PASSWORD=xxx;OPTION=3;"

rs.Open "CALL buscar ('Juan')", cnn, adOpenStatic, adLockBatchOptimistic

--------------------------------

El problema que tengo es que cuando se ejecuta la linea rs.Open ... me aparece el siguiente mensaje:

Error '-2147217871 (80040e31' en tiempo de ejecucion : PROCEDURE baseprueba.buscar can't return a result set in the given context.

Alguien le ha pasado algo parecido o conoce como resolver este problema?

Desde ya muchas gracias.