社区
数据库
帖子详情
(ADO)数据库中存取BMP图像,急!!!!!!!!!
哟西哟西地
2004-02-03 12:45:50
谁有将图像写入数据库(ADO)的相关代码,我刚学可总不能实现!!!!!!!!!
哪位兄弟帮忙?
有代码最好,
...全文
63
3
打赏
收藏
(ADO)数据库中存取BMP图像,急!!!!!!!!!
谁有将图像写入数据库(ADO)的相关代码,我刚学可总不能实现!!!!!!!!! 哪位兄弟帮忙? 有代码最好,
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
AkiraChing
2004-02-03
打赏
举报
回复
储存图片
rs.CreateInstance(__uuidof(Recordset));
rs->Open("相片",_variant_t((IDispatch *)m_pConn,true), adOpenKeyset,
adLockOptimistic, adCmdTable);
rs->AddNew();
_variant_t var;
COleDateTime tDate;
m_datePic.GetTime(tDate);
var.vt=VT_DATE;
var.date=tDate;
rs->GetFields()->GetItem("拍摄日期")->Value=var;
var.Clear();
var.vt=VT_BSTR;
var.bstrVal=strTheme.AllocSysString();
rs->GetFields()->GetItem("主题名称")->Value=var;
var.bstrVal=strId.AllocSysString();
rs->GetFields()->GetItem("照片 ID")->Value=var;
CFile file;
if( !file.Open( m_strPicfile, CFile::modeRead) )
return ;
DWORD uFilesize =(DWORD) file.GetLength();
char* pBuffer = new char[uFilesize + 1];
if(pBuffer!=NULL)
{
ZeroMemory(pBuffer,uFilesize + 1);
VERIFY(file.Read(pBuffer,uFilesize)==uFilesize);
VARIANT varImage;
SAFEARRAY *psa;
SAFEARRAYBOUND rgsabound[1];
rgsabound[0].lLbound = 0;
rgsabound[0].cElements = uFilesize;
psa = SafeArrayCreate(VT_UI1, 1, rgsabound);
for (long i = 0; i < (long)uFilesize; i++)
SafeArrayPutElement (psa, &i, pBuffer++);
varImage.vt = VT_ARRAY | VT_UI1;
varImage.parray = psa;
rs->GetFields()->GetItem("图片")->AppendChunk(varImage);
}
rs->Update();
pBuffer=pBuffer-uFilesize;
if(pBuffer)
{
delete [] pBuffer;
pBuffer=NULL;
}
MessageBox("添加数据成功!","提示",MB_OK|MB_ICONINFORMATION);
}
catch (_com_error e)
{
PrintComError(e);
}
if(rs->State)
rs->Close();
AkiraChing
2004-02-03
打赏
举报
回复
读取图片
HGLOBAL hgImageMem = NULL;
LPVOID lpvImageMem = NULL;
long lImageSize = rs->GetFields()->GetItem("图片")->ActualSize;
if(lImageSize > 0)
{
_variant_t varImage;
varImage = rs->GetFields()->GetItem("图片")->GetChunk(lImageSize);
if(varImage.vt == (VT_ARRAY | VT_UI1))
{
hgImageMem = GlobalAlloc(GHND, lImageSize);
if(hgImageMem!=NULL)
{
lpvImageMem = GlobalLock( hgImageMem);
char *pBuffer= NULL;
SafeArrayAccessData(varImage.parray,(void **)&pBuffer);
CopyMemory(lpvImageMem,pBuffer,lImageSize);
SafeArrayUnaccessData (varImage.parray);
CFile file("a.jpg",CFile::modeWrite|CFile::modeCreate);
file.Write(lpvImageMem,lImageSize);
file.Close();
}
}
}
GlobalUnlock(hgImageMem);
lpvImageMem=NULL;
GlobalFree(hgImageMem);
bluebohe
2004-02-03
打赏
举报
回复
http://www.csdn.net/develop/Read_Article.asp?Id=15019
DELPHI
存取
JPEG、
BMP
图像
到
数据库
完整解决方案
DELPHI
存取
JPEG、
BMP
图像
到
数据库
完整解决方案
图片处理
ADO
读写
BMP
用
ADO
方法来读写
BMP
图片,可以实现一些基本的功能
DELPHI
存取
JPEG、
BMP
图像
到
数据库
.rar_delphi_jpg
DELPHI
存取
JPG\
BMP
等
图像
文件到
数据库
数据库
存取
JPEG与
BMP
图片.rar
1.QQ:513187410 2.保证无毒 3.简单,方便,实用 4.实例可以自行改用 5.如有非法,本人无法律责任,由改动代码人负责! 6.需要更多本人作品,查找标签“朱建强” 7.请下载后杀毒
Delphi在SQL
存取
JPGE、
BMP
图像
.rar_DELPHI
图像
_SQL
图像
_delphi sql ima_
图像
del
Delphi在SQL
存取
JPGE、
BMP
图像
数据库
4,017
社区成员
39,807
社区内容
发帖
与我相关
我的任务
数据库
VC/MFC 数据库
复制链接
扫一扫
分享
社区描述
VC/MFC 数据库
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章