FiveTech Software tech support forums

Hola foro, lo que necesito es simple pero dada mi (prácticamente) nula experiencia con MYSQL pido ayuda.
Necesito grabar sucesivamente unos datos en DBF y en MYSQL, algo así:

Code: Select all  Expand view

function guarda()
local xNombre:= "pepe"
local xDireccion := "c/ del pez 13"
local sql := ""

USE Alumno SHARE NEW
if add_rec()
replace nombre with xnombre
replace direccion with xdireccion
dbunlock()
endif
CLOSE alumno

*** aqui necesito guardar lo mismo en una tabla MYSQL
** abrir tabla
sql="INSERT INTO alumno    (nombre, direccion) VALUES('xnombre','xdireccion')";  // supongo que algo así
** cerrar tabla
return .t.

pero no conozco los detalles del codigo necesario.
La aplicación trabaja con DBF, la grabacion en MYSQL es una excepción.
Disculpad mi desconocimiento a este nivel.

Muchas gracias por responder, pero podrias indicarme también el proceso completo para crear, abrir y cerrar la conexión activa con sql?

Que estás usando para conectarte con el motor ? Dophin, FwhMariaDb, Ado ?

Saludos

Supongo que podría usar ADO pero no se como

Para conectarte con el motor

Code: Select all  Expand view

oCon := CreateObject("ADODB.Connection")
oCon : Open := ( "Driver={MySQL ODBC 5.1 Driver};Server=" + cHost + ";Database=" + cBBDD + ";User=" + cUser + ";Password=" + cPassw + ";Option=3;" )
 

Para ejecutar el insert

Code: Select all  Expand view

cInsert := "insert into alumno(nombre, direccion) Values ('xnombre','xdireccion')"
oCon : Execute( cInsert )
 

Recuerda que además de instalar el motor Mysql deberás instalar el conector. ( En el caso de esta cadena de conexión es el conector v.5.1 ). Espero te sirva

Saludos

Muchas gracias, al menos ahora tengo una base por donde empezar

Jose Vicente, quizás esto te pueda ayudar

viewtopic.php?f=19&t=27296&hilit=empezando+con+ado#p151744

Muy buena información Cristobal, muchas gracias, yo tampoco tenia los conceptos básicos nada claros

Bueno, ya sabemos como es esto
Cuando creemos que lo dominamos aparece ( o descubrimos ) algo nuevo y vuelta a empezar