ConfirmButton pour créer des MsgBox

Signaler
Messages postés
2336
Date d'inscription
samedi 14 juillet 2001
Statut
Membre
Dernière intervention
5 mai 2009
-
Messages postés
1
Date d'inscription
mardi 17 mars 2009
Statut
Membre
Dernière intervention
30 mars 2010
-
Bonjour à tous,

je suis en train de créer un MsgBox pour un site web. pour ce faire, j'utilise ConfirmButton de l'API AjaxToolkit
Le popup s'affiche très bien, sauf que je suis incapable de récupérer un événement du  ConfirmButton

Voici mon code, j'ai créé aussi la fonction Button1_Click dans MsgBoxMessage.ascx, mais il est là le but, impossible de l'appeller

Pour bien comprendre comment je mis suis pris, mon site web à un masterpage qui contient le script manager
<hr size="2" width="100%" />

<hr size="2" width="100%" />
et à la toute fin de la MasterPage j'ai ceci (c'est ici l'astuce du msgbox que j'ai conçu)
<hr size="2" width="100%" />       
            <ContentTemplate>
               
               
            </ContentTemplate>
       
<hr size="2" width="100%" />
Dans le .vb du master page, j'ai créé cette fonction
<hr size="2" width="100%" />    Public Function MsgBox(ByVal texte As String, Optional ByVal style As eMsgBox = eMsgBox.Message) As Web.UI.Control
        PanelMsgBox.Controls.Clear()
        Dim msg As Web.UI.Control
        Select Case style
            Case eMsgBox.Message
                msg = LoadControl("./UserControls/MsgBox/MsgBoxMessage.ascx")
                PanelMsgBox.Controls.Add(msg)
                CType(msg, MsgBoxMessage).open(texte)
            Case eMsgBox.Question
            Case eMsgBox.Erreur
                msg = LoadControl("./UserControls/MsgBox/MsgBoxErreur.ascx")
                PanelMsgBox.Controls.Add(msg)
                CType(msg, MsgBoxErreur).open(texte)
            Case Else
        End Select
        Return msg
    End Function

<hr size="2" width="100%" />
Maintenant voici le fichier MsgBoxMessage.ascx
<hr size="2" width="100%" /><%@ Control Language="vb" AutoEventWireup="false" CodeBehind="MsgBoxMessage.ascx.vb" Inherits="SiSWeb.MsgBoxMessage" %>

<%@ Register
    Assembly="AjaxControlToolkit"
    Namespace="AjaxControlToolkit"
    TagPrefix="ajaxToolkit" %>
   

   

       
   

   

   

       
   

<hr size="2" width="100%" />Et pour terminer, voici mon test d'appel de mon MsgBox

<hr size="2" width="100%" />CType(MyBase.Master, Masterpage).MsgBox("Message", Masterpage.eMsgBox.Message)

<hr size="2" width="100%" />

-------------------------------------------------
Dragon alias aussi Waxime mais bon, pas le gout de refaire un nouveau profil lol
-------------------------------------------------

1 réponse

Messages postés
1
Date d'inscription
mardi 17 mars 2009
Statut
Membre
Dernière intervention
30 mars 2010

Bonjour ...j'ai implémenter toute les partie citée dans votre réponse dans une page web qui contient "script manager" car j'ai une page master qui ne contient pas cette balise ...il reste une chose dans la fonction "Function MsgBox(ByVal texte As String, Optional ByVal style As eMsgBox = eMsgBox.Message) As Web.UI.Control :

le style as eMsgBox = eMsgBox.Message reste non défini ...alors c'est quoi eMsgBox et comment le définir