ADO 执行存储过程，取字符串类型的返回值

_CommandPtr  pCommand = NULL;			// Command Object
	_ParameterPtr   inParam=NULL; 
    _ParameterPtr   outParam=NULL; 

	try
	{
		// 创建 ADODB::_CommandPtr对象
		if( FAILED(pCommand.CreateInstance(__uuidof(Command))))
		{
			CString ss;
			ss = _T("创建 ADODB::_CommandPtr对象失败！") ;
			//WriteErrToLog( ss );

			return FALSE;
		}

		pCommand->ActiveConnection = m_pCon; // 绑定连接

		pCommand->CommandText = _T("proc_GetPackageCfg");//存储过程名
		pCommand->PutCommandType(adCmdStoredProc);

		_variant_t   varDevID;
		_variant_t   varDevCfg;

		// 以下绑定参数
		varDevID = deviceID;
		inParam = pCommand->CreateParameter   
								(   
									_bstr_t(_T("DEVICE_ID")), // 参数名称
									adUnsignedBigInt,   
									adParamInput,
									sizeof(UINT64),
									varDevID
								); 
		pCommand->Parameters->Append(inParam);

		outParam = pCommand->CreateParameter   
								(   
									_bst