如何在VC中调用已定义好的储存过程 急急急

Question

我在数据库中已定义了一个带一个varchar参数的存储过程 p_1
我在vc中的调用形式如下 UpdateData();
    CString sql="exec p_1 '"+m_Edit1+"'";   -----------m_Edit1为CString类型
   
if(pDS->IsOpen())
pDS->Close();
pDS->Open(CRecordset::snapshot,CString(sql));
执行后有错误提示为"在关键字exec 附近有语法错误,为能准备语句"我想了很久想不明白,望大侠指点,谢谢

Answer 1

你看看这个。可能对你有帮助!~使用ADO调用存储过程
    在ADO中调用存储过程一直是一个困扰大家的问题。其实，关于ADO调用存储过程的
   方法在很多书中都有讲到，标准的做法无非是按照以下步骤进行：
    1、生成并初始化一个_CommandPtr对象；
    2、生成调用存储过程需要的参数，这些参数都是_ParameterPtr对象；
    3、按照顺序将使用_CommandPtr的Append方法为存储过程提供参数（包括输入参数
       和输出参数）；
    4、为_CommandPtr对象指定需要使用的ADO连接；
    5、使用_CommandPtr的Execute方法调用存储过程；
    6、从结果中获取返回参数的值（如果有的话）。
   具体的过程在此我不详细描述，我想看看本文附带的代码就应该很明白了。
   在这里我想就我使用ADO调用存储过程时的一些体会说明一下。
  1、关于CreateParameter函数
   该函数的原型为：CreateParameter (Name, Type, Direction, Size, Value)
   其中Name是参数的名称，可以指定也可以不指定；
   Type是一个DataTypeEnum值，指定参数的类别，取值有adInteger（整型）、adChar（字符/字符串型）等；
   Direction是一个ParameterDirectionEnum值，其取值为adParamInput、adParamOutput、
   adParamOutput、adParamReturnValue、adParamUnknown；
   Size是一个Long类型的值，指示该参数值以字节计算的最大长度，例如对int型，该值可以取为sizeof(int)，
   对Long型，该值可以取为sizeof(long)，对字符串型，可以使用该字符串的长度；
   Value是一个variant类型的值，是该参数的取值。
   在这里需要注意的是，Type参数、Direction参数以及Size参数一定要和存储过程定义时的参数相吻合，
   例如，如果有下面一个存储过程
   CREATE  PROCEDURE SMS_Proc_Handle_All
   (@UserID Integer,
    @SourAddr Varchar(15),
    @DestAddr varchar(5000),
    @AvValue Single output,
    @ReturnInfo varchar(100) output
   )
   则Type参数的取值依次为adInteger、adChar、adChar、adSingle，adChar；
   Direction参数的取值依次为adParameterIn、adParameterIn、adParameterIn、adParameterOut、adParameterOut；
   对于输入参数，Size的值可以根据实际数值来定，对于输出参数，最好是根据定义确定（上例中ReturnInfo参数的
   Size值可以取为100）。
   2，关于获取Output的参数
     获取ourput参数是大家最关注的问题，同时也是最“难”的问题，因为按照书本上的写法，经常获得不了
   Output参数，其实这个问题很容易解决：在调用_CommandPtr的Execute方法时，写成
   cmmd->Execute(NULL, NULL, adCmdStoredProc);
   而不要写成
   RecordsetPtr rec = cmmd->Execute(NULL, NULL, adCmdStoredProc);
   也就是说，不取返回值（我不知道这是为什么，但是相信我，事情就是这样）。
   这句执行完后，使用
   cmmd->Parameters->GetItem("XXXXXX")->GetValue();
                          ^^^^^^^
                        输出参数的名称
   就可以获得输出参数的值了。
   以下是一个通过ADO调用存储过程的部分代码：
  _CommandPtr cmmd;
  HRESULT hr = cmmd.CreateInstance(__uuidof(Command));
  if(FAILED(hr))
  {
   AfxMessageBox("NewNetDatabase()中创建_CommandPtr对象失败");
   return 0;
  }
  _ParameterPtr param;
  param = cmmd->CreateParameter(""/*NetType*/,adTinyInt, adParamInput,
    sizeof(BYTE),(BYTE)(m_nNetType+1));
  cmmd->Parameters->Append(param);
  param = cmmd->CreateParameter(""/*Name*/,adVarChar, adParamInput,
   m_strName.GetLength()+1, _variant_t(m_strName));
  cmmd->Parameters->Append(param);
  param = cmmd->CreateParameter(""/*Desp*/,adVarChar, adParamInput,
   m_strDesp.GetLength()+1, _variant_t(m_strDesp));
  cmmd->Parameters->Append(param);
  param = cmmd->CreateParameter("NewNetID"/*NetID*/,adInteger, adParamOutput,
   sizeof(long), (long)m_nNewNetID);//返回参数，返回新建的网络的ID
  cmmd->Parameters->Append(param);
   cmmd->CommandText=_bstr_t("GSDT_NewNet");//存储过程的名称
  cmmd->ActiveConnection = m_pConPtr;//需要使用的ADO连接
  cmmd->CommandType=adCmdStoredProc;
  //注意下面的一行代码，如果你写成这样，就获得不了返回参数的值
  //_RecordsetPtr rec = cmmd->Execute(NULL, NULL, adCmdStoredProc);
  //我不知道这是为什么，但事实就是这样：）
  cmmd->Execute(NULL, NULL, adCmdStoredProc);
  m_nNewNetID=(long)cmmd->Parameters->GetItem("NewNetID")->GetValue();//通过参数返回值
  cmmd.Detach(); ActiveX Data Objects (ADO) enables you to write a client application to access and manipulate data in a database server through a provider. 
