社区
数据库
帖子详情
如何将jpeg图片存入ACCESS数据库,急,急!
zhuchangquan_0
2002-07-04 11:17:02
如何将jpeg图片存入ACCESS数据库,急,急!
...全文
94
2
打赏
收藏
如何将jpeg图片存入ACCESS数据库,急,急!
如何将jpeg图片存入ACCESS数据库,急,急!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
zhuchangquan_0
2002-07-05
打赏
举报
回复
谢谢你的帮助!
mfkzj
2002-07-04
打赏
举报
回复
#include <adoid.h>
#include <adoint.h>
#include <icrsint.h>
#include <atlbase.h>
ADOConnection* m_Conn;
ADORecordset* m_Rec;
//_RecordsetPtr m_Rec;
ADOFields* pFields;
///////设置ADO COM接口
const IID IID_IADOConnection =
{0x00000550,0x0000,0x0010,{0x80,0x00,0x00,0xAA,0x00,0x6D,0x2E,0xA4}};
const CLSID CLSID_CADOConnection =
{0x00000514,0x0000,0x0010,{0x80,0x00,0x00,0xAA,0x00,0x6D,0x2E,0xA4}};
const IID IID_IADORecordset =
{0x00000556,0x0000,0x0010,{0x80,0x00,0x00,0xAA,0x00,0x6D,0x2E,0xA4}};
const CLSID CLSID_CADORecordset =
{0x00000535,0x0000,0x0010,{0x80,0x00,0x00,0xAA,0x00,0x6D,0x2E,0xA4}};
void COleadoDlg::OnOK()
{
// TODO: Add extra validation here
HRESULT hr;
DWORD FileSize,count;
// LONG num;
char *pBuf;
VARIANT varBLOB;
SAFEARRAY *psa;
VARIANT rgvFields;
VARIANT rgvValues;
CFile f;
CFileException e;
HGLOBAL hfilemem;
SAFEARRAYBOUND rgsabound[1];
hr=CoInitialize(NULL);
CString Constr,wCmdString,tempstr;
CComPtr<ADOField> pField;
if(FAILED(hr))
m_Conn = NULL;
m_Rec = NULL;
pFields = NULL;
if(!f.Open(m_PhotoPath,CFile::modeRead,&e))
{
AfxMessageBox("打开文件错误!");
return;
}
f.SeekToBegin();
FileSize=f.GetLength();
hfilemem=GlobalAlloc(GMEM_MOVEABLE,(FileSize));
if(!hfilemem)
{
::AfxMessageBox("内存不够!");
return;
}
pBuf=(char *)GlobalLock(hfilemem);
count=f.Read(pBuf,FileSize);
if(count!=FileSize)
{
::AfxMessageBox("数据错误");
f.Close();
return;
}
f.Close();
hr = ::CoCreateInstance((REFCLSID)CLSID_CADOConnection,NULL,CLSCTX_INPROC_SERVER,\
(REFIID)IID_IADOConnection,(LPVOID*)&m_Conn);
if (FAILED(hr))
return ;
hr = ::CoCreateInstance((REFCLSID)CLSID_CADORecordset,NULL,CLSCTX_INPROC_SERVER,\
(REFIID)IID_IADORecordset,(LPVOID*)&m_Rec);
if (FAILED(hr))
return ;
tempstr="E:\\练习\\MyApp\\数据库\\oleado\\oleado.mdb";
Constr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+tempstr+";Persist Security Info=False";
hr = m_Conn->Open(CComBSTR(Constr),CComBSTR(""),CComBSTR(""),adOpenUnspecified);
if (FAILED(hr))
{
::AfxMessageBox("连接数据库错误!");
return ;
}
wCmdString=_T("select * from userphoto");//
hr = m_Rec->Open(CComVariant(wCmdString),CComVariant(m_Conn),adOpenKeyset,adLockOptimistic,adCmdText);
if (FAILED(hr))
{
::AfxMessageBox("打开表错误!");
return ;
}
/* 添加新的记录 需要两个参数 所以添加两个空的参数*/
rgvFields.vt = VT_ERROR;
rgvFields.scode = DISP_E_PARAMNOTFOUND;
rgvValues.vt = VT_ERROR;
rgvValues.scode = DISP_E_PARAMNOTFOUND;
UpdateData();
m_Rec->AddNew(rgvFields, rgvValues);
m_Rec->put_Collect(CComVariant(1),(CComVariant)(m_UserName));
m_Rec->put_Collect(CComVariant(2),CComVariant((long)m_UseOld)); ///为新记录填充username字段
pField=NULL;
if(pBuf)
{
rgsabound[0].lLbound = 0;
rgsabound[0].cElements = FileSize;
psa = SafeArrayCreate(VT_UI1, 1, rgsabound); ///创建SAFEARRAY对象
for (long i = 0; i < (long)FileSize; i++)
SafeArrayPutElement (psa, &i, pBuf++); ///将pBuf指向的二进制数据保存到SAFEARRAY对象psa中
varBLOB.vt = VT_ARRAY | VT_UI1; ///将varBLOB的类型设置为BYTE类型的数组
varBLOB.parray = psa; ///为varBLOB变量赋值
m_Rec->get_Fields(&pFields);//加入BLOB类型的数据
pFields->get_Item(CComVariant(3),&pField);
pField->AppendChunk(varBLOB);///加入BLOB类型的数据
}
hr=m_Rec->Update(rgvFields, rgvValues);
if(FAILED(hr))
{
::AfxMessageBox("保存失败!");
return ;
}
// m_Rec->UpdateBatch(adAffectAll);
GlobalUnlock(hfilemem);
GlobalFree(hfilemem);
if(m_Rec)
{
m_Rec->Release();
}
if(m_Conn)
{
m_Conn->Close();
m_Conn->Release();
}
::AfxMessageBox("个人资料保存成功");
m_PhotoPath.Empty();
m_UseOld=0;
m_UserName.Empty();
SetDlgItemText(IDC_USERNAME, (LPCTSTR)" "); //在编辑框1中显示文件名
SetDlgItemInt(IDC_USEROLD,0);
// UpdateData(TRUE);
// CDialog::OnOK();
}
使用DELPHI对
ACCESS
和SQL
数据库
存取
图片
一个在
数据库
存取
图片
的演示代码,包含
ACCESS
数据库
和SQL
数据库
两种方式。1、 小高端用户ADO+SQL20002、 在小高端用户使用的
数据库
中SQL是最为普遍的。首先先要用上流(Stream)程序如下:procedure TForm1.DBGrid1DblClick(Sender: TObject); //双击DBGrid栏显示
图片
VarM
Java:实现
图片
存储到
Access
数据库
中(附带源码)
Java:实现
图片
存储到
Access
数据库
中(附带源码)
asp+
access
图片
上传
数据库
图片
以ole对象保存到
数据库
中,并从
数据库
中读取显示实例。 1.asp选取
图片
文件,提交文件和文件类型 hello function abc(){ var a=document.getElementById("file"); var b=document.getElementById("p1"); var c; if (a.value.match(".png")!= null
Java:实现读取
Access
数据库
中存储的
图片
(附带源码)
Java:实现读取
Access
数据库
中存储的
图片
(附带源码)
Access
数据库
中图像的存储和显示
一、 原理介绍--流式数据的类型及其应用在Dephi中提供了TStream来支持对流式数据的操作。TStream是万流之源。但由于它是一个抽象类,故不能被直接使用;而要使用其相应的子类,如:TFileStream 、TStringStream、TMemoryStream、TBlobStream、TWinSocketStream和TOleStream。TStream提供了统一、简洁的方法来进行数据的
数据库
4,017
社区成员
39,806
社区内容
发帖
与我相关
我的任务
数据库
VC/MFC 数据库
复制链接
扫一扫
分享
社区描述
VC/MFC 数据库
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章