<%
@ Master Language="VB" AutoEventWireup="false" CodeBehind="MasterPage.master.vb"
Inherits="ClickableCommunity.MasterPage" %>
<%
@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %>
<!
DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<
html xmlns="http://www.w3.org/1999/xhtml">
<
html xmlns="http://www.w3.org/1999/xhtml">
<%
@ import namespace="System.Data" %>
<%
@ import namespace="System.Data.Sql" %>
<%
@ import namespace="System.Data.SqlClient" %>
<%
@ import namespace="Telerik.Web.UI" %>
<
script runat="server">
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Dim tree As RadTreeView = DirectCast(RadPanelBar1.FindItemByText("Events").Items(0).FindControl("RadTreeView1"), RadTreeView)
'here is where the error is. it is saying that
'createtable is null
tree.DataSource = CreateTable()
tree.DataFieldID =
"ID"
tree.DataFieldParentID =
"ParentID"
tree.DataTextField =
"Text"
tree.DataBind()
End If
End Sub 'page_load
'this function creates a datatable for the rad
'tree that is in the events panel
Private Function CreateTable() As DataTable
'set up my connection to the database
Dim conn As New SqlConnection
conn.ConnectionString = ConfigurationManager.ConnectionStrings(
"connectionString").ConnectionString
Dim table As DataTable = New DataTable()
table.Columns.Add(
"ID")
table.Columns.Add(
"ParentID")
table.Columns.Add(
"Text")
'this is a counter for the id fields
'of the data table
Dim count As Integer = 1
'this adds the parent categories to the
'datatable
Dim categoryQuery As New SqlCommand
conn.Open()
categoryQuery.Connection = conn
categoryQuery.CommandText =
"select CategoryId, Name from categories"
Dim cdr As SqlDataReader = categoryQuery.ExecuteReader()
While cdr.Read()
If (cdr.Item(0).ToString <> "") Then
table.Rows.Add(
New String() {count.ToString, Nothing, cdr.Item(1).ToString})
'we have to increment count to keep an id for the data table
count = count + 1
End If
End While 'while cdr.Read()
conn.Close()
conn.Open()
'this adds the events with their parent category
'id to the datatable
Dim eventQuery As New SqlCommand
eventQuery.Connection = conn
eventQuery.CommandText =
"SELECT eventid, FK_CategoryID, name from events"
Dim edr As SqlDataReader = eventQuery.ExecuteReader()
While edr.Read()
If (edr.Item(0).ToString <> "") Then
table.Rows.Add(
New String() {count.ToString(), edr.Item(1).ToString, edr.Item(2).ToString})
'we have to increment count to keep an id for the data table
count = count + 1
End If
End While 'while edr.Read()
Return table
End Function 'CreateGenreTable
</
script>
<
head runat="server">
<link href="ClickableCommunity.css" rel="stylesheet" type="text/css" />
<title></title>
<asp:ContentPlaceHolder ID="head" runat="server">
</asp:ContentPlaceHolder>
</
head>
<
body id="MasterBody" runat="server" style="margin: 0px; height: 100%; overflow: hidden;"
scroll="no">
<form id="Form1" method="post" runat="server" style="height: 100%">
<asp:ScriptManager ID="ScriptManager1" runat="server">
</asp:ScriptManager>
<br />
<asp:ContentPlaceHolder ID="header" runat="server">
</asp:ContentPlaceHolder>
<div id="topDiv">
<div id="image" class="topDivImage">
<img src="images\logo.jpg" alt="Clickable Community Logo" width="200" height="75" />
</div>
<div id="viewMenu" class="viewMenu">
Menu goes here
</div>
</div>
<telerik:RadSplitter ID="RadSplitter1" runat="server" Orientation="Vertical" Width="100%"
Height="100%" CssClass="AllContent">
<telerik:RadPane ID="LeftRadPane1" runat="server" Width="220px" Scrolling="Both"
BorderStyle="None" BorderSize="0">
<div id="leftPanel">
<telerik:RadPanelBar ID="RadPanelBar1" runat="server" Skin="Web20" ExpandMode="SingleExpandedItem"
AllowCollapseAllItems="false" Width="220px">
<CollapseAnimation Type="None" Duration="100"></CollapseAnimation>
<Items>
<telerik:RadPanelItem runat="server" Text="Events" Expanded="true">
<Items>
<telerik:RadPanelItem runat="server">
<ItemTemplate>
<telerik:RadTreeView ID="RadTreeView1" runat="server" Skin="Web20"
CssClass="leftPanelContent" CheckBoxes="true">
</telerik:RadTreeView>
</ItemTemplate>
</telerik:RadPanelItem>
</Items>
</telerik:RadPanelItem>
<telerik:RadPanelItem runat="server" Text="Search" ChildGroupCssClass="leftPanelContent">
<Items>
<telerik:RadPanelItem runat="server" Text="Child RadPanelItem 1">
</telerik:RadPanelItem>
<telerik:RadPanelItem runat="server" Text="Child RadPanelItem 2">
</telerik:RadPanelItem>
</Items>
</telerik:RadPanelItem>
<telerik:RadPanelItem runat="server" Text="Administrator" ChildGroupCssClass="leftPanelContent">
<Items>
<telerik:RadPanelItem runat="server" Text="Child RadPanelItem 1">
</telerik:RadPanelItem>
<telerik:RadPanelItem runat="server" Text="Child RadPanelItem 2">
</telerik:RadPanelItem>
</Items>
</telerik:RadPanelItem>
</Items>
<ExpandAnimation Type="None" Duration="100"></ExpandAnimation>
</telerik:RadPanelBar>
</div>
</telerik:RadPane>
<telerik:RadSplitBar runat="server" ID="RadSplitBar2" CollapseMode="Forward" EnableResize="false"
ForeColor='Green' />
<telerik:RadPane ID="RightRadPane1" runat="server" CssClass="RightPanelPadding" Scrolling="Both"
BorderStyle="None" BorderSize="0">
<asp:ContentPlaceHolder ID="MainContent" runat="server">
</asp:ContentPlaceHolder>
</telerik:RadPane>
</telerik:RadSplitter>
</form>
</
body>
</
html>
ItemID is neither a DataColumn nor a DataRelation for table Request.
System.ArgumentException: ItemID is neither a DataColumn nor a DataRelation for table Request.
| <telerik:RadGrid ID="grdSearchResults" |
| runat="server" |
| Skin="Office2007" |
| Visible="true"> |
| <SelectedItemStyle BackColor="Wheat" /> |
| <%--<HeaderStyle BackColor="White" Font-Underline="true" Font-Italic="true" />--%> |
| <MasterTableView Name="Request" |
| AutoGenerateColumns="false" |
| DataKeyNames="ADMRequestID" |
| HierarchyLoadMode="ServerOnDemand" |
| PagerStyle-AlwaysVisible="true" |
| AllowSorting="true" |
| AllowPaging="true" |
| PageSize="50" > |
| <HeaderStyle /> |
| <ExpandCollapseColumn CollapseImageUrl="~/Images/SinglePlus.gif" ExpandImageUrl="~/Images/SinglePlus.gif"></ExpandCollapseColumn> |
| <Columns> |
| <telerik:GridBoundColumn DataField="ADMRequestID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="IsRACRequest" Visible="false" /> |
| <telerik:GridTemplateColumn HeaderText="Request #" DataField="UserRequestID"> |
| <ItemTemplate> |
| <asp:HyperLink ID="hlRequestID" runat="server" Font-Size="Small" NavigateUrl='<%# UrlRequestLink(Container.Cells(2).Text, Container.Cells(3).Text) %>' Text='<%# Eval("UserRequestID") %>' /> |
| </ItemTemplate> |
| </telerik:GridTemplateColumn> |
| <telerik:GridBoundColumn DataField="Status" HeaderText="Status" /> |
| <telerik:GridBoundColumn DataField="DateOfLetter" HeaderText="Date Of Letter" DataFormatString="{0:d}" /> |
| <telerik:GridBoundColumn DataField="DateDue" HeaderText="Due Date" DataFormatString="{0:d}" /> |
| <telerik:GridBoundColumn DataField="DateMailed" HeaderText="Date Mailed" DataFormatString="{0:d}" /> |
| <telerik:GridBoundColumn DataField="SearchFound" Visible="false" /> |
| </Columns> |
| <%--<SelfHierarchySettings ParentKeyName="ADMRequestID" KeyName="ItemID" />--%> |
| <DetailTables> |
| <telerik:GridTableView Name="RequestItems" |
| AutoGenerateColumns="false" |
| DataKeyNames="ItemID" |
| HierarchyLoadMode="ServerOnDemand"> |
| <Columns> |
| <telerik:GridBoundColumn DataField="ItemID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="ADMRequestID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="ItemType" HeaderText="Type" /> |
| <telerik:GridBoundColumn DataField="ItemUserID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="IsRACType" Visible="false" /> |
| <telerik:GridTemplateColumn HeaderText="Description" DataField="Description"> |
| <ItemTemplate> |
| <asp:HyperLink ID="hlClaimID" runat="server" Font-Size="Small" NavigateUrl='<%# UrlItemLink(Container.Cells(2).Text, Container.Cells(4).Text, Container.Cells(6).Text) %>' Text='<%# Eval("Description") %>' /> |
| </ItemTemplate> |
| </telerik:GridTemplateColumn> |
| <telerik:GridBoundColumn DataField="ItemDate" HeaderText="Date" DataFormatString="{0:d}" /> |
| <telerik:GridBoundColumn DataField="SearchFound" Visible="false" /> |
| <telerik:GridBoundColumn DataField="Duplicate" Visible="false" /> |
| </Columns> |
| <ParentTableRelation> |
| <telerik:GridRelationFields DetailKeyField="ADMRequestID" MasterKeyField="ADMRequestID" /> |
| </ParentTableRelation> |
| <DetailTables> |
| <telerik:GridTableView Name="ClaimItems" |
| AutoGenerateColumns="false" |
| DataKeyNames="ItemID" |
| HierarchyLoadMode="ServerOnDemand"> |
| <ParentTableRelation> |
| <telerik:GridRelationFields DetailKeyField="ADMClaimID" MasterKeyField="ItemID" /> |
| </ParentTableRelation> |
| <Columns> |
| <telerik:GridBoundColumn DataField="ItemID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="ADMClaimID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="ItemType" HeaderText="Type" /> |
| <telerik:GridBoundColumn DataField="ItemUserID" Visible="false" /> |
| <telerik:GridBoundColumn DataField="IsRACType" Visible="false" /> |
| <telerik:GridTemplateColumn HeaderText="Description" DataField="Description"> |
| <ItemTemplate> |
| <asp:HyperLink ID="hlClaimID" runat="server" Font-Size="Small" NavigateUrl='<%# UrlItemLink(Container.Cells(2).Text, Container.Cells(4).Text, Container.Cells(6).Text) %>' Text='<%# Eval("Description") %>' /> |
| </ItemTemplate> |
| </telerik:GridTemplateColumn> |
| <telerik:GridBoundColumn DataField="ItemDate" HeaderText="Date" DataFormatString="{0:d}" /> |
| <telerik:GridBoundColumn DataField="SearchFound" Visible="false" /> |
| </Columns> |
| </telerik:GridTableView> |
| </DetailTables> |
| </telerik:GridTableView> |
| </DetailTables> |
| </MasterTableView> |
| </telerik:RadGrid> |
| Protected Sub grdSearchResults_DetailTableDataBind(ByVal source As Object, ByVal e As Telerik.Web.UI.GridDetailTableDataBindEventArgs) Handles grdSearchResults.DetailTableDataBind |
| LoadGrid(e.DetailTableView.Name) |
| End Sub |
| Protected Sub grdSearchResults_NeedDataSource(ByVal source As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs) Handles grdSearchResults.NeedDataSource |
| LoadGrid() |
| End Sub |
| Protected Sub LoadGrid(Optional ByVal TableName As String = "") |
| With Me.grdSearchResults |
| If TableName <> "" Then |
| .DataSource = SearchResults.Tables(TableName) |
| Else |
| .DataSource = SearchResults |
| End If |
| End Sub |
| <telerik:RadWindowManager ID="adminWindowManager" runat="server" DestroyOnClose="true" Behaviors="Close,Reload,Move" KeepInScreenBounds="true" Modal="true" VisibleStatusbar="false" ShowContentDuringLoad="false" OnClientPageLoad="ClientName.Web.UI.Window.OnWindowLoaded" /> |
| ClientName.Web.UI.Window.Manager = function() { |
| return GetRadWindowManager(); |
| } |
| ClientName.Web.UI.Window.OpenWindow = function(u, t, d, c) { |
| var m = ClientName.Web.UI.Window.Manager(); |
| var w = m.open(u, t); |
| if (d) { w.set_modal(d); } |
| if (c) { w.add_close(c); } |
| }; |
| function ValidationSummaryOnSubmit(validationGroup) { |
| ... |
| ClientName.Web.UI.Window.OpenAlert('Validation HTML Message', 'Validation Error'); |
| ... |
| } |
| ClientName.Web.UI.Window.GetParent = function() { |
| var w = null; |
| if (window.radWindow) { w = window.radWindow; } |
| else if (window.frameElement.radWindow) { w = window.frameElement.radWindow; } |
| return w.BrowserWindow; |
| } |
| ClientName.Web.UI.Window.OpenAlert = function(m, t) { |
| var c = this; |
| if (typeof radalert == 'undefined') { c = ClientName.Web.UI.Window.GetParent(); } |
| var a = c.radalert(m, 0, 0, t); |
| a.setActive(); // THIS DOES NOT WORK |
| a.add_pageLoad(function(s,a) { ... }); // THIS DOES NOT WORK EITHER |
| }; |
