运行SQL Server过程的ADODB连接
我目前正试图在VB6中运行某个过程(sql 2005),传递一些参数:运行SQL Server过程的ADODB连接,sql,connection,adodb,procedure,Sql,Connection,Adodb,Procedure,我目前正试图在VB6中运行某个过程(sql 2005),传递一些参数: Dim conn As Connection Set conn = New Connection conn.Open "Provider=whateverprovider;Data Source=whateversource;Database=whateverdatabase;User Id=whateverID;Password=whatever" Dim CMD As ADODB.Command Dim rs As AD
Dim conn As Connection
Set conn = New Connection
conn.Open "Provider=whateverprovider;Data Source=whateversource;Database=whateverdatabase;User Id=whateverID;Password=whatever"
Dim CMD As ADODB.Command
Dim rs As ADODB.Recordset
Set CMD = New ADODB.Command
Set CMD.ActiveConnection = conn
CMD.CommandType = adCmdStoredProc
CMD.Parameters.Append CMD.CreateParameter("@EmpresaCNPJ", adVarChar, adParamInput, 14, "64687015000152")
CMD.Parameters.Append CMD.CreateParameter("@EntradaSaida", adChar, adParamInput, 1, "S")
CMD.Parameters.Append CMD.CreateParameter("@Participante", adVarChar, adParamInput, 60, "0000000020")
CMD.Parameters.Append CMD.CreateParameter("@nroNotaFiscal", adInteger, adParamInput)
CMD.Parameters("@nroNotaFiscal").Value = 2289
CMD.Parameters.Append CMD.CreateParameter("@serieNotaFiscal", adSmallInt, adParamInput)
CMD.Parameters("@serieNotaFiscal").Value = 1
Set rs = CMD.Execute
在最后一行中,我收到以下错误消息:
其中英文内容如下:
“语法错误或访问冲突”
这条消息非常普遍,我不知道问题出在哪里
我做错了什么
以下是过程中sql代码的参数接收部分:
@EmpresaCNPJ varchar(14),
@EntradaSaida char(1)=null,
@Participante varchar(60)=null,
@nroNotaFiscal int=null,
@serieNotaFiscal smallint=null,
@EtapaInicial tinyint=null,
@LineComplement varchar(255)=null
有人告诉我,不是每个参数都应该被传递,它应该只使用五个参数(七个参数中的五个)。您在哪里设置存储过程的名称?
cmd.CommandName=..
编辑:在开始调用参数之前,将命令名
设置为存储过程的名称。追加