FoxPro/Visual FoxPro - mysql

Saludos AMIGOS TENGO EL siguiente problema

tengo este codigo y me funciona bien
****************************************
LOCAL cod_banco,lhandle

cod_banco=thisform.txtCod_ban.Value

stringlocal="driver={MySQL odbc 3.51 driver};"+;
"server=localhost;"+;
"uid=root;"+;
"pwd=1234;"+;
"database=nomina;"
lhandle=sqlstringconnect(stringlocal)
*WAIT WINDOW STR(lhandle)
if lhandle>0

sqlexec(lhandle,"use nomina")
SQLEXEC(lhandle,"insert into bancos (cod_ban,des_ban,nro_cue,tip_cue,autorizado);
values ('aaa','bbb','ccc','ddd','eee')")

ENDIF

esto me GUARDA BIEN pero cuando en el INSERT INTO EN LA PARTE DEL VALUES coloco por ejemplo el siguiente codigo

SQLEXEC(lhandle,"insert into bancos (cod_ban,des_ban,nro_cue,tip_cue,autorizado);
values (cod_banco,'bbb','ccc','ddd','eee')")

osea que ya no coloco lo que deseo guardar en el campo entre comilla

o me refiero a una caja de texto

SQLEXEC(lhandle,"insert into bancos (cod_ban,des_ban,nro_cue,tip_cue,autorizado);
values (thisform.txtcod_ban.value,'bbb','ccc','ddd','eee')")

NO ME GUARDA NADA POR QUE SERA

Hola saludos

Lo que pasa que recuerda que no estas trabajando sobre una tabla de visual foxpro sino sobre mysql.

cuando haces un inser into de mysql no puedes mandar valores directos sino que tienes que convertirlos.

lo que debes hacer es que quede asi

SQLEXEC(lhandle,"insert into bancos (cod_ban,des_ban,nro_cue,tip_cue,autorizado);
values ( TRANSFORM( thisform.txtcod_ban.value), 'bbb', 'ccc', 'ddd', 'eee')")

pruebalo y me avisas

saludos

ponele en el value asi VALUES (?thisform.text1.value, ?thisform.text2.value)