在SQL数据库建立表shebei，字段PIC 数据类型是TEXT.程序如下：

LOCAL xfilename,xfiletext
xfilename = GETFILE('DOCX,XLSX,jpg')
xfiletext = strconv(FILETOSTR(xfilename),13)
SELECT shebei_one   &&本地临时表shebei_one是从shebei表的一个查询结果,编辑完后保存到远程表shebei
replace pic WITH xfiletext  && pic字段是SQL的TEXT类型

SELECT shebei_one
lcTextString=xfiletext
Thisform.pf.page1.Image1.Stretch = 2
Thisform.pf.page1.Image1.PictureVal=Strconv(lcTextString,14)

&&后面的程序是保存到远程表SHEBEI，因为使用的通用程序，省略。

问题是这样的，当shebei_one添加记录，执行以上程序后，再使用spt的方式INSERT，保存成功，但是如果编辑shebei_one表，再使用spt的方式UPDATE，保存失败，这是
怎么回事呢？

问题可能在别的哪个环节，我直接用以下程序，保存成功

LOCAL xfilename,xfiletext
xfilename = GETFILE('DOCX,XLSX,jpg')
xfiletext = strconv(FILETOSTR(xfilename),13)




 字符串=["select * from shebei where id=2","shebei_one1"]

 连接临时_yk()   &&调用远程连接

 Ac=SQLEXEC(nhandle,&字符串)

 IF  Ac<0
       =SQLDISCONNECT(nhandle)
       MESSAGEBOX("读取错误！",0,"错误信息")
     
       RETURN TO MASTER 

 ELSE
    SELECT shebei_one1
   
     Ac2=SQLEXEC(nhandle,"update shebei set pic=?xfiletext ")
     IF ac2>0
        =MESSAGEBOX("保存成功")
     else 
        =MESSAGEBOX("保存失败")
     endif     
      =SQLDISCONNECT(nhandle)

 endif  

但是我采用另外的方式就不能成功

字符串=["select * from shebei where id=2","shebei_one"]
连接临时_yk()   &&调用远程连接

 Ac=SQLEXEC(nhandle,&字符串)

 IF  Ac<0
       =SQLDISCONNECT(nhandle)
       MESSAGEBOX("读取错误！",0,"错误信息")
     
       RETURN TO MASTER 

 ELSE
    

 endif  

ac1=SQLEXEC(nhandle,"select * from shebei ","c_t")  && 产生表 
IF  ac1<0 
      = SQLDISCONNECT(nhandle)
      MESSAGEBOX("读取数据错误！",0,"错误信息") 
      RETURN TO MASTER 
ELSE
    SELECT c_t
    CURSORSETPROP("tables","shebei","c_t")
    CURSORSETPROP("keyfieldlist","id","c_t")
    CURSORSETPROP("updatablefieldlist","id,pic","c_t")
    yy='id shebei.id,pic shebei.pic'
    CURSORSETPROP("updatenamelist",yy,"c_t")
    CURSORSETPROP("sendupdate",.t.,"c_t")
    CURSORSETPROP("wheretype",2)
    cursorsetprop("buffering",5)  &&设置表缓冲
    UPDATE c_t SET pic=shebei_one.pic from shebei_one WHERE c_t.id= shebei_one.id 
    SQLSetprop(nhandle,'Transactions',2)        && 开启远程手工事务
    BEGIN TRANSACTION
        select c_t
        a1=TABLEUPDATE(.t.)
        IF a1=.t. 
         END TRANSACTION  
        ELSE
            rollback  
        ENDIF
   
    SQLSetprop(nhandle,'Transactions',1)        && 开启远程自动事务
    = SQLDISCONNECT(nhandle) &&关闭
    IF a1=.t.
       MESSAGEBOX("数据保存成功！",0,"信息") 
    ELSE
       MESSAGEBOX("数据保存失败！",0,"信息") 
    endif 
    
  
ENDIF  &&数据查询

 

运行完成显示：数据保存失败！ 这是怎么回事呢？

不是的，假如把PIC换成别的字段，就不会出现保存失败，
或者不使用这一句： UPDATE c_t SET pic=shebei_one.pic from shebei_one WHERE c_t.id= shebei_one.id ，也能保存成功
您说问题就是“VFP与SQL中，保存图片的字段”中存在冲突，那怎么解决呢

[此贴子已经被作者于2022-2-18 18:58编辑过]

为什么用=SQLEXEC(nhandle,"update shebei set pic=?mypic ")就不会出现问题呢？

还有，当PIC的值是NULL时，保存也会成功

保存失败的原因终于找到了：把CURSORSETPROP("wheretype",2,"c_t")改成CURSORSETPROP("wheretype",1,"c_t")，立刻就解决了

表可能有问题，原来pic用TEXT数据类型，添加图片后，居然在SQL服务器内不能删除记录，后改成VCHAR(MAX)，才没有问题了