See what's going on, see the images at http:\\www.mmsis.com.br\mf\Acesso1.png and http:\\www.mmsis.com.br\mf\Acesso2.png
method-id Button1_Click protected.
procedure division using by value sender as object e as type System.EventArgs.
declare mymsg = "This is a message!"
invoke self::ClientScript::RegisterStartupScript(type of self, "yourMessage", "alert('" & mymsg & "');", true)
end method.