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

* "mark" <(E-Mail Removed)> scripsit:
> 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:news://news.microsoft.com/microsoft.public.dotnet.framework.adonet>

Web interface:

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

- or -

<URL:news://news.microsoft.com/microsoft.public.vb.database.ado>

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>