VB6 데이터베이스 테이블 작성 또는 선택시 저장 프로 시저 실행시 오류 발생

Question

수정중인 응용 프로그램이 있습니다. 원래, 일부 데이터를 반환하기 위해 실행 된 라인 SQL의 거대한 벽돌이있었습니다. 변경 요청 때문에 데이터를 반환하는 것 이상의 작업을 수행하는 저장 프로 시저에 저장했습니다. 이제 실행하려고합니다. 여기에 내가 일을 얻을 수없는 코드입니다 : 그냥 잘 작동합니다

Dim oConnCRS as CRS_Connection 
Dim sSQL As String 
Dim oRS_ReturnRecs As ADODB.Recordset 

sSQL = "EXECUTE dbo.StoredProcedure @StartDate = '" & dStartDate & "', @EndDate ='" & dEndDate & "'" 

Set oConnCRS = New CRS_Connection 
Set oRS_ReturnRecs = New ADODB.Recordset 

With oRS_ReturnRecs 
.Open sSQL, oConnCRS.Connection, adOpenForwardOnly, adLockReadOnly, adCmdText 

If .EOF Then 
    .Close 
    Me.MousePointer = vbDefault 
    MsgBox "No return file activity to report", vbExclamation + vbOKOnly, APP_NAME 

    Exit Sub 
End If 

내가 좋아하는 뭔가에 sSQL을 변경하는 경우는 "조건이 어디 테이블에서 열을 선택합니다."

저장 프로시 저는 한 묶음의 정보를 임시 테이블에로드하고 수정 한 다음 임시 테이블에서 모든 레코드를 선택합니다.

나는 개방와에 다양한 설정을 변경 시도,하지만, 난 여전히

If .EOF then 

에 오류가 발생하는 오류는 다음과 같습니다

CRS_Connection가있다 "개체를 닫을 때 작업이 허용되지 않습니다" 데이터베이스에 대한 모든 연결 정보를 포함하는 객체이며 새로운 인스턴스화에서 연결을 자동으로 엽니 다.

우리가 잘못하고있는 것에 대한 지침이나 제안은 크게 감사하겠습니다.

---

새로운 발견은 :

나는 다른 응용 프로그램에 다시이 문제를 가지고 시작했다. 임시 테이블을 만들고 데이터로 채운 다음 선택하십시오. 내가 그렇게 할 때, 나는 전에 경험했던 것과 같은 닫힌 오류를 얻는다.

select into 또는 create table을 제거하면 문제없이 실행됩니다.

저장 프로 시저에서 임시 테이블을 만드는 경우 VB6에서 연결을 닫을 수 있습니까? 이 문제를 해결할 수있는 방법이 있습니까?

Answer 1

설명하는 것과 비슷한 문제가있었습니다.

SET NOCOUNT ON을 저장 프로 시저 시작시에 추가하면 문제가 해결됩니다.

이 문제가 해결되지 않는 경우에 몇 가지 더 제안 : http://www.codeproject.com/Questions/414056/VB-Recordset-not-opening-with-stored-procedure