Visual Foxpro 9 y SQL server
Estoy trabajando en un proyecto y necesito insertar registros de fox en una base de datos sql ya tengo creada a conexión
y todo funciona bien solo que cuando intento guardar desde una ventana
con muchos datos excedo el limite de caracteres permitidos y la consulta
se me cae, lo que hice fue concatenar los campos en un editbox para poder armarla por ejemplo
por='"'
y="'"
thisform.edit1.value = thisform.edit1.value + " SQLEXEC (Nhandle," + por + "INSERT INTO CLT_CLIENTES(CLT_ID_CLIENTE,CLT_NOMBRE,CLT_DIRECCION,CLT_CIUDAD,CLT_PAIS,CLT_TELEFONO,CLT_FECHA_INGRESO,CLT_NOTAS,CLT_CODIGO,CLT_FECHA_NACE) "
thisform.edit1.value = thisform.edit1.value + " VALUES("
thisform.edit1.value = thisform.edit1.value + y + ALLTRIM(STR(RECNO())) + y +","+ y + ALLTRIM(TMPimporcli.NOMBRE)+ y +","+ y + ALLTRIM(TMPimporcli.DIRECCIÓN)+ y +","+ y + ALLTRIM(vclt_ciudad)+ y +","+ y + ALLTRIM(vclt_PAIS)+ y +","+ y + ALLTRIM(vclt_TELEFONO)+ y +","+ y + DTOC(vclt_fecha_ingreso) + y +","+ y + ALLTRIM(vclt_notas) + y +","+ y + ALLTRIM(vclt_CODIGO) + y +","+ y + ALLTRIM(TMPimporcli.FECHANACE)+y
thisform.edit1.value = thisform.edit1.value + ")"
thisform.edit1.value = thisform.edit1.value + x
thisform.edit1.value = thisform.edit1.value + ")"
Yo logro ver en el editbox la consulta completa pero no la puede ejecutar. ¿Algún idea?