If Me.CommonDialog1.FileName <> "" Then
                Stmpic.Open
                Stmpic.LoadFromFile Me.CommonDialog1.FileName
                Stmpic.SaveToFile App.path & "\Temp\BigMap.jpg", adSaveCreateOverWrite
                Stmpic.Close
                Set Stmpic = Nothing
  ‘这里出错     Me.Image1.Picture = LoadPicture(App.path & "\Temp\BigMap.jpg")
                .TextMatrix(.row, 0) = "大样图"
                .TextMatrix(.row, 1) = Me.CommonDialog1.FileName
                SetBigMap objFeature.oid, str(objFeature.Class.ObjectClassID)我才用二进制流方式写数据库中,读写都没有问题,
但是读出来后保存在临时目录下的JPG图片,不能打开,提示是图片格式不对请帮忙看

解决方案 »

  1.   

    原先的文件是不是JPG格式的?
      

  2.   

    Stmpic.SaveToFile App.path & "\Temp\BigMap.jpg", adSaveCreateOverWrite保存的图片仍然是JPG格式的.当然格式不对,调入也出错了.
      

  3.   

    无论原来的图片文件是JPG,还是BMP,只要由PICTURE控件转存一下,都成BMP了,因为SaveToFile只支持这种格式(如果有其它参数设置可输出JPG,我就不知道了.事实上很多时候真的很需要输出成JPG).如果确实想要JPG格式的结果文件,建议找第三方的专门控件.或者用API函数.
      

  4.   

    上面说错了
    Stmpic.SaveToFile App.path & "\Temp\BigMap.jpg", adSaveCreateOverWrite这样保存的图片仍然是BMP格式的.当然格式不对,调入也出错了.