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图片,不能打开,提示是图片格式不对请帮忙看
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图片,不能打开,提示是图片格式不对请帮忙看
Stmpic.SaveToFile App.path & "\Temp\BigMap.jpg", adSaveCreateOverWrite这样保存的图片仍然是BMP格式的.当然格式不对,调入也出错了.