FAQ ASP.NET/VB.NET

					Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
					If not Page.IsPostBack Then
					'code pour remplir la dropdownlist
					End If
					End Sub
				

					<asp:PlaceHolder id="PlaceHolder1" runat="server"></asp:PlaceHolder>
				

					Protected WithEvents PlaceHolder1 As PlaceHolder
					Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
					Dim monlabel As New Label
					PlaceHolder1.controls.add(monlabel)
					End Sub
				

					<meta http-equiv="Content-Language" id="languagePage" runat="server" />

					<meta name="Author" id="auteurPage" runat="server" />
					<meta name="Classification" id="classificationPage" runat="server" />
					<meta name="Description" id="descriptionPage" runat="server" />
					<meta name="keywords" id="keywordsPage" runat="server" />
				

					Protected languagePage As HtmlGenericControl
					Protected auteurPage As HtmlGenericControl
					Protected classificationPage As HtmlGenericControl
					Protected descriptionPage As HtmlGenericControl
					Protected keywordsPage As HtmlGenericControl
				

					languagePage.Attributes("content") = "fr"
					auteurPage.Attributes("content") = "neo.51"
					classificationPage.Attributes("content") = "developpement"
					descriptionPage.Attributes("content") = "FAQ ASP.NET"
					keywordsPage.InnerText = "asp.net, vb.net, FAQ"
				

AddHandler Bbouton.Click, AddressOf MesBoutons_Click

					Sub MesBoutons_Click(ByVal sender As Object, ByVal e As System.EventArgs)
					'Récupération du bouton ayant déclenché l'événement
					Dim Btn As Button
					Btn = Ctype(sender,Button)
					'Traitement
					...
					End Sub
				

					<asp:RegularExpressionValidator
					id="RegularExpressionValidator"
					runat="server"
					Display="Static"
					ControlToValidate="NsAd1"
					ValidationExpression="([0-2]?[0-9]?[0-9]\.){3}[0-2]?[0-9]?[0-9]">
					</asp:RegularExpressionValidator>
				

					<asp:Button id="button1" runat="server" CausesValidation="false"/>
				

					Dim html As String = Server.HtmlEncode(TextBox1.Text)
				

					For Each line As String In TextBox1.Lines
					' Traitement
					Response.Write(line)
					Next
				

					NomDropDownList.DataSource = DbTemplate.GetCategories
					NomDropDownList.DataTextField = "champ_a_afficher"
					NomDropDownList.DataValueField = "champ_valeur"
					NomDropDownList.DataBind

				

					Dim li As ListItem = New ListItem
					li.Text = "texte"
					li.Value = "valeur"
					NomDropDownList.Items.Add(li)
				

					Dim monstyle As New Style

					monstyle.BorderColor = Color.Blue
					monstyle.BackColor = Color.Black
					monstyle.ForeColor = Color.Blue
					monstyle.Font.Name="Verdana"
					monstyle.Font.Size=20
				

					label1.ApplyStyle(monstyle)
				

					 
ddl.Items.insert(0,"mon texte")

				

					 
Dim li as ListItem=New ListItem("mon texte", "ma valeur")
ddl.Items.Insert(0, li)

				

					<asp:CheckBox runat="server" Text="Cochez moi" onchange="alert(this.checked);" />
				

					<span onchange="alert(this.checked);"><input id="ctl02" type="checkbox" name="ctl02" /><label for="ctl02">Cochez moi</label></span>>
				

					MonCheckbox.InputAttributes.Add("onchange", "alert(this.checked);")
				

					<input id="MonCheckbox" type="checkbox" name="MonCheckbox" onchange="alert(this.checked);" /><label for="MonCheckbox">Cochez moi</label>
				

					<asp:Repeater runat="server" ID="MonRepeater" OnItemDataBound="ItemDataBound"> 
  <ItemTemplate> 
    <asp:Label runat="server" Text="<%#Container.DataItem %>" /> 
  </ItemTemplate> 
</asp:Repeater>
				

					MonRepeater.DataSource = New Integer() {1, 2, 3, 4, 5, 6, 7} 
MonRepeater.DataBind()
				

					Protected Sub ItemDataBound(ByVal sender As Object, ByVal e As RepeaterItemEventArgs)
	If e.Item.DataItem Mod 2 = 0 Then
		e.Item.Visible = False
	End If
End Sub

				

					<asp:Repeater runat="server" ID="MonRepeater" OnDataBinding="DataBindingRepeater">

Protected Sub DataBindingRepeater(ByVal sender As Object, ByVal e As EventArgs)
	Dim r As Repeater = sender
	r.DataSource = Array.FindAll(Of Integer)(r.DataSource, AddressOf filtre)
End Sub

