asp : 테이블 행 색상을 프로그래밍 방식으로 변경하십시오.

Question

.net을 배우고 코드를 뒤에서 테이블을 만들고 대체 행 색상을 변경하려고합니다.

나는 그것을 사용하고 있지만 Drawing.Color 만 사용하면 16 진수 값을 사용하고 싶습니다.이 방법이 있습니까? 여기

순간에 그 일을 코드 그게 전부입니다 : 어떤 도움

' declare variables 
    Dim numrows As Integer 
    Dim numcells As Integer 
    Dim i As Integer 
    Dim j As Integer 
    Dim r As TableRow 
    Dim c As TableCell 
    Dim hc As TableHeaderCell 
    'Dim datepickJS As String 

    ' generate rows and cells 
    numrows = CaseTotal 
    ' column count 
    numcells = 7 

    r = New TableRow() 
    c = New TableCell() 

    '' validation creation 
    'Dim newValidatorSummary As New ValidationSummary() 
    'newValidatorSummary.CssClass = "form-error" 
    'c.Controls.Add(newValidatorSummary) 
    'c.ColumnSpan = 5 
    'r.Cells.Add(c) 
    'Table1.Rows.Add(r) 


    r = New TableRow() 

    ' header row and titles 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl("Case Ref")) 
    r.Cells.Add(hc) 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl("Name")) 
    r.Cells.Add(hc) 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl("Company")) 
    r.Cells.Add(hc) 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl("Last Updated")) 
    r.Cells.Add(hc) 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl("Order Date")) 
    r.Cells.Add(hc) 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl(" ")) 
    r.Cells.Add(hc) 
    hc = New TableHeaderCell() 
    hc.Controls.Add(New LiteralControl(" ")) 
    r.Cells.Add(hc) 
    Table1.Rows.Add(r) 

    r.BackColor = Drawing.Color.AntiqueWhite 


    For j = 0 To numrows - 1 

     r = New TableRow() 
     'Table1.Rows(j).Cells(i).CssClass = "tablehead" 

     'row data 
     Dim ClientName, Company As String 
     Dim OrderDate As Date 
     ClientName = dsCases.Tables("CaseList").Rows(j).Item("firstname") & " " & dsCases.Tables("CaseList").Rows(j).Item("lastname") 
     Company = dsCases.Tables("CaseList").Rows(j).Item("company") 
     OrderDate = dsCases.Tables("CaseList").Rows(j).Item("CaseSent") 

     'create details button 
     Dim btnDetails As New Button() 
     btnDetails.Text = "Details" 
     btnDetails.ID = "btnDetails" 
     btnDetails.Width = "60" 
     btnDetails.Font.Size = "8" 
     'AddHandler btnSubmit.Click, AddressOf sendDetails_Click 

     'create schedule button 
     Dim btnSchedule As New Button() 
     btnSchedule.Text = "Schedule" 
     btnSchedule.ID = "btnSchedule" 
     btnSchedule.Width = "60" 
     btnSchedule.Font.Size = "8" 
     'AddHandler btnSubmit.Click, AddressOf sendDetails_Click 

     For i = 0 To numcells - 1 

      Dim iMod As Integer 
      iMod = j Mod 2 

      c = New TableCell() 


      If i = 0 Then 
       c.Controls.Add(New LiteralControl(iMod & " ")) 
       c.Controls.Add(New LiteralControl(UserId)) 

      ElseIf i = 1 Then 

       c.Controls.Add(New LiteralControl(ClientName)) 

      ElseIf i = 2 Then 

       c.Controls.Add(New LiteralControl(Company)) 

      ElseIf i = 3 Then 



      ElseIf i = 4 Then 

       c.Controls.Add(New LiteralControl(FormatDateTime(OrderDate, DateFormat.ShortDate))) 

      ElseIf i = 5 Then 

       c.Controls.Add(btnDetails) 

      ElseIf i = 6 Then 

       c.Controls.Add(btnSchedule) 

      End If 

      r.Cells.Add(c) 
     Next i 

     Table1.Rows.Add(r) 


     If j Mod 2 = 1 Then 
      r.BackColor = Drawing.Color.Aquamarine 
      'Table1.Rows(j).Cells(i).CssClass = "odd" 
     Else 
      r.BackColor = Drawing.Color.Blue 
      'Table1.Rows(j).Cells(i).CssClass = "even" 
     End If 

    Next j 

    r = New TableRow() 

    ' footer row 
    c = New TableCell() 
    c.ColumnSpan = 7 
    c.HorizontalAlign = HorizontalAlign.Right 
    r.Cells.Add(c) 
    Table1.Rows.Add(r) 

감사 :

여기

 If j Mod 2 = 1 Then 
      r.BackColor = Drawing.Color.Aquamarine 
      'Table1.Rows(j).Cells(i).CssClass = "odd" 
     Else 
      r.BackColor = Drawing.Color.Blue 
      'Table1.Rows(j).Cells(i).CssClass = "even" 
     End If 

전체 코드입니다. 여기

r.BackColor = ColorTranslator.FromHtml("#0000FF") 

문서 :

J.

Answer 1

당신은이 같은 ColorTranslator 클래스 사용할 수 있습니다 http://msdn.microsoft.com/en-us/library/system.drawing.colortranslator.fromhtml.aspx