ADO参数化执行语句求助
代码如下:
DAOBaseAdo.h
#pragma once
///#import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename ("EOF", "adoEOF")
//注意Windows 7 Sp1 时要使用改配置文件
#import "C:\Program Files\Common Files\System\ado\msado60_Backcompat_ia64.tlb" no_namespace rename("EOF","adoEOF")
/*
数据库ADO操作相关类封装
*/
/*
1.Initialization();
2.Open
3.Query
*/
struct ST_SQLPARAM
{
CString name;
DataTypeEnum type;
ParameterDirectionEnum direction;
ADO_LONGPTR size; //默认长度为-1
_variant_t value;
};
class CDataBaseAdo
{
private:
//
CString errorMsg;
bool m_iniStates;
int paramIndex;
public:
_ConnectionPtr m_pConnection;
_RecordsetPtr m_pRecordSet;
_CommandPtr m_pCommand;
CDataBaseAdo(void);
~CDataBaseAdo(void);
//
CString GetErrorMsg();
//初始化
bool Initialization();
//打开连接
bool Open(CString vServer,CString vPort,CString vDBName,CString vUser,CString vPwd);
//查询数据
bool Query(LPCTSTR strSQL, long nCursorType=adOpenDynamic, long nLockType=adLockOptimistic, long nOptions=adCmdText);
void CloseQuery();
//执行命令
void Execute(CString strSql);
void ExecuteWithParam(CString strSql,ST_SQLPARAM params[],int size);
//事务相关操作
//事务开始
void BeginTrans();
//事务提交
void CommitTrans();
//事务回滚
void RollbackTrans();
//---数据集相关操作
//结尾否
bool isEOF();
void MoveFirst();
void MoveLast();
void MoveNext();
void MovePrevious();
_variant_t GetValueByFieldName(CString strName);
};
DataBaseADO.cpp
#include "StdAfx.h"
#include "DataBaseAdo.h"
CDataBaseAdo::CDataBaseAdo(void)
{
m_pCommand = NULL;
m_pConnection = NULL;
m_pRecordSet = NULL;
m_iniStates = false;
}
CDataBaseAdo::~CDataBaseAdo(void)
{
if(m_pRecordSet != NULL && m_pRecordSet->State == adStateOpen){
m_pRecordSet->Close();
}
if(m_pConnection != NULL && m_pConnection->State == adStateOpen){
m_pConnection->Close();
}
}
bool CDataBaseAdo::Initialization()
{
if(!SUCCEEDED(m_pConnection.CreateInstance("ADODB.Connection")))
{
errorMsg = _T("ADODB.Connection对象创建失败!");
return false;
}
if (!SUCCEEDED(m_pRecordSet.CreateInstance("ADODB.Recordset")))
{
errorMsg = _T("ADODB.Recordset对象创建失败!");
return false;
}
if (!SUCCEEDED(m_pCommand.CreateInstance("ADODB.Command")))
{
errorMsg = _T("ADODB.Command对象创建失败!");
return false;
}
m_iniStates = true;
return true;
}
bool CDataBaseAdo::Open(CString vServer,CString vPort,CString vDBName,CString vUser,CString vPwd)
{
try
{
if(!m_iniStates){
errorMsg = _T("请先初始化");
return false;
}
if(m_pConnection != NULL && m_pConnection->State == adStateOpen){
m_pConnection->Close();
}
return SUCCEEDED(m_pConnection->Open(_bstr_t(_T("Provider=SQLOLEDB;Server=")+vServer+_T(",")+vPort+_T(";Database=")+vDBName),
_bstr_t(vUser), _bstr_t(vPwd), adConnectUnspecified));
}
catch (_com_error e)
{
errorMsg = _T("数据库无法连接!");
return FALSE;
}
}
bool CDataBaseAdo::Query(LPCTSTR strSQL, long nCursorType/* =adOpenDynamic */, long nLockType/* =adLockOptimistic */, long nOptions/* =adCmdText */)
{
if(!m_iniStates){
errorMsg = _T("请先初始化");
return false;
}
try{
if(m_pRecordSet->State == adStateOpen)
{
m_pRecordSet->Close();
}
return (SUCCEEDED(m_pRecordSet->Open(_variant_t(strSQL),
m_pConnection.GetInterfacePtr(),
(CursorTypeEnum)nCursorType,
(LockTypeEnum)nLockType,
nOptions)));
}
catch (_com_error e)
{
errorMsg.Format(_T("错误码:%d"),e.WCode());
return false;
}
}
CString CDataBaseAdo::GetErrorMsg()
{
return errorMsg;
}
bool CDataBaseAdo::isEOF()
{
return m_pRecordSet->adoEOF?true:false;
}
void CDataBaseAdo::MoveFirst()
{
m_pRecordSet->MoveFirst();
}
void CDataBaseAdo::MoveLast()
{
m_pRecordSet->MoveLast();
}
void CDataBaseAdo::MoveNext()
{
m_pRecordSet->MoveNext();
}
void CDataBaseAdo::MovePrevious()
{
m_pRecordSet->MovePrevious();
}
_variant_t CDataBaseAdo::GetValueByFieldName(CString strName)
{
return m_pRecordSet->GetCollect(_variant_t(strName));
}
void CDataBaseAdo::CloseQuery()
{
if(m_pRecordSet!=NULL && m_pRecordSet->State == adStateOpen)
{
m_pRecordSet->Close();
}
}
void CDataBaseAdo::BeginTrans()
{
m_pConnection->BeginTrans();
}
void CDataBaseAdo::CommitTrans()
{
m_pConnection->CommitTrans();
}
void CDataBaseAdo::RollbackTrans()
{
m_pConnection->RollbackTrans();
}
void CDataBaseAdo::Execute(CString strSql)
{
m_pCommand->ActiveConnection = m_pConnection;
m_pCommand->CommandText = _bstr_t(strSql);
m_pCommand->CommandType = adCmdText;
m_pCommand->Execute(NULL,NULL,adCmdText);
}
void CDataBaseAdo::ExecuteWithParam(CString strSql,ST_SQLPARAM params[],int size)
{
m_pCommand->ActiveConnection = m_pConnection;
m_pCommand->CommandText = _bstr_t(strSql);
for(int i=0;i<size;i++){
m_pCommand->Parameters->Append(m_pCommand->CreateParameter(_bstr_t(_T("")),adInteger,adParamInput,4,_variant_t((int)2)));
}
m_pCommand->CommandType = adCmdText;
m_pCommand->Execute(NULL,NULL,adCmdText);
}
//测试代码
ado.Initialization();
ado.Open(m_ip,m_prot,_T("AdoTemp"),m_user,m_pwd);
try
{
int id = 1;
ST_SQLPARAM param[1];
param[0].name = _T("");
param[0].type = adInteger;
param[0].direction = adParamInput;
param[0].size = -1;
param[0].value = _variant_t(id);
ado.ExecuteWithParam(_T("select * from table1 where id > ?"),param,1);
}catch(_com_error &e){
AfxMessageBox(e.Description());
}
一直报错,但_com_error无法捕捉到
错误停止在:afxtls.h
inline void* CThreadSlotData::GetThreadValue(int nSlot)
{
EnterCriticalSection(&m_sect);
ASSERT(nSlot != 0 && nSlot < m_nMax);
ASSERT(m_pSlotData != NULL);
ASSERT(m_pSlotData[nSlot].dwFlags & SLOT_USED);
ASSERT(m_tlsIndex != (DWORD)-1);
if( nSlot <= 0 || nSlot >= m_nMax ) // check for retail builds.
{
LeaveCriticalSection(&m_sect);
return NULL;
}
CThreadData* pData = (CThreadData*)TlsGetValue(m_tlsIndex);
if (pData == NULL || nSlot >= pData->nCount)
{
LeaveCriticalSection(&m_sect);
return NULL;
}
void* pRetVal = pData->pData[nSlot];
LeaveCriticalSection(&m_sect);
return pRetVal;
}
最后一行。求给位大侠帮看看。
运行环境 Windows7sp1 64bit , VS2010
相关推荐
access 一次执行多条sql语句
access 一次执行多条sql语句! 值得下载看看!资源免费,大家分享!! 更多免费资源 http://ynsky.download.csdn.net/
掌握ADO与DAO:在VBA中执行查询与参数化查询
本文介绍了如何在VBA中使用ADO和DAO技术执行查询操作,包括创建选择查询、修改现有查询、创建参数查询以及制作表查询。通过实例代码和详细步骤,我们学习了如何操作数据库记录,并通过实际的VBA程序来实现数据的查询与更新。
ADO.NET参数化查询与Oracle数据库交互指南
ADO.NET 是一个用于.NET 应用程序的数据访问技术,它允许开发者与多种数据源进行交互,包括SQL Server、Oracle、MySQL等。其核心组件包括数据提供者、DataSet 和 数据适配器等,这些组件共同工作,以实现数据的检索、更新、查询和管理。当需要执行带有参数的 SQL 语句时,OracleParameter 对象会用来定义这些参数。在定义参数时,需要指定数据类型,这些类型应该与数据库中对应的列类型相匹配。如果类型不匹配,可能会导致数据错误或性能下降。
ado.net操作oracle简单参数化sql操作
关于ado.net简单的参数化查询,操作的是oracle数据库!关于ado.net简单的参数化查询,操作的是oracle数据库!
如何用参数化SQL语句污染你的计划缓存
你的SQL语句的参数化总是个好想法。使用参数化SQL语句你不会污染你的计划缓存——错!!!在这篇文章里我想向你展示下用参数化SQL语句可以污染你的计划缓存,这是非常简单的! ADO.NET-AddWithValue ADO.NET是实现像SQL Server关系数据库数据访问的.NET框架的组成——有一些严重的副作用。不要误解我——只要你正确使用,ADO.NET一直很棒。你马上会看到,它很容易被错误使用。我们来看下面实现SQL语句执行的C#代码。 1 for (int i = 1; i <= 100; i++) 2 { 3 val += i.ToString


数据库
