在VB6中使用SP關閉對象時不允許運行時錯誤'3704'操作

我正在使用存儲過程「sp_Missingdata」來獲取數據並顯示在MSFlexGrid中，但我是得到的錯誤爲 - 運行時錯誤'3704'操作是不允許的，當對象關閉時 我在谷歌搜索了很多並且改變了這些東西 - 1.爲存儲過程設置NOCOUNT ON。
2.爲存儲過程設置SET ANSI_WARNINGS OFF。在VB6中使用SP關閉對象時不允許運行時錯誤'3704'操作

Private Sub Command2_Click() 
Dim cmd As ADODB.Command 
    Dim sqlnew, dd 
Set cmd = New ADODB.Command 
cmd.ActiveConnection = ArtmConn 
cmd.CommandType = adCmdStoredProc 
cmd.CommandText = "sp_missingData" 

    Dim rsnew As ADODB.Recordset 
    Set rsnew = New ADODB.Recordset 
    Set rsnew = cmd.Execute 


    If Not rsnew.EOF Then <-- Error is occuring here 
    Set tblSop.DataSource = rsnew 
    End If 
    rsnew.Close 
    Set rsnew = Nothing 

End Sub

注意 - 我的SP在這裏使用臨時表 - 是我的SP

SET ANSI_NULLS ON 
GO 
SET QUOTED_IDENTIFIER ON 
GO 
SET NOCOUNT ON 
GO 
SET ANSI_WARNINGS OFF 
GO 

ALTER procedure [dbo].[sp_missingData] --exec [sp_missingData] 
as begin 
delete from tbl_missingData 
select ol_code as outletNo, start as StartreceiptNo into #temp from 
(select l.s_ol_code as ol_code, l.sno + 1 as start 
from vSalesNo as l 
    left outer join vSalesNo as r on l.sno + 1 = r.sno and l.s_ol_code = r.s_ol_code 
where r.sno is null) as tmpa inner join 
(select s_ol_code, max(s_no) as s_no from sales group by s_ol_code) as tmpb 
on s_ol_code = ol_code and start <= substring(s_no, 0, 11) where start!=0 
union all 
select ol_code as outletNo, start as EndreceiptNo from 
(select l.s_ol_code as ol_code, l.sno - 1 as start 
from vSalesNo as l 
    left outer join vSalesNo as r on l.sno - 1 = r.sno and l.s_ol_code = r.s_ol_code 
where r.sno is null) as tmpa inner join 
(select s_ol_code, max(s_no) as s_no from sales group by s_ol_code) as tmpb 
on s_ol_code = ol_code and start <= substring(s_no, 0, 11) where start!=0 
order by ol_code, start; 
insert into tbl_missingData 
SELECT * FROM 
    (SELECT ROW_NUMBER() 
     OVER (ORDER BY outletNo) AS rownumber, 
     * 
    FROM #temp) AS Documents 

select *,dbo.countOfIds(outletNo,rowNumber) as rpNo into #temp1 from tbl_missingData where outletno!='9163' 
select * from #temp1 
end

上執行以下結果集出現在SP，我想在MSFlexGrid控件

1 101 6381 p1 
2 101 6472 p2 
3 101 6534 p3 
4 101 6565 p4 
5 102 292 p1 
6 117 234 p1 
7 121 385 p1 
8 121 6874 p2 
9 121 6917 p3 
10 121 6936 p4 
11 121 6941 p5 
12 121 6953 p6 
13 121 6963 p7 
14 121 7044 p8 
15 121 7047 p9 
16 124 14 p1 
17 126 279 p1 
18 127 5685 p1 
19 127 5693 p2 
20 139 650 p1 
21 139 652 p2 
22 401 942 p1 
23 401 946 p2 
24 401 951 p3 
25 401 951 p4 
26 401 953 p5 
27 401 953 p6 
28 401 956 p7 
29 401 965 p8 
30 401 972 p9 
31 401 972 p10 
32 401 974 p11 
33 401 975 p12 
34 401 980 p13 
35 401 986 p14 
36 401 999 p15 
37 401 1000 p16

顯示它

請幫助我解決這個問題，任何建議/幫助高度讚賞。

來源

2013-02-19 Teju MB

通常，SET NOCOUNT ON語句是過程主體的第一條語句（在'BEGIN'語句之後）。我不確定它是否在這樣的區域之外聲明時有任何影響。 – 2013-02-19 05:34:42

SET NOCOUNT ON工作正常，甚至在其上面聲明，正如我在執行查詢時看到的，它忽略了受影響的行數（由於SET NOCOUNT ON） – 2013-02-19 05:39:01

您需要在過程的主體中使用SET NOCOUNT ON作爲第一行，不在聲明之外，僅適用於更改存儲的過程。

來源

2013-02-20 18:31:31

在VB6中使用SP關閉對象時不允許運行時錯誤'3704'操作

回答

相關問題