'******* System.Web.UI.HtmlControls should be imported
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim Keywords As String = "Veritaban?ndan gelen liste"
Dim Description As String = "Veritaban?ndan gelen aç?klama"
Dim Title As String = "Ahmet Kaymaz - Bu sayfaya özel ba?l?k"
‘********** Creating a meta object for Keywords tag
Dim Meta As HtmlMeta = New HtmlMeta()
‘******* Adding name and content to object
Meta.Attributes.Add("name", "keywords")
Meta.Attributes.Add("content", Keywords)
Header.Controls.Add(Meta)
‘********** Creating a meta object for Description tag
Meta = New HtmlMeta()
‘******* Adding name and content to object
Meta.Attributes.Add("name", "description")
Meta.Attributes.Add("content", Description)
Header.Controls.Add(Meta)
‘*********** Update the page Title
Page.Title = Title
End Sub
