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
651 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:Jeroen Rosink
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 143

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

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

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

Suggested Solutions

This article shows gives you an overview on SQL Server 2016 row level security. You will also get to know the usages of row-level-security and how it works
Some code to ensure data integrity when using macros within Excel. Also included code that helps secure your data within an Excel workbook.
This Micro Tutorial demonstrate the bugs in Microsoft Excel for Mac with Pivot Charts.
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.

713 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