ASP.Net/Mobile Control/AdRotator

Mobile adrotator (VB.net)

<%@ Page 
    Inherits="System.Web.UI.MobileControls.MobilePage" 
    Language="VB" 
%>
<%@ Register 
    TagPrefix="mobile" 
    Namespace="System.Web.UI.MobileControls" 
    Assembly="System.Web.Mobile" 
%>
<script runat="server" language="VB">
</script>
<mobile:form 
    id="FirstPage" 
    runat="server">
    <mobile:adrotator  
        advertisementfile="AdRotatorBasic.xml" 
        runat="server"
    />
</mobile:form>

Read adrotator detail and output (VB.net)

<%@ Page 
    Inherits="System.Web.UI.MobileControls.MobilePage" 
    Language="VB" 
%>
<%@ Register 
    TagPrefix="mobile" 
    Namespace="System.Web.UI.MobileControls" 
    Assembly="System.Web.Mobile" 
%>
<script runat="server" language="VB">
Sub AdCreated_Event(ByVal Sender as Object, _
    ByVal E as AdCreatedEventArgs)
    lbl1.Text = "Here is information on the ad " _
        & "currently being displayed: " _
        & " Alternate Text: " & E.AlternateText _
        & ", Image URL: " & E.ImageURL _
        & ", Navigate URL: " & E.NavigateURL
End Sub
</script>
<mobile:form 
    id="FirstPage" 
    runat="server">
    <mobile:adrotator  
        id="ar1"  
        onadcreated="AdCreated_Event"
        advertisementfile="AdRotatorBasic.xml" 
        runat="server"
    />
    <mobile:label 
        runat="server" 
        id="lbl1"
    />
</mobile:form>