<div>
I have a class that returns the Product Details, part of it must be Sizes and Colors available for its corresponding product. 
 
I have attached the mentioned class, please notice that the class reads in spanish so: 
 
Sizes = Tallas, Colors = Colores 
 
Thanks again Guys 

<pre><code class="code-100 nolinks" id="code-264126">Imports System.Web
Imports System.Data
Imports System.Data.OleDb
Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.Collections.Generic
Imports DAV.TiendaEnLinea.v1.DataAccessLayer
 
Namespace DAV.TiendaEnLinea.v1.BusinessLogicLayer
 Public Class BLLDetalleDeProducto
 
 Private _Id_Producto As Integer = 0
 Private _Id_Categoria As Integer = 0
 Private _Id_Subcategoria As Integer = 0
 Private _Categoria As String = String.Empty
 Private _Subcategoria As String = String.Empty
 Private _Codigo As String = String.Empty
 Private _NumeroParte As String = String.Empty
 Private _Titulo As String = String.Empty
 Private _PrecioLista As String = String.Empty
 Private _PrecioPromocion As String = String.Empty
 Private _Tallas As ArrayList = New ArrayList
 Private _Colores As ArrayList = New ArrayList
 Private _ImagenMini As String = String.Empty
 Private _ImagenReal As String = String.Empty
 
 Public ReadOnly Property Id_Producto() As Integer
 Get
 Return _Id_Producto
 End Get
 End Property
 
 Public ReadOnly Property Id_Categoria() As Integer
 Get
 Return _Id_Categoria
 End Get
 End Property
 
 Public ReadOnly Property Id_Subcategoria() As Integer
 Get
 Return _Id_Subcategoria
 End Get
 End Property
 
 Public ReadOnly Property Categoria() As String
 Get
 Return _Categoria
 End Get
 End Property
 
 Public ReadOnly Property Subcategoria() As String
 Get
 Return _Subcategoria
 End Get
 End Property
 
 Public ReadOnly Property Codigo() As String
 Get
 Return _Codigo
 End Get
 End Property
 
 Public ReadOnly Property NumeroParte() As String
 Get
 Return _NumeroParte
 End Get
 End Property
 
 Public ReadOnly Property Titulo() As String
 Get
 Return _Titulo
 End Get
 End Property
 
 Public ReadOnly Property PrecioLista() As Double
 Get
 Return _PrecioLista
 End Get
 End Property
 
 Public ReadOnly Property PrecioPromocion() As Double
 Get
 Return _PrecioPromocion
 End Get
 End Property
 Public ReadOnly Property Tallas() As ArrayList
 Get
 Return _Tallas
 End Get
 End Property
 
 Public ReadOnly Property Colores() As ArrayList
 Get
 Return _Colores
 End Get
 End Property
 
 Public ReadOnly Property ImagenMini() As String
 Get
 Return _ImagenMini
 End Get
 End Property
 
 Public ReadOnly Property ImagenReal() As String
 Get
 Return _ImagenReal
 End Get
 End Property
 
 Public Shared Function ObtieneDetalleDeProducto(ByVal idproducto As Integer) As List(Of BLLDetalleDeProducto)
 Dim objDetalleDeProducto As DAV.TiendaEnLinea.v1.DataAccessLayer.DALDetalleDeProducto = New DAV.TiendaEnLinea.v1.DataAccessLayer.DALDetalleDeProducto
 Return objDetalleDeProducto.LeeDetalleDeProducto(idproducto)
 End Function
 
 Public Sub New(ByVal id_producto As Integer, ByVal id_categoria As Integer, _
 ByVal id_subcategoria As Integer, ByVal categoria As String, _
 ByVal subcategoria As String, ByVal codigo As String, _
 ByVal numeroparte As String, ByVal titulo As String, _
 ByVal preciolista As Double, ByVal preciopromocion As Double, _
 ByVal tallas As ArrayList, ByVal colores As ArrayList, _
 ByVal imagenmini As String, ByVal imagenreal As String)
 
 'Inicializa las propiedades del objeto
 _Id_Producto = id_producto
 _Id_Categoria = id_categoria
 _Id_Subcategoria = id_subcategoria
 _Categoria = categoria
 _Subcategoria = subcategoria
 _Codigo = codigo
 _NumeroParte = numeroparte
 _Titulo = titulo
 _PrecioLista = preciolista
 _PrecioPromocion = preciopromocion
 _Tallas = tallas
 _Colores = colores
 _ImagenMini = imagenmini
 _ImagenReal = imagenreal
 End Sub
 
 End Class
End Namespace
</code></pre>
</div>

