Command Output Parameter not returnimg.

[mark]

Hi all,

Can anyone tell me why this code fails to return the output parameter from
the SP.



VB.Net Code ----------------



Dim adoCmd As New ADODB.Command

With adoCmd

.CommandText = "insCarType"

.CommandType = ADODB.CommandTypeEnum.adCmdStoredProc



.Parameters.Append(.CreateParameter("@CarType",
DataTypeEnum.adVarChar, ParameterDirectionEnum.adParamInput, 30, "Ford"))

.Parameters.Append(.CreateParameter("@intID",
DataTypeEnum.adInteger, ParameterDirectionEnum.adParamOutput, , 0))



.ActiveConnection = userConn

.Execute()



Return .Parameters(1).Value

End With



End VB.Net Code ------



SP Code -------

CREATE PROCEDURE [dbo].[insCarType]

( @CarType VARCHAR(30),
@intID INT = NULL OUTPUT )

AS

INSERT INTO CarTypes ( CarType ) VALUES (@CarType)

SET @intID = SCOPE_IDENTITY()

End SP Code -----------------

Many Thanks for any help you can give me

 

[Herfried K. Wagner [MVP]]

Can anyone tell me why this code fails to return the output parameter from
the SP.

Although your problem is related to VB.NET + ADO Classic, consider
posting to this groups if you don't get an answer here:

<URL:
Web interface:

<URL:http://msdn.microsoft.com/newsgroups/?dg=microsoft.public.dotnet.framework.adonet>

- or -

<URL: