数据库多连几次后就显示链接失败了
下面是我写的一个vc用ado链接mssql的类,
在其他类中调用这个类的函数来实现与数据库的内容交互
开始运行很好的
可是不知道为什么用个几个小时候后
我的log文件显示:
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server 不存在或拒绝访问。
2007-5-26 23:37:58> > 错误:
-2147467259(80004005)
//==========================
下面是代码,
希望热心的前辈指点一二
谢谢!
///////////////////////////////////////////
BOOL CConnSQL::ConnSQL()
{
BOOL bSuc=FALSE;
try
{
OleInitialize(NULL);
hr = m_pConnection.CreateInstance( "ADODB.Connection ");///创建Connection对象
if(SUCCEEDED(hr))
{
TRACE( "adodb.connection Create instance suc!\n ");
CString sDS;
sDS.Format( "Provider=SQLOLEDB.1;Password=%s;Persist Security Info=True;User ID=%s;Initial Catalog=DbBaike;Data Source=%s ",sqlPsw,sqlUser,sqlSvrIp);
hr = m_pConnection-> Open((_bstr_t)sDS,L " ",L " ",adOpenUnspecified);
bSuc=TRUE;
}
}
catch (_com_error &e) {
GenerateError( " ",e.Error(),e.Description());
bSuc=FALSE;
}
return bSuc;
}
BOOL CConnSQL::DisConnSQL()
{
m_pConnection-> Close();
::CoUninitialize();
//log_file( "CConnSQL::DisConnSQL() ");
return TRUE;
}
BOOL CConnSQL::ExecSQL(CString sql)
{
BOOL bSuc=TRUE;
bstr_t str=(bstr_t)sql;
try
{
ConnSQL();
_RecordsetPtr m_pRecordset = m_pConnection-> Execute(str,&RecordsAffected,adCmdText);
}
catch(_com_error &e)
{
bSuc=FALSE;
DisConnSQL();
GenerateError(sql,e.Error(),e.Description());
return bSuc;
}
DisConnSQL();
return bSuc;
}
void CConnSQL::GenerateError(CString sql, HRESULT hr, PWSTR pwszDescription)
{
CString strError;
strError.Format( "错误:%s\r\n%d(%x) ",sql,hr,hr);
strError += "\n\n ";
strError +=pwszDescription;
log_file( "> > %s ",strError);
//AfxMessageBox(strError);
}
[解决办法]
与代码无关的,应该是服务器问题或权限问题。