ADO参数化执行语句求助

KSlinfeng KSlinfeng 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
小弟今日想写一个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/

YnSky

掌握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 &lt;= 100; i++)   2 {   3    val += i.ToString

weixin_38625599
评论 3
收藏 已收藏
分享
返回顶部
KSlinfeng
数据库 4,017 成员 39,805 内容