|
<%@ Page Language="vb" %>
<html>
<head>
<title>Rich Control Example</title>
<script runat="server">
Sub Page_Load()
MyAdRotator.KeywordFilter = "Nutshell"
Dim ShortDate As String
ShortDate = MyCalendar.TodaysDate.ToString("D")
MyLabel.Text = "Today is " & ShortDate
End Sub
</script>
</head>
<body>
<h1>Rich Control Example</h1>
<form runat="server">
<asp:table id="MyTable" border="1" cellpadding="5" cellspacing="0" runat="server">
<asp:tablerow runat="server">
<asp:tablecell runat="server">
AdRotator Control:
</asp:tablecell>
<asp:tablecell runat="server">
<asp:adrotator id="MyAdRotator" advertisementfile="bannerads.xml" runat=server/>
</asp:tablecell>
</asp:tablerow>
<asp:tablerow runat="server">
<asp:tablecell runat="server">
Calendar Control:
</asp:tablecell>
<asp:tablecell runat="server">
<asp:calendar id="MyCalendar"
showdayheader="true"
todaydaystyle-backcolor="yellow"
todaydaystyle-forecolor="blue"
runat="server"/>
</asp:tablecell>
</asp:tablerow>
</asp:table>
<asp:label id="MyLabel" runat="server"/>
</form>
</body>
</html>
|
