dotNETportal.cz

Dobrý den,

rád bych požádal o pomoc s následujícím (předpokládám, že banálním problémem).

Mám vytvořenou následující komponentu REPEATER, do níž některé hodnoty načítám z databáze, ale položky lbl_SumCena a lbl_SumCenaDPH potřebuji pro jednotlivé řádky vypočítat z načtených hodnot.

  <asp:Repeater ID="Repeater1" runat="server" DataSourceID="SqlDataSource1">
  <ItemTemplate>   
  <table>
  <tr>
  <td style="width:70px;"><asp:Label ID="lbl_ObjKod" runat="server" Text='<%# Eval("ObjKod") %>'></asp:Label></td>
  <td style="width:260px; text-align:left;"><asp:Label ID="lbl_Sortiment" runat="server" Text='<%# Eval("Sortiment") %>'></asp:Label></td>
  <td style="width:50px; text-align:right;"><asp:Label ID="lbl_ks" runat="server" Text='<%# Eval("Quantity") %>'></asp:Label></td>
  <td style="width:80px; text-align:right;"><asp:Label ID="lbl_AktCena" runat="server" Text='<%# Eval("UnitPrice","&nbsp;{0:C}&nbsp;") %>'></asp:Label></td>
  <td style="width:80px; text-align:right;"><asp:Label ID="lbl_SumCena" runat="server" Text=""></asp:Label></td>
  <td style="width:50px; text-align:right"><asp:Label ID="lbl_SazbaDPH" runat="server" Text='<%# Eval("DPH") %>'></asp:Label></td>
  <td style="width:80px; text-align:right;"><asp:Label ID="lbl_SumCenaDPH" runat="server" Text=""></asp:Label></td>
  </tr>
  </table>  
  </ItemTemplate>    
  <SeparatorTemplate>
  <table style="width:670px; height:5px;">
  <tr>
  <td>&nbsp;</td>
  </tr>
  </table>
  </SeparatorTemplate>      
  </asp:Repeater>

Děkuji předem za nakopnutí

Moc děkuji,

jelikož tam těch výpočtů je víc použil jsem tu variantu s tou událostí ItemCreated, ale nedaří se mi správně najít přístup k těm jednotlivým položkám. Zkoušel jsem např. toto

    Protected Sub Repeater1_ItemCreated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.RepeaterItemEventArgs)
            
        Dim SumCena As Decimal
        SumCena = CDec(CType(Repeater1.FindControl("lbl_ks"), Label).Text * CType(Repeater1.FindControl("lbl_AktCena"), Label).Text)
        CType(Repeater1.FindControl("lbl_SumCena"), Label).Text = Format(SumCena, "C")

        
        Dim DPH As Integer
        If CType(Repeater1.FindControl("lbl_SazbaDPH"), Label).Text.Length = 2 Then
            DPH = CInt(CType(Repeater1.FindControl("lbl_SazbaDPH"), Label).Text.Substring(0, 1))
        End If
        If CType(Repeater1.FindControl("lbl_SazbaDPH"), Label).Text.Length = 3 Then
            DPH = CInt(CType(Repeater1.FindControl("lbl_SazbaDPH"), Label).Text.Substring(0, 2))
        End If
        
        
        Dim SumCenaDPH As Decimal
        SumCenaDPH = SumCena + (SumCena / 100 * DPH)
        CType(Repeater1.FindControl("lbl_SumCenaDPH"), Label).Text = Format(SumCenaDPH, "C")
        
    End Sub

, ale stále mám hlášení, že odkaz není nastaven na instanci objektu ...

Prosím ještě o pomoc

Díky

Děkuji opět za pomoc, ale stále nejsem u konce.

Podle Vašich námětů jsem nakonec sesmolil toto ...

(Celý výpočet jsem musel dát do události "ItemDataBound", protože v původní "ItemCreated" jsem dostával hlášení, že vstupní řetězec nemá správný formát - zřejmě položky používané ve výpočtu byly při provádění prázdné)

Protected Sub Repeater1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.RepeaterItemEventArgs)
        If e.Item.ItemType <> ListItemType.Item Or e.Item.ItemType <> ListItemType.AlternatingItem Then
            
            Dim SumCena As Decimal
            SumCena = CDec(CType(e.Item.FindControl("lbl_ks"), Label).Text * CType(e.Item.FindControl("lbl_AktCena"), Label).Text)
            CType(e.Item.FindControl("lbl_SumCena"), Label).Text = Format(SumCena, "C")
            
            Dim DPH As Integer
            If CType(e.Item.FindControl("lbl_SazbaDPH"), Label).Text.Length = 2 Then
                DPH = CInt(CType(e.Item.FindControl("lbl_SazbaDPH"), Label).Text.Substring(0, 1))
            End If
            If CType(e.Item.FindControl("lbl_SazbaDPH"), Label).Text.Length = 3 Then
                DPH = CInt(CType(e.Item.FindControl("lbl_SazbaDPH"), Label).Text.Substring(0, 2))
            End If
            
            Dim SumCenaDPH As Decimal
            SumCenaDPH = SumCena + (SumCena / 100 * DPH)
            CType(e.Item.FindControl("lbl_SumCenaDPH"), Label).Text = Format(SumCenaDPH, "C")
            
            Dim AktCena As Decimal
            AktCena = CType(e.Item.FindControl("lbl_AktCena"), Label).Text
            CType(e.Item.FindControl("lbl_AktCena"), Label).Text = Format(AktCena, "C")
            
        End If
    End Sub

a zdálo se, že to již funguje jak má.

Nyní jsem, ale zjistil, že pokud repeater načítá z databáze pouze jednu položku, je vše v pořádku.

Pokud však má repeater zobrazit více položek, hlásí opět, že odkaz není nastaven na instanci objektu ...

Děkuji

Tak mockrát dík,

už je to OK ...