解决方案 »
- CEdit背景设置透明不成功,求纠正!!!!!!!
- 关于链表问题 C++
- 急!急! VC中如何删除文本文件中的一条记录或更改其中的一条记录??(公司项目急啊!)
- 如何发布我的数据库程序(带有ado和datagrid控件)
- 学了c 语言后还应该学些什么?:《
- 谁有文件(字符串)加密的算法(含源代码最好了)
- Microsoft的Encoder,它可以把编码的流数据发到某一http端口,可以通过MediaPlayer来访问播放,有哪位大哥知道它的原理呢?网络是怎样实
- 没见过!
- CFileDialog另存为对话框不显示?
- 请问:如何做出xp样式的菜单?
- 关于MFC程序打包问题
- ActiveX release 版本问题
{
CString m_strConnectString;
HRESULT hr = S_OK; MSDASC::IDataSourceLocatorPtr ptrDataSourceWnd = NULL;
hr = ptrDataSourceWnd.CreateInstance(__uuidof(MSDASC::DataLinks));
if(FAILED(hr))
_com_issue_error(hr);
hr = ptrDataSourceWnd->put_hWnd((long)this->m_hWnd);
if(FAILED(hr))
_com_issue_error(hr);
IDispatchPtr ptrDispatch = NULL;
hr = ptrDataSourceWnd->PromptNew(&ptrDispatch);
if(FAILED(hr))
_com_issue_error(hr);
if(ptrDispatch != NULL)
{
_ConnectionPtr m_Conn= ptrDispatch;
BSTR bstrConnectString =m_Conn->ConnectionString;
USES_CONVERSION;
m_strConnectString = W2CT(bstrConnectString);
TRACE(_T("Connect String: %s\n"), (LPCTSTR)m_strConnectString);
}
return m_strConnectString;
}//功能: 在对话框中,用户点按钮,打开数据链接对话框。
void CMyDialog::OnBnClickedLink()
{
// TODO: 在此添加控件通知处理程序代码
strConnection = ADOConnection() + ";" ;
}//功能: 打开预先定义的udl文件。BOOL CMyDialog::OnInitDialog()
{
CDialog::OnInitDialog(); // TODO: 在此添加额外的初始化
strAppPath = theApp.AppPathName();
strConnection = _T("File Name="+strAppPath+"\\dbspy.udl;");
return TRUE; // return TRUE unless you set the focus to a control
// 异常:OCX 属性页应返回 FALSE
}