ADO's primary benefits are ease of use, high speed, low memory overhead, and a small disk footprint.
This sample project is for ADODB, an implementation of ADO optimized for use with Microsoft OLE DB providers, including the Microsoft ODBC provider for OLE DB.
Using this we can execute stored procedure, pass arguments and retrieve value. To use this sample you will have to create the two stored procedures mentioned below. 
For using this project you need MFC 5.0 OR above + ADO in your machine. {
   CString strTmp;   CString m_sdatasource; // Data source name
   CString m_sUserID;     // User Id
   CString m_sPassword;   // Password   // GET the above values from the user
   //Without creating Datasource we can use database by the following   code
   /* strTmp.Format( "driver={sql server};"
                           "server=%s;"
                           "Database=%s;""UID=%s;""PWD=%s;",
                           m_server,m_sdatabase,m_sUserID,m_sPassword );*/   strTmp.Format( "dsn=%s;""UID=%s;""PWD=%s;",m_sdatasource,m_sUserID,m_sPassword );
   _bstr_t         bstrSQLServerConnect;
   _bstr_t bstrProc =( L"sp_StartByteImport" );; //Stored procedure name
   _variant_t Final;
   bstrSQLServerConnect = (LPCTSTR) strTmp;
   m_status="Empty File";
   _ConnectionPtr  Conn1; // connection object pointer
   _CommandPtr     Cmd1;  // command object pointer
   _RecordsetPtr   Rs1; // recordset object pointer
   bool            bvalid = false;
   try
   {
      Conn1.CreateInstance( __uuidof( Connection ) ); // Instantiating connection object
  Conn1->ConnectionString = bstrSQLServerConnect; // giving the sqlconnection
  Conn1->Open( bstrEmpty, bstrEmpty, bstrEmpty ); // open the connection object
  Cmd1.CreateInstance( __uuidof( Command ) ); // creating command object
  Cmd1->ActiveConnection = Conn1;             // giving the connection handle
  Cmd1->CommandText      = _bstr_t( bstrProc ); // passing the stored procedue
  Cmd1->CommandType      = adCmdStoredProc;     // type
  Cmd1->Parameters->Refresh();                 // passing string value as argument to stored procedure
  Cmd1->Parameters->Item[ _variant_t( (long) 1 ) ]->Value = _variant_t( (LPCTSTR)m_sfilename );
  Rs1 = Cmd1->Execute( &vtEmpty, &vtEmpty2, adCmdUnknown ); // executing the stored procedure and storing the recordset value
  bvalid = true;
  Final  = Rs1->Fields->GetItem( _variant_t( 0L ) )->Value; // getting the first column value of the result row
  strTmp.Format( "%s", CrackStrVariant( Final) ); // to see the value
  // put your code to see all column values
   }
   catch( CException *e ) // trapping all error messages
   {
  TCHAR    szCause[255];
      e->GetErrorMessage(szCause, 255);
  m_status=szCause;
   }
   catch( _com_error &e )
   {
m_status=e.ErrorMessage( );
   }
   catch(...)
   {
m_status="Error while executing the Import";   }
    //we need to create the stored procedures below before running the application
//CREATE PROCEDURE sp_AddAccountingInfo @nfinal int, @pcDate datetime,
//@pcURL varchar (250), @pcTop varchar (250),
//@pcQueryString varchar (250), @pcBytes int, @pcRequests int AS
       /*
Do your operation here
*/
//CREATE PROCEDURE sp_AddAccountingInfo
//@nfinal int,
//@pcDate datetime,
//@pcURL varchar (250),
//@pcTop varchar (250),
//@pcQueryString varchar (250),
//@pcBytes int,
//@pcRequests int
//AS
/*
Put your code here
*/
}