<div>
I'm not sure what the type of LeeDetalleDeProducto is, but here's the general idea. 
 
If that function returns a DataReader, you can do something like this: 
 
Dim dataReader as SqlDataReader = objDetalleDeProducto.LeeDetalleDeProducto(idproducto) 
 
List(Of BLLDetalleDeProducto) products = new List(Of BLLDetalleDeProducto) 
while (dataReader.Read) 
&nbsp; &nbsp; ' create an instance of BLLDetalleDeProducto 
&nbsp; &nbsp; ' assign the values returned from the dataReader to members of the instance 
&nbsp; &nbsp; ' add this instance to 'products' list 
end while 
return products 
 
I'm sorry if there are any inconsistencies in the syntax... i'm used to C# more. 

</div>

<div>
I have attached the whole LeeDetalleDeProducto function 

<pre><code class="code-10 nolinks" id="code-264268"> Public Function LeeDetalleDeProducto(ByVal idproducto As Integer) As List(Of BLLDetalleDeProducto)
 Dim colDetalleDeProducto As New List(Of BLLDetalleDeProducto)
 Dim objConfiguraciones As List(Of BLLConfiguraciones) = BLLConfiguraciones.ObtieneConfiguraciones()
 Dim ListadoTallas As ArrayList = New ArrayList
 Dim ListadoColores As ArrayList = New ArrayList
 Dim RutaImagenMiniProducto As String = objConfiguraciones.Item(0).RutaImagenMiniProducto
 Dim PostfijoImagenMiniProducto As String = objConfiguraciones.Item(0).PostfijoImagenMiniProducto
 Dim ExtensionImagenMiniProducto As String = objConfiguraciones.Item(0).ExtensionImagenMiniProducto
 Dim RutaImagenRealProducto As String = objConfiguraciones.Item(0).RutaImagenRealProducto
 Dim PostfijoImagenRealProducto As String = objConfiguraciones.Item(0).PostfijoImagenRealProducto
 Dim ExtensionImagenRealProducto As String = objConfiguraciones.Item(0).ExtensionImagenRealProducto
 
 
 'Obtiene datos de configuracion
 Dim appSettings As NameValueCollection = WebConfigurationManager.AppSettings
 
 'Crea conexion DB
 Dim con As OleDbConnection = New OleDbConnection(_ConnectionString)
 
 'Crea el comando
 Dim cmd As OleDbCommand = New OleDbCommand
 cmd.Connection = con
 
 cmd.CommandText = &quot;select PRODUCTOS.ID_PRODUCTO, PRODUCTOS.ID_CATEGORIA, CATEGORIAS.CATEGORIA, &quot; &amp; _
 &quot;PRODUCTOS.ID_SUBCATEGORIA, SUBCATEGORIAS.SUBCATEGORIA, PRODUCTOS.CODIGO, &quot; &amp; _
 &quot;PRODUCTOS.NUMERO_PARTE, PRODUCTOS.TITULO, PRODUCTOS.TALLAS, PRODUCTOS.COLORES, &quot; &amp; _
 &quot;PRODUCTOS.PRECIO_LISTA, PRODUCTOS.PRECIO_PROMOCION &quot; &amp; _
 &quot;from SUBCATEGORIAS inner join &quot; &amp; _
 &quot;(CATEGORIAS inner join PRODUCTOS on CATEGORIAS.ID_CATEGORIA = PRODUCTOS.ID_CATEGORIA) &quot; &amp; _
 &quot;on SUBCATEGORIAS.ID_SUBCATEGORIA = PRODUCTOS.ID_SUBCATEGORIA &quot; &amp; _
 &quot;where (((PRODUCTOS.ID_PRODUCTO)=&quot; &amp; idproducto &amp; &quot;))&quot;
 
 'Ejecuta el comando
 Using con
 con.Open()
 Dim reader As OleDbDataReader = cmd.ExecuteReader
 While reader.Read
 'Crea los arreglos de Tallas y Colores
 Dim listado() As String
 
 listado = reader(&quot;TALLAS&quot;).ToString.Split(&quot;,&quot;)
 For Each elemento As String In listado
 ListadoTallas.Add(elemento)
 Next elemento
 
 listado = reader(&quot;COLORES&quot;).ToString.Split(&quot;,&quot;)
 For Each elemento As String In listado
 ListadoColores.Add(elemento)
 Next elemento
 
 
 colDetalleDeProducto.Add(New BLLDetalleDeProducto( _
 CType(reader(&quot;ID_PRODUCTO&quot;), Integer), _
 CType(reader(&quot;ID_CATEGORIA&quot;), Integer), _
 CType(reader(&quot;ID_SUBCATEGORIA&quot;), Integer), _
 CType(reader(&quot;CATEGORIA&quot;), String), _
 CType(reader(&quot;SUBCATEGORIA&quot;), String), _
 CType(reader(&quot;CODIGO&quot;), String), _
 CType(reader(&quot;NUMERO_PARTE&quot;), String), _
 CType(reader(&quot;TITULO&quot;), String), _
 CType(reader(&quot;PRECIO_LISTA&quot;), Double), _
 CType(reader(&quot;PRECIO_PROMOCION&quot;), Double), _
 CType(ListadoTallas, ArrayList), _
 CType(ListadoColores, ArrayList), _
 CType(RutaImagenMiniProducto &amp; reader(&quot;CODIGO&quot;) &amp; PostfijoImagenMiniProducto &amp; ExtensionImagenMiniProducto, String), _
 CType(RutaImagenRealProducto &amp; reader(&quot;CODIGO&quot;) &amp; PostfijoImagenRealProducto &amp; ExtensionImagenRealProducto, String)))
 End While
 End Using
 
 Return colDetalleDeProducto
 End Function
