麻烦你告诉我怎么在VS2008中添加那个ADO控件 感激不尽

麻烦你告诉我怎么在VS2008中添加那个ADO控件 感激不尽,第1张

首先请确定你安装了

ActiveX

空间相应的ADO空间,比如

微软提供的

ACCESS,SQL

SERVER

2005,

在visual

studio

2008系列下的资源视图下张开,打开主窗体,在窗体上的空白处点击鼠标右键--增加ActiveX控件,就能找到“Microsoft

ADO

data

control

6.0(sp6)(oledb)

不管你用的是什么语言也好,都可以在窗体上右键增加附加控件的。

就选择他了,下面就可以快速地为你自己制作访问数据库的程序了。

呵呵,以上都是我自己写的,绝对不是copy的。

在stdafx.h下 添加

#import "C:\Program Files (x86)\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","adoEOF")这个msado15.dll是微软公司提供的ADO相关组件的一个dll。你可以在自己电脑下C盘中搜索下msado15.dll文件 然后把它的目录替换掉上面这个目录就好。

输入完上述内容后 先编译一下工程,而后在执行其他 *** 作就可以了。

示例代码:(以下代码是访问oracle数据库的,也可以用在其他类型数据库中)

void CadotDlg::OnBnClickedBtnQuery()

{

// TODO: 在此添加控件通知处理程序代码

CoInitialize(NULL)

_ConnectionPtr pConn(__uuidof(Connection))

_RecordsetPtr pRst(__uuidof(Recordset))

try

{

pConn->ConnectionString="Provider=MSDAORA.1"

"User ID=XHPassword=XHData Source=GPSPersist Security Info=False"

HRESULT HR=pConn->Open("","","",adConnectUnspecified)

if(SUCCEEDED(HR))

MessageBox(_T("XHGPS数据库连接成功!"))

pRst=pConn->Execute("select * from SMSSEND",NULL,adCmdText)

while(!pRst->adoEOF)

{

_variant_t vID

CString strID

vID=pRst->GetCollect("ID")

strID=((char*)(_bstr_t)vID)

((CListBox*)GetDlgItem(IDC_LIST1))->AddString(strID)//_bstr_t类中有对char*的重载函数

pRst->MoveNext()

}

pRst->Close()

pConn->Close()

pRst.Release()

pConn.Release()

CoUninitialize()

}

catch(_com_error e)

{

CString str

str.Format("对数据库 *** 作出错! %s",(char *)e.Description())

AfxMessageBox(str)

return

}

}


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11793202.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-18
下一篇 2023-05-18

发表评论

登录后才能评论

评论列表(0条)

保存