描述:
#import "c:\program files\common files\system\ado\msado15.dll" no_namespaces rename("EOF" "adoEOF")
/////////////////////////////////////////////////////////////////////////////
// CDO
/*****************************************************/
/* 方法名:ExecQuery
/* 数据库SQL语句执行
/* @Connect 连接字符串
/* @SQLQuery SQL语句
/* @*ret 返回结果
******************************************************/
STDMETHODIMP CDO::ExecQuery(BSTR Connect, BSTR SQLQuery, VARIANT_BOOL *ret)
{
// TODO: Add your implementation code here
_ConnectionPtr conn;
_variant_t vtEmpty;
*ret=VARIANT_TRUE;
conn.CreateInstance(__uuidof(Connection));
conn->Open(Connect,"","",-1);
conn->Execute(SQLQuery,&vtEmpty,adCmdUnknow);
return S_OK;
}