Conexión vfp9 y MySQL 6.0
Buenos días.
Estoy realizando un sistema para la facultad, aprendí bastante de visual basic pero ahora me piden que desarrolle una aplicación tipo calendario con recordatorios en VFP9 con conexión a BD de MySQL. Estoy trabajando en entorno Windows, pude instalar el MySQL 6.0, los ODBC divers 3.51 pero no consigo la forma de usar los datos de la base de datos creada con MySQL Administrator.
Googleando conseguí el siguiente código:
lcStringCnxLocal = "DRIVER={MySQL ODBC 3.51 Driver};" + ;
"SERVER=localhost;" + ;
"UID=root;" + ;
"PWD=asdzxc12;" + ;
"DATABASE=dbprueba;" + ;
"OPTIONS=131329;"
SQLSETPROP(0,"DispLogin" , 3 )
lnHandle = SQLSTRINGCONNECT(lcStringCnxLocal)
SQLSETPROP(0,"DispLogin" , 3 )
lnHandle = SQLSTRINGCONNECT(lcStringCnxLocal)
IF lnHandle > 0
cmd = SQLEXEC(lnHandle,"select * from tabla_prueba","cur_tabla")
IF cmd > 0
BROWSE
ELSE
AERROR(laErr)
MESSAGEBOX("No se pudo conectar a mySQL. Error: " + CHR(13) + laErr[2])
ENDIF
USE IN cur_tabla
SQLDISCONNECT(lnHandle)
ELSE
AERROR(laErr)
MESSAGEBOX("No se pudo conectar a mySQL. Error: " + CHR(13) + laErr[2])
ENDIF
Está adaptado para mi DB y la tabla creada. Se conecta y la muestra en el formulario, pero no se como accceder a sus datos para trabajarlos en textos o variables. Agradezco desde ya su atencion. Saludos