Código ASP:
Ver original
Dim x As Integer = -1 For Each aRow As DataRow In TablaUsers.Rows x = x + 1 lstusuarios.Items.Add(aRow("Nombre")) If TablaUsers.Rows(x).Item("tipo").ToString = "G" Then lstUsuario = True Else lstUsuario = False End If If lstUsuario = True Then [B] lstusuarios.Attributes.Add("style", "color:red")[/B] Else [B] lstusuarios.Attributes.Add("style", "color:blue")[/B] End If Next
El problema está en que TODOS los items se colorean del último color que haya salido en las líneas marcadas...