无法将存储过程结果返回给Excel

我在SQL Server中有一个存储过程，我从Excel调用，每次通过一些dynamic参数。

我知道存储过程与SQL Server中的参数一起工作（已广泛testing过），但是当我通过Excel调用过程时，我得不到任何结果。

我的连接是build立在数据==>连接，并正在工作 – 它直接撤回列名称。 它从CommandButton运行，vba如下：

Private Sub CommandButton1_Click() Dim HOT As String, RM As String, Season As String, SSD As Date, SED As Date HOT = Sheets("Sheet1").Range("C2").Value RM = Sheets("Sheet1").Range("C3").Value Season = Sheets("Sheet1").Range("C4").Value If Season = "S16" Then SSD = "01/05/2016" SED = "31/10/2016" ElseIf Season = "W16" Then SSD = "01/11/2016" SED = "30/04/2016" ElseIf Season = "S17" Then SSD = "01/05/2017" SED = "31/10/2017" Else End If With ActiveWorkbook.Connections("TRRC").OLEDBConnection .CommandText = "EXEC RatesCalculation '" & Season & "','" & HOT & "','" & RM & "'" ActiveWorkbook.Connections("TRRC").Refresh End With End Sub 

季节信息与IF声明中的所有内容无关，我在存储过程中有一个声明来定义季节的date。

我在存储过程中也有SET NOCOUNT ON 。

