VB和VC调用存储过程
本人的程序是C写的,测试发现SQLSERVER疯狂吃内存。只能在SQLSERVER里设置个最大上限加以限制。
最后发现问题出在存储过程的执行过程。本人用VB写了一个仅能够执
行SQL语句的COM,引用到C++程序中,发现内存不涨了。
不知所以然,请大家积极讨论,献计献策。
环境 WIN2K SERVER ado2.8
VC程序:
_ConnectionPtr m_pConnection;
_variant_t RecordsAffected;
HRESULT hr = CoInitializeEx(NULL, COINIT_MULTITHREADED);
m_pConnection.CreateInstance(_uuidof(Connection)); //初始化Connection指针
hr = m_pConnection->Open("FaxServer","sa","",adConnectUnspecified); //连接ODBC数据源
if (SUCCEEDED(hr))
{
m_pConnection->PutCursorLocation(adUseClient);
m_pConnection->Execute("exec proceDuceTest",&RecordsAffected,adCmdUnspecified);
}
VB程序:
Private cn As new ADODB.Connection '数据库连接
With cn
.CursorLocation = adUseClient
.ConnectionTimeout = 5
.ConnectionString = "DSN=FaxServer;uid=sa"
.Open
.Execute "exec proceDuceTest"
End With