none
création d'imagebutton dynamique RRS feed

  • Question

  •  

    Bonjour,

    Contexte : aspx + IIS + VS 2005 (VB) + framework 2 .0

     

    code behind

    Code Snippet

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim i As Int16

    For i = 1 To 10

    Dim im As New ImageButton

    im.ImageUrl = "~/images/fleche.jpg"

    im.OnClientClick = "testjava1('" & "coucou " & i & "')"

    Page.Form.Controls.Add(im)

    Next i

    End Sub

     

     

    Page aspx

    Code Snippet

    <body>

    <form id="form1" runat="server">

    <div>

    <asp:ImageButton ID="ImageButton1" runat="server" ImageUrl="~/images/fleche.jpg" OnClientClick="testjava1('toto')" ToolTip="12" />

    <asp:Button ID="Button1" runat="server" Text="Button" /></< FONT>div>

    </< FONT>form>

    </< FONT>body>

    </< FONT>html>

    <script type="text/javascript">

    function testjava1(p1)

    {

    alert(p1);

    }

    </< FONT>script>

     

     

    Problème 1 : quand je clique sur une image, la fonction javascript fonctionne, mais après validation, les images disparraissent.

    une idée, voire une solution ?

    Merci

    Problème 2

    Je génère un tableau, et je souhaite mettre des images dans les cellules.

    Voilà le code qui est dans la boucle

    Code Snippet

     

    ...

    Dim bt As New ImageButton

    bt.ImageUrl = "~/images/fleche.jpg"

    bt.OnClientClick = "testjava1('" & monplanning.t(i, k).id_col & "')' "

    bt.ToolTip = "cou"

    tempcell5.Controls.Add(bt)

    tempRow2.Cells.Add(tempcell5)

    ..

    Table1.Rows.Add(tempRow2)

     

     

    une idée, voire une solution ?

    Rien n'apparait ...

    une idée, voire une solution ?

    Merci

     

    mardi 1 juillet 2008 11:33

Réponses

  • Remarque, si je mets le code dans l'init de la page, c'est persistant...

    Il y doit donc y avoir un pb de postback ...

    Code Snippet

    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

    Dim i As Int16

    For i = 1 To 10

    Dim im As New ImageButton

    im.ImageUrl = "~/images/fleche.jpg"

    im.OnClientClick = "testjava1('" & "toot" & i & "')"

    'im.PostBackUrl

    Page.Form.Controls.Add(im)

    Next i

    End Sub

     

     

    mardi 1 juillet 2008 12:36
  • Je me réponds à moi-même, non pas que cela me flatte, mais, cela servira peut-être...

    Donc la solution aux pb 1 et 2 est : travailler dans le page_init

    Code Snippet

    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

    Dim i As Int16

    Dim tempRow2 As New TableRow

    For i = 1 To 5

    Dim tempCell2 As New TableCell()

    Dim im As New ImageButton

    Dim lab As New Label

    im.ImageUrl = "~/images/fleche.jpg"

    im.OnClientClick = "testjava1('" & "toot" & i & "')"

    lab.Text = "coucou" & i

    tempCell2.Controls.Add(im)

    tempCell2.Controls.Add(lab)

    tempRow2.Cells.Add(tempCell2)

    Next i

    Table2.Rows.Add(tempRow2)

    End Sub

     

     

    mardi 1 juillet 2008 13:54

Toutes les réponses

  • Remarque, si je mets le code dans l'init de la page, c'est persistant...

    Il y doit donc y avoir un pb de postback ...

    Code Snippet

    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

    Dim i As Int16

    For i = 1 To 10

    Dim im As New ImageButton

    im.ImageUrl = "~/images/fleche.jpg"

    im.OnClientClick = "testjava1('" & "toot" & i & "')"

    'im.PostBackUrl

    Page.Form.Controls.Add(im)

    Next i

    End Sub

     

     

    mardi 1 juillet 2008 12:36
  • Je me réponds à moi-même, non pas que cela me flatte, mais, cela servira peut-être...

    Donc la solution aux pb 1 et 2 est : travailler dans le page_init

    Code Snippet

    Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

    Dim i As Int16

    Dim tempRow2 As New TableRow

    For i = 1 To 5

    Dim tempCell2 As New TableCell()

    Dim im As New ImageButton

    Dim lab As New Label

    im.ImageUrl = "~/images/fleche.jpg"

    im.OnClientClick = "testjava1('" & "toot" & i & "')"

    lab.Text = "coucou" & i

    tempCell2.Controls.Add(im)

    tempCell2.Controls.Add(lab)

    tempRow2.Cells.Add(tempCell2)

    Next i

    Table2.Rows.Add(tempRow2)

    End Sub

     

     

    mardi 1 juillet 2008 13:54