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>
Related examples in the same category