Pagina 2 di 3 primaprima 1 2 3 ultimoultimo
Visualizzazione dei risultati da 11 a 20 su 22
  1. #11
    Utente di HTML.it L'avatar di pietro09
    Registrato dal
    Jan 2002
    Messaggi
    10,116
    Originariamente inviato da sms
    x bloccare l'esecuzione della pagina si potrebbe usare Response.End (se non ricordo male) soltanto ke poi l'inconveniente sarebbe come dire al confirm di javascript di utilizzare una funzione .net
    a meno ke con un
    return confirm('..'); __doPostback('..');
    ed impostare una variabile di sessione o qualcosa del genere..
    insomma: troppo complicato..
    Per sms:
    La domanda fatta da valeria75 si dimostra abbastanza intrigante e la cosa si fa interessante. Giusto per discutere:
    Se potrebbe forse risolvere, cambiando radicalmente metodo. Ossia, quando clicco sul pulsante update del datagrid, si potrebbe aprire una finestrella secondaria (popup o div mobile) con uno o più checkbox di conferma delle operazioni da eseguire nel server, più i due classici pulsanti annulla e conferma. In questo modo, la funzione server richiamata eseguirebbe la volontà dell'utente :master:

    Altra soluzione potrebbe essere quella di aggiungere un checkbox di conferma per la cancellazione di alcuni record, oltre i classici pulsanti di update e cancel in modalità Edit. :master:

    Comunque, fate sapere se trovate qualche altra soluzione, perchè mi interessa molto

    Pietro

  2. #12
    Originariamente inviato da pietro09
    :master: Non capisco! Quando qualcuno fa una domanda, cerco se posso di rispondere per me stesso, perchè i quesiti sono interessanti e fanno riflettere; poi se posso, cerco di rispondere, esattamente come tanti hanno risposto a me.
    Ma certo, io stavo solo scherzando!

    La cosa che hai detto vale anche per me: quando una domanda è curiosa e fa riflettere ne sono ben contento perché da un problema altrui si può imparare.
    Comunque, solo per discutere (e qui chiedo a Valeria se ho capito), io ho capito esattamente quello che ha scritto sms.
    Ammesso e non concesso di aver capito, io dico a Valeria, quella che secondo me è la soluzione. Ossia, nell'essenza, esattamente quella di Raffa62, ossia, si tratta di scindere la funziona richiamata dal datagrid o da PincoPallino che sia, in due funzioni (e questa è l'essenza). Poi, che la richiami con DataGrid, con Repeater, con un misero Button, non cambia il nocciolo della questione.

    Capito il concetto, nulla vieta di estendere, per esempio, la soluzione di Raffa62 ad un datagrid....

    Ciao
    Hai ragione, ma Valeria non ha chiarito completamente le sue necessità. Io leggendo il secondo messaggio di Valeria ho pensato che l'operazione di cui vorrebbe chiedere conferma è una funzione nel codice asp.net, e quella richiesta se proseguire o meno è su un DataGrid, e il subject di questa domanda parla di un messagebox... La mia risposta era solo una variante dell'ottimo suggerimento che ha dato Raffa62.

    Alla fine spetta a Valeria decidere quale strada prendere, no?

    Ciao!
    AZ [Microsoft - .NET MVP]
    Mia Home page: http://ciclismo.sitiasp.it
    Asp.Net community: http://www.aspitalia.com
    Il mio blog: http://blogs.aspitalia.com/az

  3. #13
    Ao lasciatemi stare Andrea....mitico


    guarda questa soluzione:

    1. MessageBox.aspx
    codice:
    <%@ Page Language="vb" AutoEventWireup="false" 
    
    Codebehind="MessageBox.aspx.vb" Inherits="ASPMessageBox.MessageBox1"%>
    
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
    
    <HTML>
    
              <HEAD>
    
                       <title>MessageBox</title>
    
                       <meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
    
                       <meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
    
                       <meta name="vs_defaultClientScript" content="JavaScript">
    
                       <meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
    
              </HEAD>
    
              <body MS_POSITIONING="GridLayout">
    
                       <form id="Form1" method="post" runat="server">
    
                                 <asp:PlaceHolder id="PlaceHolder1" runat="server"></asp:PlaceHolder>
    
                                 <asp:Button id="Button1" style="Z-INDEX: 101; LEFT: 95px; POSITION: absolute; TOP: 99px" runat="server" Text="Click"></asp:Button>
    
                       </form>
    
              </body>
    
    </HTML>

    MessageBox.aspx.vb

    codice:
    Public Class MessageBox1
    
        Inherits System.Web.UI.Page
    
        Protected WithEvents PlaceHolder1 As System.Web.UI.WebControls.PlaceHolder
    
        Protected WithEvents Button1 As System.Web.UI.WebControls.Button
    
        Dim newBox As MessageBox = New MessageBox()
    
    #Region " Web Form Designer Generated Code "
    
    
        'This call is required by the Web Form Designer.
    
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
    
    
        End Sub
    
    
        Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
    
            'CODEGEN: This method call is required by the Web Form Designer
    
            'Do not modify it using the code editor.
    
            InitializeComponent()
    
        End Sub
    
    
    #End Region
    
    
    
    
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    
            'Put user code to initialize the page here
    
            CheckYesNo()
    
        End Sub
    
    
        
    
    
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    
            newBox.MessageBoxButton = 3
    
            newBox.MessageBoxTop = 50
    
            newBox.MessageBoxLeft = 150
    
            newBox.MessageBoxWidth = 300
    
            newBox.MessageBoxHeight = 150
    
            newBox.MessageBoxButtonWidth = 50
    
            newBox.MessageBoxIDYes = "yesno"
    
            newBox.MessageBoxIDNo = "yesno"
    
            newBox.MessageBoxIDCancel = "yesno"
    
            newBox.MessageBoxButtonYesText = "Yes"
    
            newBox.MessageBoxButtonNoText = "No"
    
            newBox.MessageBoxButtonCancelText = "Cancel"
    
            newBox.MessageBoxTitle = "Dynamic message box."
    
            newBox.MessageBoxMessage = "Do you want to continue?"
    
            newBox.MessageBoxImage = "information.gif"
    
            PlaceHolder1.Controls.Add(newBox)
    
        End Sub
    
        Private Sub CheckYesNo()
    
            If Request.Form("yesno") = "Yes" Then
    
                Response.Write("Button - Yes - Selected")
    
            ElseIf Request.Form("yesno") = "No" Then
    
                Response.Write("Button - No - Selected")
    
            ElseIf Request.Form("yesno") = "Cancel" Then
    
                Response.Write("Button - Cancel - Selected")
    
            End If
    
        End Sub
    
    End Class

  4. #14
    poi creati la classe:

    messagebox.vb

    codice:
    Imports System
    
    Imports System.Web
    
    Imports System.Web.UI
    
    Imports System.Web.UI.WebControls
    
    Imports System.Web.UI.HtmlControls
    
    
    
    Imports System.IO
    
    Imports System.Drawing
    
    Imports System.Drawing.Imaging
    
    Imports System.Drawing.Drawing2D
    
    
    Public Class js
    
        Public Function js()
    
        End Function
    
    End Class
    
    Public Class MessageBox
    
        Inherits WebControl
    
        Private strLeft As String
    
        Private strTop As String
    
        Private intButton As Integer
    
        Private strMessage As String
    
        Private strTitle As String
    
        Private strImage As String
    
        Private strCss As String
    
        Private strCssTitle As String
    
        Private strCssMessage As String
    
        Private strButtonYes As String
    
        Private strButtonNo As String
    
        Private strButtonCancel As String
    
        Private strButtonWidth As Integer
    
        Private strMessageBoxIDYes As String
    
        Private strMessageBoxIDNo As String
    
        Private strMessageBoxIDCancel As String
    
        Private intMessageBoxWidth As Integer
    
        Private intMessageBoxHeight As Integer
    
        Private intMessageBoxImageWidth As Integer
    
        Private intMessageBoxImageHeight As Integer
    
        Dim homedirectory As String
    
        '   Message box left position
    
        Public Property MessageBoxLeft() As String
    
            Get
    
                Return strLeft
    
            End Get
    
            Set(ByVal Value As String)
    
                strLeft = Value
    
            End Set
    
        End Property
    
        '   Message box top position
    
        Public Property MessageBoxTop() As String
    
            Get
    
                Return strTop
    
            End Get
    
            Set(ByVal Value As String)
    
                strTop = Value
    
            End Set
    
        End Property
    
        '   Number of buttons you want to display in the message box
    
        Public Property MessageBoxButton() As Integer
    
            Get
    
                Return intButton
    
            End Get
    
    
    
            Set(ByVal Value As Integer)
    
                intButton = Value
    
            End Set
    
        End Property
    
        '   Customize message you want to display in the message box
    
        Public Property MessageBoxMessage() As String
    
            Get
    
                Return strMessage
    
            End Get
    
            Set(ByVal Value As String)
    
                strMessage = Value
    
            End Set
    
        End Property
    
        '   Title you want to display in the message box
    
        Public Property MessageBoxTitle() As String
    
            Get
    
                Return strTitle
    
            End Get
    
            Set(ByVal Value As String)
    
                strTitle = Value
    
            End Set
    
        End Property
    
        '   Image you want to display in the message box (like information / warning)
    
        Public Property MessageBoxImage() As String
    
            Get
    
                Return strImage
    
            End Get
    
            Set(ByVal Value As String)
    
                strImage = Value
    
            End Set
    
        End Property
    
        '   Message box ID for Yes button
    
        Public Property MessageBoxIDYes() As String
    
            Get
    
                Return strMessageBoxIDYes
    
            End Get
    
            Set(ByVal Value As String)
    
                strMessageBoxIDYes = Value
    
            End Set
    
        End Property
    
        '   Message box ID for No button
    
        Public Property MessageBoxIDNo() As String
    
            Get
    
                Return strMessageBoxIDNo
    
            End Get
    
            Set(ByVal Value As String)
    
                strMessageBoxIDNo = Value
    
            End Set
    
        End Property
    
        '   Message box ID for Cancel button
    
        Public Property MessageBoxIDCancel() As String
    
            Get
    
                Return strMessageBoxIDCancel
    
            End Get
    
    
    
            Set(ByVal Value As String)
    
                strMessageBoxIDCancel = Value
    
            End Set
    
        End Property
    
        '   Style you want to incorporate for message box
    
        Public Property MessageBoxCss() As String
    
            Get
    
                Return strCss
    
            End Get
    
            Set(ByVal Value As String)
    
                strCss = Value
    
            End Set
    
        End Property
    
        Public Property MessageBoxCssTitle() As String
    
            Get
    
                Return strCssTitle
    
            End Get
    
            Set(ByVal Value As String)
    
                strCssTitle = Value
    
            End Set
    
        End Property
    
        Public Property MessageBoxCssMessage() As String
    
            Get
    
                Return strCssMessage
    
            End Get
    
            Set(ByVal Value As String)
    
                strCssMessage = Value
    
            End Set
    
        End Property
    
        '   Message box Text for Yes button
    
        Public Property MessageBoxButtonYesText() As String
    
            Get
    
                Return strButtonYes
    
            End Get
    
            Set(ByVal Value As String)
    
                strButtonYes = Value
    
            End Set
    
        End Property
    
        '   Message box Text for No button
    
        Public Property MessageBoxButtonNoText() As String
    
            Get
    
                Return strButtonNo
    
            End Get
    
            Set(ByVal Value As String)
    
                strButtonNo = Value
    
            End Set
    
        End Property
    
        '   Message box Text for Cancel button
    
        Public Property MessageBoxButtonCancelText() As String
    
            Get
    
                Return strButtonCancel
    
            End Get
    
            Set(ByVal Value As String)
    
                strButtonCancel = Value
    
            End Set
    
        End Property
    
    
    
        '   Message box buttons width
    
        Public Property MessageBoxButtonWidth() As Integer
    
            Get
    
                Return strButtonWidth
    
            End Get
    
            Set(ByVal Value As Integer)
    
                strButtonWidth = Value
    
            End Set
    
        End Property
    
        '   Message box width
    
        Public Property MessageBoxWidth() As Integer
    
            Get
    
                Return intMessageBoxWidth
    
            End Get
    
            Set(ByVal Value As Integer)
    
                intMessageBoxWidth = Value
    
            End Set
    
        End Property
    
        '   Message box height
    
        Public Property MessageBoxHeight() As Integer
    
            Get
    
                Return intMessageBoxHeight
    
            End Get
    
            Set(ByVal Value As Integer)
    
                intMessageBoxHeight = Value
    
            End Set
    
        End Property
    
        '   Message box image width
    
        Public Property MessageBoxImageWidth() As Integer
    
            Get
    
                Return intMessageBoxImageWidth
    
            End Get
    
            Set(ByVal Value As Integer)
    
                intMessageBoxImageWidth = Value
    
            End Set
    
        End Property
    
        '   Message box image height
    
        Public Property MessageBoxImageHeight() As Integer
    
            Get
    
                Return intMessageBoxImageHeight
    
            End Get
    
            Set(ByVal Value As Integer)
    
                intMessageBoxImageHeight = Value
    
            End Set
    
        End Property
    
    
        Protected Friend layer As HtmlGenericControl
    
        Protected Friend ilayer As HtmlGenericControl
    
        Protected Friend img As HtmlGenericControl
    
        Protected Friend div As HtmlGenericControl
    
        Protected Friend ButtonOK As Button
    
        Protected Friend ButtonYes As Button
    
        Protected Friend ButtonNo As Button
    
        Protected Friend ButtonCancel As Button
    
    
    
        Protected Alertimage As System.Web.UI.WebControls.Image
    
        Public Sub New()
    
            MyBase.New("div")
    
        End Sub
    continua....

  5. #15
    ...il finale.

    codice:
      Protected Overrides Sub OnInit(ByVal e As EventArgs)
    
            MyBase.OnInit(e)
    
            '   Default properties settings for message box control
    
            If strLeft Is Nothing Then
    
                strLeft = "250"
    
            End If
    
    
            If strTop Is Nothing Then
    
                strTop = "250"
    
            End If
    
    
            If strTitle Is Nothing Then
    
                strTitle = "MessageBox"
    
            End If
    
            If intButton < 0 Then
    
                intButton = 1
    
            End If
    
            If strMessageBoxIDYes Is Nothing Then
    
                strMessageBoxIDYes = "MessageBoxIDYes"
    
            End If
    
            If strMessageBoxIDNo Is Nothing Then
    
                strMessageBoxIDNo = "MessageBoxIDNo"
    
            End If
    
            If strMessageBoxIDCancel Is Nothing Then
    
                strMessageBoxIDCancel = "MessageBoxIDCancel"
    
            End If
    
            If strCss Is Nothing Then
    
                strCss = ""
    
            End If
    
    
            If strCssMessage Is Nothing Then
    
                strCssMessage = ""
    
            End If
    
    
            If strCssTitle Is Nothing Then
    
                strCssTitle = ""
    
            End If
    
    
            If strMessage Is Nothing Then
    
                strMessage = "No message to display here."
    
            End If
    
    
            If intButton = 1 Or intButton > 3 Or intButton < 1 Then
    
                If strButtonYes Is Nothing Then
    
                    strButtonYes = "OK"
    
                End If
    
            ElseIf intButton > 1 And intButton < 4 Then
    
                If strButtonYes Is Nothing Then
    
                    strButtonYes = "Approve"
    
                End If
    
                If strButtonNo Is Nothing Then
    
    
    
                    strButtonNo = "Cancel"
    
                End If
    
                If strButtonCancel Is Nothing Then
    
                    strButtonCancel = "Ignore"
    
                End If
    
            End If
    
            If strButtonWidth < 5 Then
    
                strButtonWidth = 70
    
            End If
    
    
            If intMessageBoxWidth < 10 Then
    
                intMessageBoxWidth = 250
    
            End If
    
    
            If intMessageBoxHeight < 1 Then
    
                intMessageBoxHeight = 8
    
            End If
    
    
            If intMessageBoxImageWidth < 5 Then
    
                intMessageBoxImageWidth = 36
    
            End If
    
    
            If intMessageBoxImageHeight < 5 Then
    
                intMessageBoxImageHeight = 36
    
            End If
    
    
            If homedirectory Is Nothing Then
    
                homedirectory = Me.Page.Request.PhysicalApplicationPath
    
            End If
    
        End Sub
    
    
        Protected Overrides Sub createChildControls()
    
            '   Creating message box
    
            Dim myRow As TableRow
    
            Dim myCell As TableCell
    
    
            Dim myTable As Table = New Table()
    
            myTable.BorderWidth = New Unit(0)
    
            myTable.CellSpacing = 0
    
            myTable.Width = New Unit(intMessageBoxWidth)
    
            myTable.Height = New Unit(intMessageBoxHeight)
    
            Controls.Add(myTable)
    
    
            myRow = New TableRow()
    
            myRow.BorderWidth = New Unit(0)
    
            myTable.Rows.Add(myRow)
    
    
            myCell = New TableCell()
    
            Dim NewLabel As Label = New Label()
    
            NewLabel.Text = strTitle
    
            NewLabel.CssClass = strCssTitle
    
            myCell.Controls.Add(NewLabel)
    
    
            myCell.ID = "dragbar"
    
            myCell.ColumnSpan = 5
    
    
    
            myCell.CssClass = strCssTitle
    
            If strCssTitle = "" Then
    
                myCell.ForeColor = System.Drawing.Color.White
    
                myCell.BackColor = System.Drawing.Color.DarkBlue
    
                myCell.Font.Name = "Verdana"
    
                myCell.Font.Bold = True
    
                myCell.Font.Size = New FontUnit(8)
    
                myCell.Style.Add("CURSOR", "hand")
    
            End If
    
    
            myRow.Cells.Add(myCell)
    
    
            myRow = New TableRow()
    
            myRow.BorderWidth = New Unit(0)
    
            myTable.Rows.Add(myRow)
    
    
            myCell = New TableCell()
    
            myCell.ColumnSpan = 5
    
            myCell.CssClass = strCssMessage
    
            If strCssMessage = "" Then
    
                myCell.BackColor = System.Drawing.Color.LightGray
    
            End If
    
            myRow.Cells.Add(myCell)
    
    
            Dim myRow1 As TableRow
    
            Dim myCell1 As TableCell
    
    
            Dim myTable1 As Table = New Table()
    
            myTable1.BorderWidth = New Unit(0)
    
            myTable1.CellSpacing = 0
    
    
            myCell.Controls.Add(myTable1)
    
            myRow1 = New TableRow()
    
            myRow1.BorderWidth = New Unit(0)
    
            myTable1.Rows.Add(myRow1)
    
    
            myCell1 = New TableCell()
    
            myCell1.CssClass = strCssMessage
    
            myCell1.BorderWidth = New Unit(0)
    
            myCell1.Width = New Unit(36)
    
    
            Dim Alertimage As System.Web.UI.WebControls.Image = New System.Web.UI.WebControls.Image()
    
            Alertimage.Height = New Unit(intMessageBoxImageHeight)
    
            Alertimage.Width = New Unit(intMessageBoxImageWidth)
    
            Alertimage.BorderWidth = New Unit(0)
    
            Alertimage.ImageUrl = strImage
    
            myCell1.Controls.Add(Alertimage)
    
    
    
            myRow1.Cells.Add(myCell1)
    
            myCell1 = New TableCell()
    
            myCell1.CssClass = strCssMessage
    
            myCell1.BorderWidth = New Unit(0)
    
    
    
    
            myCell1.CssClass = strCssMessage
    
            If strCssMessage = "" Then
    
                myCell1.HorizontalAlign = HorizontalAlign.Center
    
                myCell1.ForeColor = System.Drawing.Color.Black
    
                myCell1.BackColor = System.Drawing.Color.LightGray
    
                myCell1.BorderColor = System.Drawing.Color.LightGray
    
                myCell1.Font.Name = "Verdana"
    
                myCell1.Font.Bold = True
    
                myCell1.Font.Size = New FontUnit(8)
    
            End If
    
    
            Dim NewLabel1 As Label = New Label()
    
            NewLabel1.Text = strMessage
    
            myCell1.Controls.Add(NewLabel1)
    
    
            myRow1.Cells.Add(myCell1)
    
    
            myRow = New TableRow()
    
            myRow.BorderWidth = New Unit(0)
    
            myTable.Rows.Add(myRow)
    
            If intButton = 1 Or intButton > 3 Or intButton < 1 Then
    
                myCell = New TableCell()
    
                myCell.ColumnSpan = 5
    
                myCell.BorderWidth = New Unit(0)
    
                myCell.CssClass = strCssMessage
    
                myCell.HorizontalAlign = HorizontalAlign.Center
    
    
                If strCssMessage = "" Then
    
                    myCell.ForeColor = System.Drawing.Color.Black
    
                    myCell.BackColor = System.Drawing.Color.LightGray
    
                    myCell.Font.Name = "Verdana"
    
                    myCell.Font.Bold = True
    
                    myCell.Font.Size = New FontUnit(8)
    
                End If
    
    
                ButtonOK = New Button()
    
                ButtonOK.ID = strMessageBoxIDYes
    
                ButtonOK.Text = strButtonYes
    
                ButtonOK.Width = New Unit(strButtonWidth)
    
                ButtonOK.Style.Add("CURSOR", "hand")
    
                myCell.Controls.Add(ButtonOK)
    
    
                myRow.Cells.Add(myCell)
    
            End If
    
    
            If intButton > 1 And intButton < 4 Then
    
                myCell = New TableCell()
    
                myCell.CssClass = strCssMessage
    
                myCell.BorderWidth = New Unit(0)
    
                myCell.HorizontalAlign = HorizontalAlign.Right
    
    
                If strCssMessage = "" Then
    
                    myCell.ForeColor = System.Drawing.Color.Black
    
                    myCell.BackColor = System.Drawing.Color.LightGray
    
                    myCell.Font.Name = "Verdana"
    
    
    
                    myCell.Font.Bold = True
    
                    myCell.Font.Size = New FontUnit(8)
    
                End If
    
    
                ButtonYes = New Button()
    
                ButtonYes.ID = strMessageBoxIDYes
    
                ButtonYes.Text = strButtonYes
    
                ButtonYes.Width = New Unit(strButtonWidth)
    
                ButtonYes.Style.Add("CURSOR", "hand")
    
                myCell.Controls.Add(ButtonYes)
    
    
                myRow.Cells.Add(myCell)
    
                myCell = New TableCell()
    
                myCell.Width = New Unit(20)
    
                myCell.BorderWidth = New Unit(0)
    
                myCell.CssClass = strCssMessage
    
    
                If strCssMessage = "" Then
    
                    myCell.BackColor = System.Drawing.Color.LightGray
    
                End If
    
    
                myRow.Cells.Add(myCell)
    
                myCell = New TableCell()
    
                myCell.CssClass = strCssMessage
    
                myCell.BorderWidth = New Unit(0)
    
    
                If strCssMessage = "" Then
    
                    myCell.ForeColor = System.Drawing.Color.Black
    
                    myCell.BackColor = System.Drawing.Color.LightGray
    
                    myCell.Font.Name = "Verdana"
    
                    myCell.Font.Bold = True
    
                    myCell.Font.Size = New FontUnit(8)
    
                End If
    
    
    
                If intButton = 2 Then
    
                    myCell.HorizontalAlign = HorizontalAlign.Left
    
                ElseIf intButton = 3 Then
    
                    myCell.HorizontalAlign = HorizontalAlign.Center
    
                End If
    
    
                ButtonNo = New Button()
    
                ButtonNo.ID = strMessageBoxIDNo
    
                ButtonNo.Text = strButtonNo
    
                ButtonNo.Width = New Unit(strButtonWidth)
    
                ButtonNo.Attributes("WIDTH") = strButtonWidth.ToString()
    
                ButtonNo.Attributes("HEIGHT") = strButtonWidth.ToString()
    
                ButtonNo.Style.Add("CURSOR", "hand")
    
                myCell.Controls.Add(ButtonNo)
    
    
                myRow.Cells.Add(myCell)
    
    
                If intButton = 3 Then
    
                    myCell = New TableCell()
    
                    myCell.Width = New Unit(10)
    
    
    
                    myCell.BorderWidth = New Unit(0)
    
                    myCell.CssClass = strCssMessage
    
    
                    If strCssMessage = "" Then
    
                        myCell.BackColor = System.Drawing.Color.LightGray
    
                    End If
    
    
                    myRow.Cells.Add(myCell)
    
                    myCell = New TableCell()
    
                    myCell.CssClass = strCssMessage
    
                    myCell.BorderWidth = New Unit(0)
    
                    myCell.HorizontalAlign = HorizontalAlign.Left
    
    
                    If strCssMessage = "" Then
    
                        myCell.ForeColor = System.Drawing.Color.Black
    
                        myCell.BackColor = System.Drawing.Color.LightGray
    
                        myCell.Font.Name = "Verdana"
    
                        myCell.Font.Bold = True
    
                        myCell.Font.Size = New FontUnit(8)
    
                    End If
    
    
                    ButtonCancel = New Button()
    
                    ButtonCancel.ID = strMessageBoxIDCancel
    
                    ButtonCancel.Text = strButtonCancel
    
                    ButtonCancel.Width = New Unit(strButtonWidth)
    
                    ButtonCancel.Style.Add("CURSOR", "hand")
    
                    myCell.Controls.Add(ButtonCancel)
    
    
                    myRow.Cells.Add(myCell)
    
    
                End If
    
            End If
    
        End Sub
    
        Protected Overrides Sub AddAttributesToRender(ByVal writer As HtmlTextWriter)
    
            ' Rendering message box control to the browser
    
            MyBase.AddAttributesToRender(writer)
    
            writer.AddAttribute(HtmlTextWriterAttribute.Id, "showimage")
    
            writer.AddAttribute(HtmlTextWriterAttribute.Style, "Z-INDEX: 9999; LEFT:" + strLeft + "px; WIDTH:" + strLeft + "px; POSITION: absolute; TOP: " + strTop + "px; filter:progid:DXImageTransform.Microsoft.Shadow(color='dimgray', direction="135," strength="3;"")
    
        End Sub
    
    End Class

  6. #16
    Originariamente inviato da Daniele80
    Ao lasciatemi stare Andrea....mitico
    Grazie Daniele, tu si che mi comprendi!

    Ciao
    AZ [Microsoft - .NET MVP]
    Mia Home page: http://ciclismo.sitiasp.it
    Asp.Net community: http://www.aspitalia.com
    Il mio blog: http://blogs.aspitalia.com/az

  7. #17
    Utente di HTML.it L'avatar di pietro09
    Registrato dal
    Jan 2002
    Messaggi
    10,116
    Chiedo scusa perchè qui non è il posto adatto.
    Ho letto il Blog di Andrea Zani e devo dire che è proprio interessante: da consigliare a tutti.

    Ma il link sul ciclismo è ancora meglio:
    ma, se volessi chiederti consigli inerenti alla BICICLETTA, come petrei fare?

    Ciao
    Pietro

  8. #18
    Originariamente inviato da pietro09
    Chiedo scusa perchè qui non è il posto adatto.
    Ho letto il Blog di Andrea Zani e devo dire che è proprio interessante: da consigliare a tutti.
    Grazie Pietro09. Ho capito che devo offrirti da bere
    Ma il link sul ciclismo è ancora meglio:
    ma, se volessi chiederti consigli inerenti alla BICICLETTA, come petrei fare?

    Ciao
    :maLOL: E' un po' che chiedo al capo di aspitalia.com di inserire un forum apposito ma per finora nulla
    Ciao
    AZ [Microsoft - .NET MVP]
    Mia Home page: http://ciclismo.sitiasp.it
    Asp.Net community: http://www.aspitalia.com
    Il mio blog: http://blogs.aspitalia.com/az

  9. #19

  10. #20
    Utente di HTML.it L'avatar di pietro09
    Registrato dal
    Jan 2002
    Messaggi
    10,116
    Originariamente inviato da Daniele80
    ehehhehehe il super mega capo....
    Ehm... quel MsgBox che hai mandato, non potresti renderlo mobile? :maLOL:

    Pietro

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.