Como insertar una imagen en un campo OLE de MS Access [autoresuelto]

[ruiz]

Hola amigos vengo a suplicarles su ayuda tengo un pequeño problema tengo una base de acces con un campo OLE y necesito insertar registros en esa tabla desde VFP pero no se como acerlo, bueno ese campo especifico no se como hacerlo la coneccion la estoy haciendo por ODBC


si alguin me echa la mano se los agradeseria mucho...

[ruiz]

bueno por si a alguin mas se topa con este mismo problema aqui les dejo como lo solucione..

cree un cursro con campo general en VFP y luego al que llame carnets por poner un nombre
luego le agrege la direccion en el campo general..

l_foto   = g_ruta_foto + Alltrim(Str(l_empleado_id)) + '.jpg'

If File(l_foto)
   Append General foto From &l_foto
Endif

x_coneccion_sql = SQLConnect(g_odbc_carnets)
   
            
x_identityfield   = Alltrim(Str(carnets.identityfield))
x_textfield1   = Alltrim(carnets.textfield1)
x_textfield2   = Alltrim(carnets.textfield2)
x_textfield3   = Alltrim(carnets.textfield3)
x_textfield4   = Alltrim(carnets.textfield4)
x_textfield5   = Alltrim(carnets.textfield5)
x_textfield7   = Alltrim(carnets.textfield7)
            
WAIT windows 'Preparando --> ' + x_textfield2 NOWAIT
               
x_contador_sql    = SQLExec(x_coneccion_sql,"INSERT INTO projecttable (" + ;
   "TEXTFIELD1," + ;
   "TEXTFIELD2," + ;
   "TEXTFIELD3," + ;
   "TEXTFIELD4," + ;
   "TEXTFIELD5," + ;
   "TEXTFIELD7," + ;
   "PHOTOFIELD1)" + ;
   " VALUES ('" + ;
   x_textfield1 + "','" + ;
   x_textfield2 + "','" + ;
   x_textfield3 + "','" + ;
   x_textfield4 + "','" + ;
   x_textfield5 + "','" + ;
   x_textfield7+ "'," + ;
   "?carnets.photofield1)")


SQLDisconnect(x_coneccion_sql)


tema cerrado...
      

[vlad]

Gracias por compartir la solución, la verdad no tenia ni idea.

PD: creo haber visto ya una pregunta en el foro