Code from VB 2003 works different in 2005 Beta 2
Dim cmd As SqlCommand = New SqlCommand
cmd.CommandText = "dbo.[usp_employee_SelectAll]"
cmd.CommandType = CommandType.StoredProcedure
cmd.Connection = Connection
cmd.Parameters.Add(New SqlParameter("@ErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, SQLErrorCode))
msgbox(cmd.Parameters.Item("@ErrorCode").Value)

