请教下VC下利用ADO连接Access数据库的问题 http://www.vckbase.com/document/listdoc.asp?mclsid=11http://community.csdn.net/Expert/topic/5248/5248909.xml?temp=.5522425 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 BOOL CDlgDBConnect::ConnectAccess(){ if(m_strDatabase.IsEmpty()) { ::MessageBox(NULL,"Êý¾Ý¿â²»ÄÜΪ¿Õ£¡","Ìáʾ",MB_OK); return false; } theApp.m_pConnection.CreateInstance(__uuidof(Connection)); try { theApp.m_strDatabase=m_strDatabase; m_strDatabase.Replace("\\","\\\\"); _bstr_t strConn; if(m_strPassword.IsEmpty()) { strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +m_strDatabase; theApp.m_pConnection->CursorLocation = adUseClient; theApp.m_pConnection->Open(strConn, "", "", adModeUnknown); } else { strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +m_strDatabase+";Persist Security Info=False;Jet OLEDB:DataBase Password="+m_strPassword; theApp.m_pConnection->Open(strConn, "", "", adModeUnknown); } } catch(_com_error e) { ::MessageBox(NULL,e.Description(),"Ìáʾ", MB_OK); return FALSE; } ::MessageBox(NULL,"Êý¾Ý¿âÁ¬½Ó³É¹¦£¡","Ìáʾ", MB_OK); return TRUE;} http://www.codeproject.com/database/caaadoclass1.asp封装过的,你可以看看 这个正适合你用:http://www.vckbase.com/document/viewdoc/?id=1471 图象存储入ACCESS?何不将文件存储到某一目录下,然后在数据库中记录下名称?数据进库我可以发给你 ky310可以发个例子给我看看吗,我油箱[email protected] 谢谢 读取文件中按位存储的整数 如何得到当前鼠标光标形状?就是IDC_ARROWH还是IDC_CROSS? 菜鸟提问:如何在某些控件上加鼠标事件? CRgn裁剪问题 怎样检测系统的外观? 我想更改Win2000的开机画面,请高手指点 各位大侠请看!怎样才能调用另一个类里的变量或者函数? 为什么我的视会是透明的??100分 各位大侠,我的VC怎么没有CHtmlView这个基类呢? 求购纸牌类游戏的设计思路! 高分相送:multimap中find的参数key,能否实现模糊查询?具体描述请点击。 Z-Buffer消除隐藏面
{
if(m_strDatabase.IsEmpty())
{
::MessageBox(NULL,"Êý¾Ý¿â²»ÄÜΪ¿Õ£¡","Ìáʾ",MB_OK);
return false;
}
theApp.m_pConnection.CreateInstance(__uuidof(Connection));
try
{
theApp.m_strDatabase=m_strDatabase;
m_strDatabase.Replace("\\","\\\\");
_bstr_t strConn;
if(m_strPassword.IsEmpty())
{
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +m_strDatabase;
theApp.m_pConnection->CursorLocation = adUseClient;
theApp.m_pConnection->Open(strConn,
"",
"",
adModeUnknown);
}
else
{
strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +m_strDatabase+";Persist Security Info=False;Jet OLEDB:DataBase Password="+m_strPassword;
theApp.m_pConnection->Open(strConn,
"",
"",
adModeUnknown);
}
}
catch(_com_error e)
{
::MessageBox(NULL,e.Description(),"Ìáʾ", MB_OK);
return FALSE;
}
::MessageBox(NULL,"Êý¾Ý¿âÁ¬½Ó³É¹¦£¡","Ìáʾ", MB_OK);
return TRUE;
}
封装过的,你可以看看
数据进库我可以发给你