#pragma warning (disable: 4146)
#import \"c:\\Program Files\\Common Files\\system\\ado\\msadox.dll\"
#import \"c:\\Program Files\\Common Files\\system\\ado\\msado15.dll\" no_namespace rename(\"EOF\", \"EndOfFile\")
#pragma warning (default: 4146)
#include \"icrsint.h \" #include \"Shlwapi.h \"
#pragma comment(lib, \"Shlwapi.lib \")
在.cpp里加上:
void CMyADODlg::OnBnClickedOk() {
_variant_t RecordAffected; CString strsql; BSTR bstrSQL;
strsql=L\"Create table name(id int,name varchar(10))\"; bstrSQL=strsql.AllocSysString();
m_pConnection->Execute(bstrSQL,&RecordAffected,adCmdText); ::CoInitialize(NULL); HRESULT hr = S_OK; HRESULT hh = S_OK;
CString strcnn(_T(\"Provider=Microsoft.JET.OLEDB.4.0;Data source=C:/aa.dll\")); ADOX::_CatalogPtr pCatalog = NULL; {
hr = pCatalog.CreateInstance(__uuidof (ADOX::Catalog)); hh = m_pConnection.CreateInstance(__uuidof (Connection));
if(FAILED(hr)) {
_com_issue_error(hr); } else {
pCatalog->Create(_bstr_t(strcnn)); }
m_pConnection->Open(_bstr_t(strcnn),L\"\",L\"\", adConnectUnspecified); _ConnectionPtr m_pConnection; try
}
}
catch(_com_error &e) {
AfxMessageBox(e.ErrorMessage()); }
m_pConnection->Close(); m_pConnection=NULL; ::CoUninitialize(); return;
因篇幅问题不能全部显示,请点此查看更多更全内容