Solved

SQL2K, Excel VBA using ADO:  When command.ActiveConnection = gcn, it always contains a parameter with it.  How to find and remove?

Posted on 2007-11-28
5
640 Views
Last Modified: 2012-06-21
In Excel VBA I am using ADO to connect to a SQL2K db, and set a recordset object = SP with one parameter

The SP works fine in QA

cmdPLCY.CommandType = adCmdStoredProc
cmdPLCY.CommandText = "spm_POLICY_INFO"
cmdPLCY.ActiveConnection = gcnCASES    '<-- Looky Here

After execution of the third line above, when I eyeball the Locals window in cmdPLCY.Parameters, it contains one prarameter of @RETURN_VALUE.  I use this in SP's alot, but I did not set it anywhere in VBA code, and have no idea how it could be attaching itself to my connection object.

The sub that sets my connection object (below), is working fine:

Public Function scnCASES() As Boolean

'some stuff omitted

Dim sConnect As String
sConnect = "PROVIDER=SERVER;Driver=SQLServer;Server=SERVER_NAME;UID=USER_NAME;PWD=PASSWORD;Database=DB_NAME;"

If gcnCASES Is Nothing Then
    Set gcnCASES = CreateObject("ADODB.Connection")
    gcnCASES.ConnectionString = sConnect
    gcnCASES.Open
End If

If gcnCASES.State <> adStateClosed Then
    scnCASES = True
Else
    scnCASES = False
End If
   
End Function

TIA
Jim
0
Comment
Question by:Jim Horn
5 Comments
 
LVL 33

Expert Comment

by:roos01
ID: 20368594
Didn't you made a typo?
you try to set the connection using gcnCASES

though the function is called: scnCASES

or should you use:

cmdPLCY.ActiveConnection = gcnCASES(scnCASES)
0
 
LVL 142

Assisted Solution

by:Guy Hengel [angelIII / a3]
Guy Hengel [angelIII / a3] earned 100 total points
ID: 20368601
>, and have no idea how it could be attaching itself to my connection object.
you mean, the command object :)

now, indeed, a stored procedure in SQL Server does RETURN a value implicitely, and ADO takes that into account, assigning such a parameter implicitly.

0
 
LVL 65

Author Comment

by:Jim Horn
ID: 20368634
>Didn't you made a typo?
Nope.

'Global variable
Dim gcnCases as adodb.connection

'In every sub/function
If gcnCases Is Nothing then call scnCASES   'which sets the gcnCases global variable.

>and have no idea how it could be attaching itself to my connection object.
>you mean, the command object.
Correct, the command object.  My typo.

The SP in question returns a SELECT * FROM #tmp, with 30ish columns.
It also uses a bunch of variables, but @RETURN_VALUE is not one of them, and nowhere before the final SELECT * FROM #tmp is there a SELECT @anything.
0
 
LVL 85

Accepted Solution

by:
Rory Archibald earned 400 total points
ID: 20372398
Further to Angel's comment, here is an MSKB article that mentions this: http://support.microsoft.com/kb/285295
Regards,
Rory
0
 
LVL 65

Author Comment

by:Jim Horn
ID: 20373974
Okay, that makes sense.

I discovered that after I had SET NOCOUNT ON in all the SP's they worked, regardless of the fact that my command objects had a parameter of @RETURN_VALUE.

Thanks guys.
Jim
0

Featured Post

Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Why is this different from all of the other step by step guides?  Because I make a living as a DBA and not as a writer and I lived through this experience. Defining the name: When I talk to people they say different names on this subject stuff l…
I have a large data set and a SSIS package. How can I load this file in multi threading?
Viewers will learn how the fundamental information of how to create a table.
This Micro Tutorial will demonstrate in Microsoft Excel how to add style and sexy appeal to horizontal bar charts.

920 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now