<%@ Page
Inherits="System.Web.UI.MobileControls.MobilePage"
Language="VB"
%>
<%@ Register
TagPrefix="mobile"
Namespace="System.Web.UI.MobileControls"
Assembly="System.Web.Mobile"
%>
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
id="FirstPage"
runat="server">
id="ar1"
onadcreated="AdCreated_Event"
advertisementfile="AdRotatorBasic.xml"
runat="server"
/>
runat="server"
id="lbl1"
/>