Ciao,
avendo molta nostalgia delle MessageBox ho improvvisato una piccola classe per poter visualizzare un Alert richiamandolo appunto come una MessageBox.

Non conosco JavaScript quindi i risultati ottenuti non sono quelli sperati.
Ho 3 problemi:
- nell'intestazione del messaggio mi appare una scritta "VBScript" che non vorrei visualizzare;
- non posso gestire i ritorni a capo con Environment.Newline (mi dà errore);
- come posso implementare un messaggio di conferma?

Andrea

***

Public Class MessageBoxForAspx
Shared Function ShowMessage(ByVal str As String, ByVal title As String, ByVal supportVB As Boolean, ByVal style As MsgBoxStyle) As String
If supportVB Then
Return String.Format("[script removed] Me.lbHiddenlMessage.Text = MessageBoxForAspx.ShowMessage("bla bla bla...", "Titolo", Request.Browser.VBScript, MsgBoxStyle.Information)

Il codice della classe è stato troncato.
Allego un file di testo.

Andrea

Non puoi superare i tuoi problemi, perchè javascript ti mette a disposizione solo 2 metodi limitati mandare un messaggio al client, che sono:
"alert", per fare apparire un messaggio col punto esclamativo e il bottone OK
"confirm", per fare apparire un messaggio col punto interrogativo e il bonne "Ok" e "Cancel".
Per questi due, non puoi neanche cambiare il titolo della finestra.
Se vuoi fare qualcosa di più pratico devi fartelo tu a mano.
Ti scrivo un link con un esempio interessante:
http://www.jankoatwarpspeed.com/pos...-CSS.aspxv

N.B.: Ho attivato l'html sui forums così d'ora in poi, se inserisci il tuo codice d'esempio dentro un tag "PRE" verrà visualizzato correttamente.
Es:

Public Class MessageBoxForAspx
    Shared Function ShowMessage(ByVal str As String, ByVal title As String, ByVal supportVB As Boolean, ByVal style As MsgBoxStyle) As String
        If supportVB Then
            Return String.Format(")", str)
        End If
    End Function

    Public Function ShowMessage(ByVal str As String, ByVal title As String) As String
        Return ShowMessage(str, title, False, MsgBoxStyle.Exclamation)
    End Function
End Class

***

Me.lbHiddenlMessage.Text = MessageBoxForAspx.ShowMessage("bla bla bla...", "Titolo", Request.Browser.VBScript, MsgBoxStyle.Information)

Più avanti aggiungerò un bottone sugli stili dei messaggi per formattare il codice in automatico.

Ok, tutto chiaro.
Grazie anche per il link.

Andrea