Visualizzare la descrizione delle varianti con accodata la descrizione dei parametri (taglia, colore, ecc.)

Option Explicit
 
Dim descrizione
Dim numLivelli
descrizione = Product.Name
If Product.ProductType=11 Then
    ' Sugli articoli variante aggiunge i dettagli 
    numLivelli = Product.MasterProductParametersCount
    If numLivelli>=1 Then
        descrizione = descrizione & " - " & Product.CustomField(120)
    End If
    If numLivelli>=2 Then
        descrizione = descrizione & " - " & Product.CustomField(130)
    End If
    If numLivelli>=3 Then
        descrizione = descrizione & " - " & Product.CustomField(140)
    End If
End If
Response.Write(descrizione)