ADO连接oracle数据库,并调用带参数的存储过程

这两天要写一个与oracle存储过程相关的测试程序,可恨自己对着一无所知,探索两天终于出来了,记录之,备以后留用。啦啦啦啦~~~~

first:连接oracle数据库。

工具:oracle 11g

环境:我的数据库存在于虚拟机的远程主机上,所以要进行远程连接。需要在自己的电脑上装备上 Oracle 的客户端。设置数据源。

设置数据源步骤:1,安装好oracle client 11g 后,打开 net manger,选择本地-》服务命名,点击左边的绿色“+”号。

填入网络服务名字(设置odbc数据源时要用到);

然后一步一步往下走,结束记得测试连接和保存哦。

2.设置odbc数据源,可以用管理页面的打开,也可以用oracle数据管理员。

点击添加,选择oracle 11g 选项, 设置

其中tns 为 net manger 设置的网络服务名,dsn 为 数据库名称。测试连接,并点击ok。 自此数据源设置ok。

3,下面打开vs,开始用ado连接数据库

#import "C://program files//common files//system//ado//msado15.dll" no_namespace rename ("EOF", "adoEOF")  加入库,并重命名结束符号

(64位系统编写是请使用,#import "C:\Program Files (x86)\Common Files\System\ado\msado15.dll" no_namespace rename("EOF", "adoEOF")  否则会出现 存储过程错误

	_ConnectionPtr m_cConnectPtr;
	_CommandPtr m_pCommand;
声明两个参数。然后对ado 组件进行初始化:CoInitialize(NULL);  //初始化Com组件  

当然,离开的时候要进行反初始化,CoUninitialize(); 

接下去是连接数据库:

	HRESULT hr = m_cConnectPtr.CreateInstance(__uuidof(Connection));       
	if (FAILED(hr))
	{
		AfxMessageBox("Create ADO Connection Failed!");
		return;
	}	
	try   
   	{    
		hr = m_cConnectPtr->Open("Provider=OraOLEDB.Oracle.1;Data Source=oracle_epolice", "epoliceadmin", "epoliceadmin", adModeUnknown);
		//其中,ds为odbc数据源设置的tsn和netmanger设置的网络服务名,然后就是用户和密码了。
		if (FAILED(hr))
		{
			AfxMessageBox("Cannot connect to database!");
		}
    	}
	
    	catch(_com_error e)                                              //捕捉异常       
    	{      
		AfxMessageBox(e.Description());	
		return;
    	}

	AfxMessageBox("connect success");     
ok,数据库连接上,则可以开始对数据库的操作了。当昨晚数据库操作后,要记得断开连接哦:m_cConnectPtr->Close();

3,我做的是数据库调用有参数的存储过程,程序如下:

void COracle_firstDlg::OnBtnBegin() 
{
	_ParameterPtr param = NULL;
	_bstr_t    bstrSP("{CALL PROC_INSERT_EP_PASSVEHICLE(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)}" );
	try
	{
		m_pCommand.CreateInstance(__uuidof(Command));
		m_pCommand->ActiveConnection = m_cConnectPtr;  // 将库连接赋于它
		m_pCommand->CommandText = bstrSP;
		m_pCommand->CommandType      = adCmdText;

		m_cConnectPtr->Properties->Refresh();   //重要步骤

		create_param4proc_vchar("in_pass_index",m_pass_index.GetLength(),m_pass_index.GetBuffer(m_pass_index.GetLength()));
		create_param4proc_vchar("in_chan_index",m_chan_index.GetLength(),m_chan_index.GetBuffer(m_chan_index.GetLength()));
		create_param4proc_vchar("in_pass_direction",m_pass_direction.GetLength(),m_pass_direction.GetBuffer(m_pass_direction.GetLength()));
		create_param4proc_vchar("in_pass_licence_code",m_pass_lience_code.GetLength(),m_pass_lience_code.GetBuffer(m_pass_lience_code.GetLength()));
		create_param4proc_vchar("in_pass_licence_type",m_pass_lience_type.GetLength(),m_pass_lience_type.GetBuffer(m_pass_lience_type.GetLength()));
		create_param4proc_data("in_pass_time",m_pass_time);
		create_param4proc_num("in_pass_real_speed",m_pass_real_speed.GetLength(),m_pass_real_speed.GetBuffer(m_pass_real_speed.GetLength()));
		create_param4proc_num("in_pass_length",m_pass_length.GetLength(),m_pass_length.GetBuffer(m_pass_length.GetLength()));
		create_param4proc_vchar("in_pass_licence_color",m_pass_lience_color.GetLength(),m_pass_lience_color.GetBuffer(m_pass_lience_color.GetLength()));
		create_param4proc_vchar("in_pass_type",m_pass_type.GetLength(),m_pass_type.GetBuffer(m_pass_type.GetLength()));
		create_param4proc_blob("in_pass_part_pic",m_pass_real_pic.GetBuffer(m_pass_real_pic.GetLength()));
		create_param4proc_blob("in_pass_full_pic",m_pass_full_pic.GetBuffer(m_pass_full_pic.GetLength()));
		create_param4proc_blob("in_pass_licence_pic",m_pass_lience_pic.GetBuffer(m_pass_lience_pic.GetLength()));
		create_param4proc_vchar("in_pass_record_type",m_pass_record_type.GetLength(),m_pass_record_type.GetBuffer(m_pass_record_type.GetLength()));
		create_param4proc_vchar("in_pass_deal_mark",m_pass_deal_mark.GetLength(),m_pass_deal_mark.GetBuffer(m_pass_deal_mark.GetLength()));
		create_param4proc_vchar("in_roadway_index",m_roadway_index.GetLength(),m_roadway_index.GetBuffer(m_roadway_index.GetLength()));
		create_param4proc_blob("in_pass_option_pic",m_pass_option_pic.GetBuffer(m_pass_option_pic.GetLength()));
		create_param4proc_blob("in_pass_splice_pic",m_pass_splice_pic.GetBuffer(m_pass_splice_pic.GetLength()));
		create_param4proc_vchar("in_pic_asso_num",m_pic_asso_num.GetLength(),m_pic_asso_num.GetBuffer(m_pic_asso_num.GetLength()));
		create_param4proc_vchar("in_full_pic_md5",m_full_pic_md5.GetLength(),m_full_pic_md5.GetBuffer(m_full_pic_md5.GetLength()));
		create_param4proc_vchar("in_licence_pic_md5",m_lience_pic_md5.GetLength(),m_lience_pic_md5.GetBuffer(m_lience_pic_md5.GetLength()));
		create_param4proc_vchar("in_splice_pic_md5",m_splice_pic_md5.GetLength(),m_splice_pic_md5.GetBuffer(m_splice_pic_md5.GetLength()));

		m_pCommand->Properties->Refresh();   //重要步骤
		//运行存储过程
		PropertyPtr prop = m_pCommand->Properties->GetItem("SPPrmsLOB");
		prop->PutValue(_variant_t(VARIANT_TRUE,VT_BOOL)) ;
		m_pCommand->Execute(NULL,NULL, adExecuteNoRecords);
		prop = m_pCommand->Properties->GetItem("SPPrmsLOB");
		prop->PutValue(_variant_t(VARIANT_FALSE,VT_BOOL)) ;

	}
	catch (_com_error e)
	{
		AfxMessageBox(e.Description());
		return ;
	}
	AfxMessageBox("instert sucess");
}

以下是对4中参数的用法:

int COracle_firstDlg::create_param4proc_vchar(char* proc_param,int length,char* value)
{
	_ParameterPtr param = NULL;
	param = m_pCommand->CreateParameter((_bstr_t)proc_param,adVarChar,adParamInput,length,(_variant_t)value);
	m_pCommand->Parameters->Append(param);
	return TRUE;
}

int COracle_firstDlg::create_param4proc_data(char* proc_param,COleDateTime m_data)
{
 	_ParameterPtr param = NULL;
// 	COleDateTime co_data;
// 	co_data.ParseDateTime(m_data);
	_variant_t vardata = m_data;
	param = m_pCommand->CreateParameter((_bstr_t)proc_param,adDate,adParamInput,20,vardata);
	m_pCommand->Parameters->Append(param);
	return TRUE;
}

int COracle_firstDlg::create_param4proc_blob(char* proc_param,char* pic_addr)
{
	_ParameterPtr param = NULL;
	//读取一张图片
	_variant_t varOptional(DISP_E_PARAMNOTFOUND,VT_ERROR); 
	_StreamPtr adostream;
	adostream.CreateInstance(_T("ADODB.Stream"));
	adostream->Type = adTypeBinary;
	adostream->Open(varOptional,adModeUnknown, adOpenStreamUnspecified, _T(""), _T(""));
	adostream->LoadFromFile(pic_addr);
	_variant_t vReadTo = adostream->Read(adReadAll); 
	long blob_size = adostream->GetSize();
	adostream->Close();

	param = m_pCommand->CreateParameter((_bstr_t)proc_param,adLongVarBinary,adParamInput,blob_size,vReadTo);
	m_pCommand->Parameters->Append(param);

	return TRUE;
}

int COracle_firstDlg::create_param4proc_num(char* proc_param,int length,char* value)
{
	_ParameterPtr param = NULL;
	param = m_pCommand->CreateParameter((_bstr_t)proc_param,adInteger,adParamInput,4,(_variant_t)value);
	m_pCommand->Parameters->Append(param);
	return TRUE;
}

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值