</code></pre>
</div>

<div>
This is the process in which the arrays are populated, notice that are inside a loop (creates a list per each element) that belongs to the LeeDetalleDeProducto function, so the question is: 
 
Should I call a function from a new class &quot;BLLSizes&quot; or &quot;BLLColors&quot; that returns the elements correctly typed to each element of LeeDetalleDeProducto ? 
 
I am a little confused...sorry
</div>

<div>
If this is working for you, go ahead and use it. Do not complicate yourself with this issue. The bigger issue was from the database result set, but that is being taken care of already. So you should be good to go. 

</div>

<div>
considering that .... which data type would be better array or arraylist?
</div>

<div>
I'd say a List&lt;string&gt; what you'll return there is a string. If Colors or Sizes are 'int's then use List&lt;int&gt;. 

</div>

<div>
nmarun: 
 
What are the advantages of using lists vs arrays/arraylists ?
</div>

<div>
very good links (I needed) thanks, by the way I have done the following code in order to create collections, what do you think about it ?: 

<pre><code class="code-10 nolinks" id="code-264410"> Dim listado() As String
 listado = reader(&quot;TALLAS&quot;).ToString.Split(&quot;,&quot;)
 For Each elemento As String In listado
 If String.IsNullOrEmpty(elemento) Then
 ListadoTallas.Add(elemento)
 End If
 Next elemento
 
 listado = reader(&quot;COLORES&quot;).ToString.Split(&quot;,&quot;)
 For Each elemento As String In listado
 If String.IsNullOrEmpty(elemento) Then
 ListadoColores.Add(elemento)
 End If
 Next elemento
</code></pre>
</div>

<div>
I forgot to include the previous declarations: 

<pre><code class="code-1 nolinks" id="code-264411">Dim ListadoTallas As List(Of String) = New List(Of String)
Dim ListadoColores As List(Of String) = New List(Of String)
</code></pre>
</div>

<div>
Looks good. This should be working now. Or is it still giving you some errors? 

</div>

<div>
I haven´t tried but I really wanted your opinion. 
 
thanks.
</div>

<div>
Yes this looks good. This is how it should be coded. 

</div>

<div>
<div class="content wysiwyg-content">
HI 
 
I am trying to return an array as a result from a database in order to attach the data into a datareader, my concern is how should be typed, array or arraylist ?, considering that I am using the 3 layer model. 
 
Thanks in advance.
</div>
</div>

HI

I am trying to return an array as a result from a database in order to attach the data into a datareader, my concern is how should be typed, array or arraylist ?, considering that I am using the 3 layer model.

Thanks in advance.

Array vs. ArrayList

The .NET Framework is not specific to any one programming language; rather, it includes a library of functions that allows developers to rapidly build applications. Several supported languages include C#, VB.NET, C++ or ASP.NET.

.NET Programming

The successor to Active Server Pages, ASP.NET websites utilize the .NET framework to produce dynamic, data and content-driven web applications and services. ASP.NET code can be written using any .NET supported language. As of 2009, ASP.NET can also apply the Model-View-Controller (MVC) pattern to web applications

ASP.NET

Visual Basic .NET (VB.NET) is an object-oriented programming language implemented on the .NET framework, but also supported on other platforms such as Mono and Silverlight. Microsoft launched VB.NET as the successor to the Visual Basic language. Though it is similar in syntax to  Visual Basic pre-2002, it is not the same technology,