<asp:ScriptManager runat="server" ID="ScriptManager"></asp:ScriptManager><%@ Page Title="" Language="VB" MasterPageFile="~/App_Master/SystemSetup/SystemSetup_base.master" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="SystemSetup_Default" %><asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder_Top" Runat="Server"> <telerik:RadToolBar ID="RadToolBar1" runat="server" Width="100%" Height="26px"> <Items> <telerik:RadToolBarButton ImageUrl="Resources/Images/ico_Add_16.png"></telerik:RadToolBarButton> <telerik:RadToolBarButton Text="TEXT"></telerik:RadToolBarButton> </Items> </telerik:RadToolBar></asp:Content><asp:Content ID="Content2" ContentPlaceHolderID="ContentPlaceHolder_Left" Runat="Server"> <asp:button runat="server" ID="B_Eng" Text="ENG" Visible="false" /> <asp:button runat="server" ID="B_Ita" Text="ITA" Visible="false" /> <telerik:RadPanelBar ID="RadPanelBar" Runat="server" Width="100%" AllowCollapseAllItems="True" PersistStateInCookie="True"> <Items> <telerik:RadPanelItem runat="server" Text='<%$ Resources:Menu_Item_1 %>' PostBack="false" Expanded="true" > <Items> <telerik:RadPanelItem runat="server" Value="~/SystemSetup/Admin/Setup/CompanyList.ascx" Text='<%$ Resources:Menu_Item_1_1 %>' ImageUrl="~/SystemSetup/Resources/Images/ico_Company_16.png" Selected="true"></telerik:RadPanelItem> <telerik:RadPanelItem runat="server" Value="~/SystemSetup/Admin/Setup/OperatorList.ascx" Text='<%$ Resources:Menu_Item_1_2 %>' ImageUrl="~/SystemSetup/Resources/Images/ico_Users_16.png"></telerik:RadPanelItem> <telerik:RadPanelItem runat="server" Value="~/SystemSetup/Admin/Setup/RoleList.ascx" Text='<%$ Resources:Menu_Item_1_3 %>' ImageUrl="~/SystemSetup/Resources/Images/ico_Role_16.png"></telerik:RadPanelItem> </Items> </telerik:RadPanelItem> </Items> </telerik:RadPanelBar></asp:Content><asp:Content ID="Content3" ContentPlaceHolderID="ContentPlaceHolder_Right" Runat="Server"> <asp:Panel runat="server" ID="P_Body" Width="100%" Height="100%"></asp:Panel></asp:Content>Partial Class SystemSetup_Default Inherits System.Web.UI.Page Private Const CurrentControlKey As String = "CurrentControlKey" Private Property CurrentControl() As String Get Return IIf(ViewState(CurrentControlKey) = Nothing, "", ViewState(CurrentControlKey).ToString) End Get Set(ByVal value As String) ViewState(CurrentControlKey) = value End Set End Property Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load ' Controlla la versioen del Browser e caccai via se IE inferiore a 8 If Request.Browser.Browser = "IE" AndAlso IsNumeric(Request.Browser.MajorVersion) AndAlso CInt(Request.Browser.MajorVersion) < 8 Then Dim Script As String = "alert('Plane รจ supportato solo da IE8 o versioni successive, Firefox e Chrome');" Page.ClientScript.RegisterClientScriptBlock(Me.GetType, "Alert", Script, True) End If If Not IsPostBack Then CurrentControl = RadPanelBar.SelectedItem.Value End If Dim isNewControl As Boolean = Not CurrentControl.Equals(RadPanelBar.SelectedItem.Value) If isNewControl Then CurrentControl = RadPanelBar.SelectedItem.Value Else LoadUserControl(P_Body, CurrentControl, Not IsPostBack) End If End Sub Private Function LoadUserControl(ByVal parentControl As Control, ByVal newControlPath As String, Optional ByVal isFirstLoad As Boolean = False) As Control Dim control As Control = Page.LoadControl(newControlPath) control.ID = newControlPath.ToString.Replace("/", "_").Replace("~", "_").Replace(".", "_") 'AddHandler TryCast(control, IASControl).GenericEvent, AddressOf Me.HandleGenericEvent If isFirstLoad Then control.EnableViewState = False End If parentControl.Controls.Clear() parentControl.Controls.Add(control) If isFirstLoad Then control.EnableViewState = True 'TryCast(control, IASControl).FirstLoad(Nothing) End If Return control End Function Protected Sub RadPanelBar_ItemClick(ByVal sender As Object, ByVal e As Telerik.Web.UI.RadPanelBarEventArgs) Handles RadPanelBar.ItemClick If e.Item.Level = 1 Then LoadUserControl(P_Body, e.Item.Value, True) End If End SubEnd Class<%@ Control Language="VB" AutoEventWireup="false" CodeFile="CompanyList.ascx.vb" Inherits="SystemSetup_UserControls_Setup_CompanyList" %><script language="javascript" type="text/javascript"> function RowDbClick(sender, eventArgs) { var IdCompany = sender.get_masterTableView().get_dataItems()[eventArgs.get_itemIndexHierarchical()].getDataKeyValue("IdCompany"); var W = window.open('Admin/Setup/p_Company.aspx?IdCompany=' + IdCompany, '', 'width=800px,height=550px,resizable=1'); } function Rebind(eventArgs) { var AjaxManager = $find("<%= RadAjaxManager.ClientID %>"); AjaxManager.ajaxRequest('Rebind' + '|' + eventArgs); }</script><telerik:RadAjaxManager runat="server" ID="RadAjaxManager"> <AjaxSettings> <telerik:AjaxSetting AjaxControlID="RadAjaxManager"> <UpdatedControls> <telerik:AjaxUpdatedControl ControlID="RadGrid" UpdatePanelHeight="100%" /> </UpdatedControls> </telerik:AjaxSetting> </AjaxSettings></telerik:RadAjaxManager><telerik:RadSplitter runat="server" Width="100%" Height="100%" Orientation="Horizontal"> <telerik:RadPane runat="server" Height="32px"> <telerik:RadToolBar ID="RadToolBar1" runat="server" Height="26px" Width="100%"> <Items> <telerik:RadToolBarButton Text="::" Enabled="false" ></telerik:RadToolBarButton> <telerik:RadToolBarButton Text='<%$ Resources:RTB_New %>' PostBack="false" NavigateUrl="javascript:var W=window.open('UserControls/Setup/p_newCompany.aspx','','width=800px,height=550px')" ImageUrl="../../Resources/Images/ico_New_16.png"></telerik:RadToolBarButton> <telerik:RadToolBarButton Text='<%$ Resources:RTB_Delete %>' ImageUrl="../../Resources/Images/ico_Garbage_16.png"></telerik:RadToolBarButton> </Items> </telerik:RadToolBar> </telerik:RadPane> <telerik:RadPane ID="RadPane1" runat="server" Height="100%"> <telerik:radgrid runat="server" ID="RadGrid" Width="100%" Height="100%" AutoGenerateColumns="false" style="border:0;outline:none;" AllowMultiRowSelection="true"> <ClientSettings> <ClientEvents OnRowDblClick="RowDbClick" /> <Selecting AllowRowSelect="true" /> <Scrolling AllowScroll="true" SaveScrollPosition="true" ScrollHeight="100%" UseStaticHeaders="true" /> </ClientSettings> <MasterTableView style="border:0;outline:none;" DataKeyNames="IdCompany" ClientDataKeyNames="IdCompany"> <Columns> <telerik:GridTemplateColumn> <ItemTemplate> <asp:Image runat="server" ID="I_OnOff" ImageUrl='<%# IIF(Eval("Active") = true,"~/SystemSetup/Resources/Images/ico_On_16.png","~/SystemSetup/Resources/Images/ico_Off_16.png") %>' /> </ItemTemplate> <HeaderStyle Width="24px" /> <ItemStyle Width="24px" HorizontalAlign="Center" CssClass="AbsLeft" /> </telerik:GridTemplateColumn> <telerik:GridBoundColumn DataField="DescrShort" HeaderText="Company"> <HeaderStyle HorizontalAlign="Center"/> </telerik:GridBoundColumn> </Columns> </MasterTableView> </telerik:radgrid> </telerik:RadPane></telerik:RadSplitter>Protected Sub RadAjaxManager_AjaxRequest(ByVal sender As Object, ByVal e As Telerik.Web.UI.AjaxRequestEventArgs) Handles RadAjaxManager.AjaxRequest Select Case e.Argument.Split("|")(1) Case "RadGrid" RadGrid.Rebind() End Select End Sub<%@ Page Title="" Language="VB" MasterPageFile="~/App_Master/SystemSetup/PopUp_1.master" AutoEventWireup="false" CodeFile="p_Company.aspx.vb" Inherits="SystemSetup_UserControls_Setup_p_Company" %><asp:Content ID="Content2" ContentPlaceHolderID="ContentPlaceHolder_Top" Runat="Server"> <telerik:RadToolBar ID="RadToolBar" runat="server" Width="100%" Height="26px"> <Items> <telerik:RadToolBarButton Value="Save" ImageUrl="../../Resources/Images/ico_Save_16.png" Text='<%$ Resources:WebResources, Save_Text %>'></telerik:RadToolBarButton> </Items> </telerik:RadToolBar></asp:Content><asp:Content ID="Content3" ContentPlaceHolderID="ContentPlaceHolder_Left" Runat="Server"> <telerik:RadPanelBar ID="RadPanelBar" Runat="server" Width="100%" AllowCollapseAllItems="True" PersistStateInCookie="True"> <Items> <telerik:RadPanelItem runat="server" Text='<%$ Resources:Menu_Item_1 %>' PostBack="false" Expanded="true"> <Items> <telerik:RadPanelItem runat="server" Value="~/SystemSetup/UserControls/Setup/CompanyList.ascx" Text='<%$ Resources:Menu_Item_1_1 %>' ImageUrl="~/SystemSetup/Resources/Images/ico_Company_16.png" Selected="true"></telerik:RadPanelItem> </Items> </telerik:RadPanelItem> </Items> </telerik:RadPanelBar></asp:Content><asp:Content ID="Content4" ContentPlaceHolderID="ContentPlaceHolder_Right" Runat="Server"><div style="position:absolute;top:0px;left:0px;right:0px;height:26px"> <telerik:RadTabStrip ID="RadTabStrip1" runat="server" MultiPageID="RadMultiPage" Width="100%" Height="26px" SelectedIndex="0"> <Tabs> <telerik:RadTab Text="Generale" PageViewID="PV_General"></telerik:RadTab> </Tabs> </telerik:RadTabStrip></div><div style="position:absolute;top:26px;left:0px;right:0px;bottom:0px;"> <telerik:RadMultiPage runat="server" ID="RadMultiPage" Width="100%" Height="100%" SelectedIndex="0" BackColor="White"> <telerik:RadPageView runat="server" ID="PV_General" Width="100%"> <div class="RadPageView_Form"> <div style="width:100%"> <table cellpadding="0px" cellspacing="0px" border="0px" style="width:100%;"> <tr> <td class="Label">Attiva:</td> <td class="Data"><asp:CheckBox runat="server" ID="CK_Active" /></td> <td class="Label"></td> <td class="Data"><telerik:RadTextBox runat="server" ID="RadTextBox2" Width="96%" DisabledStyle-BorderStyle="None" Enabled="false"></telerik:RadTextBox></td> </tr> <tr> <td class="Label">Nome:</td> <td class="Data"><telerik:RadTextBox runat="server" ID="T_1" Width="96%"></telerik:RadTextBox></td> <td class="Label"></td> <td class="Data"><telerik:RadTextBox runat="server" ID="T_2" Width="96%" DisabledStyle-BorderStyle="None" Enabled="false"></telerik:RadTextBox></td> </tr> </table> </div> </div> </telerik:RadPageView> </telerik:RadMultiPage></div></asp:Content>Imports System.DataPartial Class SystemSetup_UserControls_Setup_p_Company Inherits System.Web.UI.Page Private IdCompany As Guid = Guid.Empty Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not Request.QueryString("IdCompany") Is Nothing AndAlso Request.QueryString("IdCompany") <> "" Then IdCompany = New Guid(Request.QueryString("IdCompany")) End If If Not IsPostBack Then LoadItem() End If End Sub Private Sub LoadItem() Dim oDaOb As New RC.Protection.Company oDaOb.PK.Add("IdCompany", IdCompany) Dim oCo As DataRow = oDaOb.Get CK_Active.Checked = oCo("Active") T_1.Text = oCo("DescrShort") End Sub Protected Sub RadToolBar_ButtonClick(ByVal sender As Object, ByVal e As Telerik.Web.UI.RadToolBarEventArgs) Handles RadToolBar.ButtonClick Select Case e.Item.Value Case "Save" If IdCompany <> Guid.Empty Then Dim oDaOb As New RC.Protection.Company Dim oCo As DataRow = oDaOb.newDaObItem oCo("IdCompany") = IdCompany oCo("DescrShort") = T_1.Text oCo("Active") = CK_Active.Checked oDaOb.Upd(oCo) Rebind() End If End Select End Sub Private Sub Rebind() Dim Script As String = "window.opener.Rebind('RadGrid');" Page.ClientScript.RegisterClientScriptBlock(Me.GetType, "Rebind", Script, True) End Sub End Class
<telerik:RadGrid ID="gvListing" runat="server" Skin="C21Skin" EnableEmbeddedSkins="False" AllowSorting="True" SortingSettings-SortedBackColor="#303030" EnableViewState="true"
AllowPaging="True" GridLines="None" AutoGenerateColumns="False" AllowFilteringByColumn="true" OnInit="gvListing_Init" OnNeedDataSource="gvListing_NeedDataSource"
Width="450px" Height="765px" PageSize="10" ShowStatusBar="True" FilterItemStyle-HorizontalAlign="Left" OnItemDataBound="gvListing_ItemDataBound" >
<PagerStyle Mode="NextPrevAndNumeric" Wrap="False" AlwaysVisible="true" Position="TopAndBottom"></PagerStyle>
<MasterTableView TableLayout="Fixed">
<Columns>
<telerik:GridTemplateColumn UniqueName="Select" Display="true" HeaderText="" ItemStyle-Width="8px"
ItemStyle-HorizontalAlign="Center" HeaderStyle-Width="8px" HeaderStyle-HorizontalAlign="Center" ItemStyle-Wrap="true"
AllowFiltering="FALSE">
<ItemTemplate>
<asp:CheckBox runat="server" ID="chkSelectListing" OnCheckedChanged="chkSelectListing_OnCheckedChanged" AutoPostBack="true" />
<asp:Label ID="lblTrKey" Visible="false" runat="server" Text='<%# DataBinder.Eval(Container.DataItem,"Tr_key") %>'></asp:Label>
</ItemTemplate>
</telerik:GridTemplateColumn>
<telerik:GridTemplateColumn HeaderText="Image" UniqueName="Image" AllowFiltering="false" ItemStyle-Width="60px" ItemStyle-HorizontalAlign="Center" HeaderStyle-Width="60px" HeaderStyle-HorizontalAlign="Center" ItemStyle-Wrap="true">
<ItemTemplate>
<div style="float:left;background-image:url('http://webservices.21online.com/public/imageresize.aspx?w=60&h=45&url=<%# DataBinder.Eval(Container.DataItem,"jpg_url") %>');background-repeat:no-repeat;width:60px;height:45px;z-index:1;vertical-align:bottom;text-align:right;">
<br/>
<div style="background-image:url('<%#Convert.ToInt32(DataBinder.Eval(Container.DataItem, "TotalPhotos").ToString()) > 5 ? "/21online/images/icons/yellow.gif" : "/21online/images/icons/red.gif"%>');background-repeat:no-repeat;z-index:2;width:26px;height:29px;vertical-align:middle;text-align:center;">
<span style="font-size:10pt;font-weight:bold;color:white;line-height:25px;vertical-align:baseline;"><%# DataBinder.Eval(Container.DataItem,"TotalPhotos") %></span>
</div>
</div>
</ItemTemplate>
</telerik:GridTemplateColumn>
<telerik:GridBoundColumn DataField="MLS_ID" Display="true" ItemStyle-ForeColor="white"
CurrentFilterFunction="StartsWith" AutoPostBackOnFilter="true" SortExpression="MLS_ID"
UniqueName="MLS_ID" HeaderText="MLS_ID" FilterControlWidth="40px" ItemStyle-Width="70px"
ItemStyle-HorizontalAlign="Left" HeaderStyle-Width="70px" HeaderStyle-HorizontalAlign="Left" ItemStyle-Wrap="true">
</telerik:GridBoundColumn>
<telerik:GridTemplateColumn Display="true" ItemStyle-ForeColor="white"
SortExpression="Address" UniqueName="Address" HeaderText="Address" ItemStyle-Width="113px" AllowFiltering="FALSE"
ItemStyle-HorizontalAlign="Left" HeaderStyle-Width="113px" HeaderStyle-HorizontalAlign="Left" ItemStyle-Wrap="true">
<ItemTemplate>
<asp:Label ID="lblAddress" CssClass="white11" Visible="true" runat="server" Text='<%# DataBinder.Eval(Container.DataItem,"Address") %>'></asp:Label>,
<asp:Label ID="lblCity" CssClass="white11" Visible="true" runat="server" Text='<%# DataBinder.Eval(Container.DataItem,"city") %>'></asp:Label>,
<asp:Label ID="lblState" CssClass="white11" Visible="true" runat="server" Text='<%# DataBinder.Eval(Container.DataItem,"state") %>'></asp:Label>,
<asp:Label ID="lblZip" CssClass="white11" Visible="true" runat="server" Text='<%# DataBinder.Eval(Container.DataItem,"zip") %>'></asp:Label>
<asp:Label ID="lblImageURL" CssClass="white11" Visible="false" runat="server" Text='<%# DataBinder.Eval(Container.DataItem,"jpg_url") %>'></asp:Label>
</ItemTemplate>
</telerik:GridTemplateColumn>
<telerik:GridBoundColumn DataField="ListingType" Display="true" ItemStyle-ForeColor="white"
CurrentFilterFunction="StartsWith" AutoPostBackOnFilter="true" SortExpression="ListingType"
UniqueName="ListingType" HeaderText="Type" FilterControlWidth="10px" ItemStyle-Width="40px"
ItemStyle-HorizontalAlign="Left" HeaderStyle-Width="40px" HeaderStyle-HorizontalAlign="Left" ItemStyle-Wrap="false">
</telerik:GridBoundColumn>
<telerik:GridBoundColumn DataField="Price" Display="true" ItemStyle-ForeColor="white"
CurrentFilterFunction="GreaterThan" AutoPostBackOnFilter="true" SortExpression="Price"
UniqueName="Price" HeaderText="Price" FilterControlWidth="45px" ItemStyle-Width="75px" DataFormatString="{0:c0}"
ItemStyle-HorizontalAlign="Left" HeaderStyle-Width="75px" HeaderStyle-HorizontalAlign="Left" ItemStyle-Wrap="true">
</telerik:GridBoundColumn>
</Columns>
</MasterTableView>
<ClientSettings EnableRowHoverStyle="true">
<Scrolling SaveScrollPosition="true" UseStaticHeaders="true" AllowScroll="true" />
</ClientSettings>
</telerik:RadGrid>
and here is the code behind
protected void gvListing_Init(object sender, System.EventArgs e)
{
GridFilterMenu menu = gvListing.FilterMenu;
int i = 0;
while (i < menu.Items.Count)
{
if (menu.Items[i].Text == "NoFilter" ||
menu.Items[i].Text ==
"Contains" ||
menu.Items[i].Text ==
"DoesNotContain" ||
menu.Items[i].Text ==
"StartsWith" ||
menu.Items[i].Text ==
"EndsWith" ||
menu.Items[i].Text ==
"EqualTo" ||
menu.Items[i].Text ==
"NotEqualTo" ||
menu.Items[i].Text ==
"GreaterThan" ||
menu.Items[i].Text ==
"LessThan"
)
{
switch (menu.Items[i].Text)
{
case "NoFilter":
{
menu.Items[i].Text =
"No Filter";
break;
}
case "Contains":
{
menu.Items[i].Text =
"Contains";
break;
}
case "DoesNotContain":
{
menu.Items[i].Text =
"Does Not Contain";
break;
}
case "StartsWith":
{
menu.Items[i].Text =
"Starts With";
break;
}
case "EndsWith":
{
menu.Items[i].Text =
"Ends With";
break;
}
case "EqualTo":
{
menu.Items[i].Text =
"Equal To";
break;
}
case "NotEqualTo":
{
menu.Items[i].Text =
"Not Equal To";
break;
}
case "GreaterThan":
{
menu.Items[i].Text =
"Greater Than";
break;
}
case "LessThan":
{
menu.Items[i].Text =
"Less Than";
break;
}
}
i++;
}
else
{
menu.Items.RemoveAt(i);
}
}
}
protected void gvListing_NeedDataSource(object source, Telerik.Web.UI.GridNeedDataSourceEventArgs e)
{
if (ListingsDS.Tables[0].Rows.Count > 0)
{
gvListing.DataSource = ListingsDS.Tables[0];
if (CrestNote.Visible == false)
{
gvListing.MasterTableView.Columns[4].HeaderText =
"";
}
}
else
{
lblNoOfListings.Text =
"The category you have selected does not require listings.";
}
}
private void ShowListings()
{
if (ListingsDS.Tables[0].Rows.Count > 0)
{
gvListing.DataSource = ListingsDS.Tables[0];
gvListing.DataBind();
if (CrestNote.Visible == false)
{
//gvListing.Columns[4].Display = false;
gvListing.MasterTableView.Columns[4].HeaderText =
"";
}
}
else
{
lblNoOfListings.Text =
"The category you have selected does not require listings.";
}
}
public void chkSelectListing_OnCheckedChanged(object sender, EventArgs e)
{
CheckBox cb = (CheckBox)sender;
GridDataItem item = (GridDataItem)cb.NamingContainer;
Label lblTKey = (Label)item["Select"].FindControl("lblTrKey");
Label lblAddress = (Label)item["Address"].FindControl("lblAddress");
Label lblCity = (Label)item["Address"].FindControl("lblCity");
Label lblState = (Label)item["Address"].FindControl("lblState");
Label lblZip = (Label)item["Address"].FindControl("lblZip");
Label lblImageURL = (Label)item["Address"].FindControl("lblImageURL");
string strTrKey = lblTKey.Text;
string strTrKeyAddress = lblAddress.Text + ", " + lblCity.Text + ", " + lblState.Text + " " + lblZip.Text;
string strTrKeyImg = lblImageURL.Text;
eCampaign_Cart nlList_cart;
nlList_cart = CartSession;
if (cb.Checked == true)
{
nlList_cart.AddOrModifyMember(
new eCampaign_CartItem(strTrKey, strTrKeyAddress, strTrKeyImg));
}
else
{
nlList_cart.DeleteMember(strTrKey);
}
CartSession = nlList_cart;
divCartItemCount.InnerHtml = nlList_cart.getPrintNumberOfItems();
}
protected void gvListing_ItemDataBound(object sender, Telerik.Web.UI.GridItemEventArgs e)
{
if (e.Item is GridDataItem)
{
GridDataItem item = e.Item as GridDataItem;
string strTrKey = ((Label)item["Select"].FindControl("lblTrKey")).Text;
bool bSelected = false;
if (CartSession != null)
{
bSelected = CartSession.FindTrKeySelected(strTrKey);
if (bSelected)
{
CheckBox cb = (CheckBox)item["Select"].FindControl("chkSelectListing");
cb.Checked =
true;
}
}
}
}
| function pageLoad(sender, args) { |
| if (args._isPartialLoad == false) { |
| $find("RadAjaxPanel1").ajaxRequest(); |
| $find("RadAjaxPanel2").ajaxRequest(); |
| } |
| } |
function GetRadWindow() { var oWindow = null; if (window.radWindow) oWindow = window.radWindow; else if (window.frameElement.radWindow) oWindow = window.frameElement.radWindow; return oWindow; } function CloseModal() { // GetRadWindow().close(); setTimeout(function () { GetRadWindow().BrowserWindow.refreshGrid() GetRadWindow().close(); }, 0); }