Public Function filtre(ByVal i As Integer) As Boolean
	Return i Mod 2 <> 0
End Function
				

					<TextBox ID="MonTxtBox" runat="server" />
<asp:LinkButton runat="server" OnClick="ClickLien" Text="Changer de page" />

				

					Protected Sub ClickLien(ByVal sender As Object, ByVal e As EventArgs)
	Server.Transfer("~/Page2.aspx")
End Sub
				

					Public Function GetValue() As String
    Return MonTxtBox.Text
End Function

				

					MonLabel.Text = CType(PreviousPage, _Default).GetValue()

				

					<asp:LinkButton runat="server" PostBackUrl="~/Page2.aspx" Text="Changer de page" />

				

					Dim previousPage As _Default = previousPage
If Not previousPage Is Nothing Then
	' ...
End If

				

<%@ PreviousPageType VirtualPath="~/Default.aspx" %>

MonLabel.Text = PreviousPage.GetValue();

					Public Shadows ReadOnly Property PreviousPage() As WebApplication2.[Default]
					Get
					Return CType(MyBase.PreviousPage, WebApplication2.[Default])
					End Get
					End Property
				

					Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
	If Not IsPostBack Then
		' code à placer pour alimenter le contrôle
	End If
End Sub

				

					<asp:DropDownList runat="server" ID="maDropDown"> 
  <asp:ListItem Text="Valeur 1" /> 
  <asp:ListItem Text="Valeur 2" /> 
  <asp:ListItem Text="Valeur 3" /> 
</asp:DropDownList>

				

					Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
  maDropDown.Attributes["onchange"] = Page.ClientScript.GetPostBackEventReference(maDropDown, maDropDown.ID)
  If (IsPostBack) Then
	Response.Write("la page a été correctement postée à " + DateTime.Now.ToLongTimeString())
End Sub

				

					Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
  maDropDown.Attributes["onchange"] = Page.ClientScript.GetPostBackEventReference(maDropDown, maDropDown.ID)
  If IsPostBack And Request.Form["__EVENTTARGET"] <> Nothing And Request.Form["__EVENTTARGET"].Contains(maDropDown.UniqueID) Then
	Response.Write("la page a été correctement postée par la dropdownlist à " + DateTime.Now.ToLongTimeString())
  End If
  MyBase.OnLoad(e)
End Sub

				

					<asp:TextBox ID="leTextBox" runat="server" />  
<asp:Button ID="monBouton" runat="server" Text="go" OnClick="clic" /> 

				

					Protected Sub clic(ByVal sender As Object, ByVal e As EventArgs)
  Response.Write("le bouton a été cliqué")
End Sub

				

					Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)
  leTextBox.Attributes["onchange"] = Page.ClientScript.GetPostBackEventReference(monBouton, monBouton.ID);
  MyBase.OnLoad(e)
End Sub

				

					Argument de publication ou de rappel non valide. La validation d'événement est activée via <pages enableEventValidation="true"/> 
dans la configuration ou via <%@ Page EnableEventValidation="true" %> dans une page. Pour des raisons de sécurité, 
cette fonctionnalité vérifie si les arguments des événements de publication ou de rappel proviennent du contrôle serveur qui les 
a rendus à l'origine. Si les données sont valides et attendues, utilisez la méthode ClientScriptManager.RegisterForEventValidation 
afin d'inscrire les données de publication ou de rappel pour la validation. 

				

					Protected Overrides Sub Render(ByVal writer As System.Web.UI.HtmlTextWriter)
  Page.ClientScript.RegisterForEventValidation(monBouton.UniqueID, monBouton.ID); 
  MyBase.Render(writer)
End Sub

				

					<asp:Silverlight>

				

					<asp:Silverlight ID="Silverlight1" runat="server" Source="monApplication.xap" Version="2.0" Width="400" Height="300" />

				

					<%@ Register Assembly="System.Web.Silverlight" Namespace="System.Web.UI.SilverlightControls" TagPrefix="asp" %>

				

					<add tagPrefix="asp" namespace="System.Web.UI.SilverlightControls" assembly="System.Web.Silverlight" />

				

					<asp:ScriptManager runat="server"/>

				

					<asp:ScriptManager ID="ScriptManager1" runat="server"></asp:ScriptManager> 
<div style="height:100px"> 
  <asp:Silverlight ID="Xaml1" runat="server" Source="~/ClientBin/monApplication.xap" MinimumVersion="2.0.30523" Width="100%" Height="100%" /> 
</div> 
<div id="result"></div>

				

					Private Sub Button_Click(ByVal sender As Object, ByVal e As RoutedEventArgs)
  var element = HtmlPage.Document.GetElementById("result"); 
  element.SetAttribute("innerText", "valeur venant de Silverlight"); 
End Sub