以下是我的存储过程：

  @Season Char(3), @RM Char(6), @HOT Char(6) AS BEGIN -- SET NOCOUNT ON added to prevent extra result sets from -- interfering with SELECT statements. SET NOCOUNT ON; -- Insert statements for procedure here DECLARE @SSD as Datetime DECLARE @SED as Datetime IF @Season = 'S16' SET @SSD = '01/05/2016' IF @Season = 'S16' SET @SED = '31/10/2016' IF @Season = 'W16' SET @SSD = '01/11/2016' IF @Season = 'W16' SET @SED = '30/04/2017' --gathering room data (rates, dates) (#tblroomrates) SELECT DISTINCT holhot.hot, prxcontract.ssnver, prxcontract.conid, atchotroom.atcCode, prxconrate.room, prxconrate.dateid, prxcondate.dateStart, prxcondate.dateEnd, prxconrate.type, prxconrate.rate1, prxconrate.rate2 INTO #tblroomrates FROM atchotroom INNER JOIN prxconroom ON atchotroom.room = prxconroom.atchotroom INNER JOIN prxconrate INNER JOIN prxcondate ON prxconrate.ssnver = prxcondate.ssnver AND prxconrate.conId = prxcondate.conId AND prxconrate.dateId = prxcondate.dateId ON prxconroom.ssnver = prxconrate.ssnver AND prxconroom.conId = prxconrate.conId AND prxconroom.room = prxconrate.room INNER JOIN holhot INNER JOIN name ON holhot.hot = name.tosCode INNER JOIN prxcon ON name.code = prxcon.hot INNER JOIN prxcontract ON prxcon.ssnver = prxcontract.ssnver AND prxcon.conId = prxcontract.conId ON prxconroom.ssnver = prxcontract.ssnver AND prxconroom.conId = prxcontract.conId AND atchotroom.code = prxcon.hot WHERE (holhot.holcode = @HOT) AND (prxcon.ssnver = '') AND (prxcontract.constart<=@SED) AND (prxcontract.conend>=@SSD) order by datestart asc; --updating any blank dates to season dates to represent an all season rate(only applies to type 3 and 4) UPDATE #tblroomrates SET #tblroomrates.datestart = prxcontract.constart, #tblroomrates.dateend = prxcontract.conend FROM #tblroomrates INNER JOIN prxcontract ON #tblroomrates.ssnver = prxcontract.ssnver AND #tblroomrates.conid = prxcontract.conid WHERE #tblroomrates.datestart is null AND #tblroomrates.dateend is null --selects all type 3 and 4 rates for all season dates (#tblrates_alldates) SELECT DISTINCT #tblroomrates.ssnver, #tblroomrates.conid, atcCode, room, dateid, dateStart, dateEnd, [type], rate1, rate2 INTO #tblrates_alldates FROM #tblroomrates INNER JOIN prxcontract ON #tblroomrates.ssnver = prxcontract.ssnver AND #tblroomrates.conid = prxcontract.conid WHERE #tblroomrates.dateStart = prxcontract.constart AND #tblroomrates.dateEnd = prxcontract.conend AND #tblroomrates.[type] IN ('3','4') --rate update UPDATE #tblroomrates SET #tblroomrates.rate1 = #tblrates_alldates.rate1, #tblroomrates.rate2 = #tblrates_alldates.rate2 FROM #tblroomrates INNER JOIN #tblrates_alldates ON #tblroomrates.ssnver = #tblrates_alldates.ssnver AND #tblroomrates.conid = #tblrates_alldates.conid AND #tblroomrates.room = #tblrates_alldates.room INNER JOIN prxcontract ON #tblroomrates.ssnver = prxcontract.ssnver AND #tblroomrates.conid = prxcontract.conid WHERE #tblroomrates.dateStart = prxcontract.constart AND #tblroomrates.dateEnd = prxcontract.conend AND #tblroomrates.dateid >'0' --gathers rates where type is 1 (#tblrates_baserates) SELECT DISTINCT * INTO #tblrates_baserates FROM #tblroomrates WHERE [type] = '1' --update rate 2 UPDATE #tblroomrates SET #tblroomrates.rate1 = #tblrates_baserates.rate1 FROM #tblroomrates INNER JOIN #tblrates_baserates ON #tblroomrates.ssnver = #tblrates_baserates.ssnver AND #tblroomrates.conid = #tblrates_baserates.conid AND #tblroomrates.dateid = #tblrates_baserates.dateid WHERE #tblroomrates.[type] = '2' --Calculate the final rate here SELECT #tblroomrates.hot AS [Accom Code], #tblroomrates.atcCode AS [Room], #tblroomrates.dateStart AS [Rate Start], #tblroomrates.dateEnd AS [Rate End], CASE WHEN #tblroomrates.rate2 <> 0 AND #tblroomrates.[type] = 3 THEN #tblrates_baserates.rate1 + #tblroomrates.rate2 WHEN #tblroomrates.rate2 <> 0 AND #tblroomrates.[type] = 4 THEN #tblrates_baserates.rate1 - #tblroomrates.rate2 WHEN #tblroomrates.rate2 <> 0 AND #tblroomrates.[type] IN (0,1,2) THEN #tblroomrates.rate1 ELSE CASE WHEN #tblroomrates.rate1 <> 0 AND #tblroomrates.[type] = 3 THEN #tblrates_baserates.rate1 + (#tblrates_baserates.rate1 * (#tblroomrates.rate1/100)) WHEN #tblroomrates.rate1 <> 0 AND #tblroomrates.[type] = 4 THEN #tblrates_baserates.rate1 - (#tblrates_baserates.rate1 * (#tblroomrates.rate1/100)) ELSE CASE WHEN #tblroomrates.rate2 = 0 AND #tblroomrates.rate1 = 0 THEN #tblrates_baserates.rate1 ELSE #tblroomrates.rate1 END END END AS Calculated_Rates FROM #tblroomrates LEFT JOIN #tblrates_baserates ON #tblroomrates.ssnver = #tblrates_baserates.ssnver AND #tblroomrates.conid = #tblrates_baserates.conid AND #tblroomrates.dateid = #tblrates_baserates.dateid WHERE #tblroomrates.dateid > 0 AND #TBLROOMRATES.ATCCODE = @RM 

相当大的一块，但需要收集最终计算所需的所有数据

Answer 1

确保Excel工作表正在进行身份validation的用户对数据库具有EXECUTE权限。 SELECT是不够的。 因为SP的操作权与对象所有者相同（不同于视图等），所以您不必担心执行SP内部发生的任何操作的权限。

Answer 2

根据上面的build议，我将存储过程分成两个独立的程序–1个收集所有相关数据，第二个完成我的最终计算。 我认为正如拉尔夫所build议的那样，Excel不知道要撤回并显示哪个结果集。 所以问题解决了。 结果是显示错误的数字，但这是我的math问题。