动态加载用户控件至DataList并为用户控件赋值实例演示

为了实现这个演示,Insus.NET使用通用的新闻例子,它类别(目录)以及文章。在一个页面,显示所有类别,每个目录下显示最新几条新闻。

效果如下:
目录是用DataList控件显示,而文章标题列表是一个用户控件显示,这个用户控件将动态被加入至DataList。


代码如下:

View Code
<asp:Repeater ID="Repeater1" runat="server" OnItemDataBound="Repeater1_ItemDataBound">
<HeaderTemplate>
<table cellpadding="5" cellspacing="0" width="100%">
</HeaderTemplate>
<ItemTemplate>
<tr style="height: 30px; line-height: 10px;">
<td>
$
</td>
<td>
<asp:HyperLink ID="HyperLink1" runat="server" NavigateUrl='<%# "~/ArticleView.aspx?ID=" & Eval("Article_nbr")%>' ToolTip='<%# Eval("Subject")%>' Target="_blank"></asp:HyperLink>
</td>
<td>
<%# objInsusDateTimeUtility.GetDateTime(Eval("PublicDate"), "yyyy-MM-dd")%>
</td>
</tr>
</ItemTemplate>
<FooterTemplate>
</table>
</FooterTemplate>
</asp:Repeater>

代码如下:

View Code
View Code
Imports System.Data
Imports Insus.NET
Partial Class AscxControls_ArticleList
Inherits System.Web.UI.UserControl
Implements ISetValue '继承接口
Dim objArticle As New Article()
Protected objInsusDateTimeUtility As New InsusDateTimeUtility()
Private _DataSource As Object
Private _SubjectLength As Integer = 20
Public WriteOnly Property SubjectLength() As Integer
Set(ByVal value As Integer)
_SubjectLength = value
End Set
End Property
Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
Data_Binding()
End Sub
'绑定数据至Repeater控件
Private Sub Data_Binding()
Me.Repeater1.DataSource = _DataSource
Me.Repeater1.DataBind()
End Sub
Protected Sub Repeater1_ItemDataBound(ByVal sender As Object, ByVal e As RepeaterItemEventArgs)
Dim objDrv As DataRowView = DirectCast(e.Item.DataItem, DataRowView)
If e.Item.ItemType = ListItemType.AlternatingItem OrElse e.Item.ItemType = ListItemType.Item Then
If e.Item.FindControl("HyperLink1") IsNot Nothing Then
Dim LinkSubject As HyperLink = DirectCast(e.Item.FindControl("HyperLink1"), HyperLink)
If objDrv("Subject").Length > _SubjectLength Then
LinkSubject.Text = objDrv("Subject").Substring(0, _SubjectLength) & "..."
Else
LinkSubject.Text = objDrv("Subject").ToString()
End If
End If
End If
End Sub
'实现接口
Public Sub SetValue(str As Object) Implements ISetValue.SetValue
Me._DataSource = str
End Sub
End Class

上面用户控件中,有一个接口:


代码如下:

ISetValue
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace Insus.NET
{
public interface ISetValue
{
void SetValue(object obj);
}
}

显示目录:


代码如下:

View Code
<asp:DataList ID="DataListCatalog" runat="server" RepeatColumns="2" RepeatDirection="Horizontal" DataKeyField="Catalog_nbr" OnItemDataBound="DataListCatalog_ItemDataBound">
<ItemTemplate>
<div style="padding:2PX; height:25px; background-color:#cbfb25; font-weight:bold; line-height:25PX;">
<%# Eval("CatalogName")%>
</div>
<asp:PlaceHolder ID="PlaceHolderArticleList" runat="server"></asp:PlaceHolder>
</ItemTemplate>
</asp:DataList>

从数据库获取数据并绑定至目录的DataList控件。


代码如下:

View Code
Imports Insus.NET
Partial Class Index
Inherits System.Web.UI.Page
Dim objCatalog As New Catalog()
Dim objArticle As New Article()
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
Data_Binding()
End If
End Sub
Private Sub Data_Binding()
objCatalog.IsActive = True
Me.DataListCatalog.DataSource = objCatalog.GetByIsActive()
Me.DataListCatalog.DataBind()
End Sub
End Class

下面是重点,就是OnItemDataBound事件,在这个事件中,需要找到asp:PlaceHolder控件,这个容器将用来加载用户控件。


代码如下:

Protected Sub DataListCatalog_ItemDataBound(sender As Object, e As DataListItemEventArgs)
If e.Item.ItemType = ListItemType.Item OrElse e.Item.ItemType = ListItemType.AlternatingItem Then
'判断asp:PlaceHolder是否存在
If e.Item.FindControl("PlaceHolderArticleList") IsNot Nothing Then
Dim ctllaceHolder As PlaceHolder = DirectCast(e.Item.FindControl("PlaceHolderArticleList"), PlaceHolder)
'动态加载用户控件,并转换为接口。
Dim objuc As ISetValue = DirectCast(LoadControl("~/AscxControls/ArticleList.ascx"), ISetValue)
'找到DataList控件的目录主键
objArticle.Catalog_nbr = Me.DataListCatalog.DataKeys(e.Item.ItemIndex)
objArticle.Top = 2
'为用户控件赋值。
objuc.SetValue(objArticle.GetArticalTopByCatalog())
'加载用户控件。
ctllaceHolder.Controls.Add(objuc)
End If
End If
End Sub

(0)

相关推荐

  • DataList中TextBox onfocus调用后台void静态方法及获取相应行数

    昨天在某一论坛上看到的.Insus.NET尝试做了一下,算是练习了. Insus.NET的测试演示: xxx.aspx:  复制代码 代码如下: <asp:DataList ID="dlItemGeneral" runat="server" CellPadding="0" CellSpacing="0" Width="100%" OnItemDataBound="dlItemGeneral_

  • Datalist控件使用存储过程来分页实现代码

    --------------前台:------------------- 复制代码 代码如下: <body> <form id="form1" runat="server"> <div> <asp:DataList ID="DataList1" runat="server" onitemcommand="DataList1_ItemCommand" oncancel

  • 获取DataList控件的主键和索引实用图解

    "哈哈,看了这篇http://www.jb51.net/article/33388.htm,只有效果,但没有结果,我怎样获取选择行的相关记录?" Insus.NET首先多谢网友对上面那篇博文的关注.解决你的问题,可以尝试获取选择行的索引或是主键即可,能获取到主键,其它字段的值,也可以获取到了. 下图中,高亮选择区,即是针对问题解决而在原在代码添加的部分.一是在DataList控件添加一个DataKeyField,以便获取到它的主键值,另外还添加了两个铵钮及一个Label标答,用来显示选

  • asp.net datalist 用法

    设计模版: 页眉 <HeaderTemplate> </HeaderTemplate> 页脚 <FooterTemplate> </FooterTemplate> 数据记录 <ItemTemplate> </ItemTemplate> <AlternatingItemTemplate> 交替显示项 </AlternatingItemTemplate> <SelectedItemTemplate>选中

  • 通过RadioButton对DataList控件进行单选实例说明

    本例实现通过RadioButton对DataList控件进行单选.你可以参考下面演示.  准备好一个星座对象,并定义好一个泛型List来存储每一个星座名称. 复制代码 代码如下: Constelltion.cs using System; using System.Collections.Generic; using System.Linq; using System.Web; /// <summary> /// Summary description for Constellation //

  • 基于vue 动态加载图片src的解决方法

    好久没更博了,最近也不知道在忙啥,反正就是感觉挺忙的,在群里看到陆陆续续有刚入vue小伙伴问vue动态加载图片总是404的状况,这篇就简单的说明为什么会出现以及解决办法有哪些. 首先先说明下vue-cli的assets和static的两个文件的区别,因为这对你理解后面的解决办法会有所帮助 assets:在项目编译的过程中会被webpack处理解析为模块依赖,只支持相对路径的形式,如< img src="./logo.png">和background:url(./logo.p

  • 动态加载用户控件至DataList并为用户控件赋值实例演示

    为了实现这个演示,Insus.NET使用通用的新闻例子,它类别(目录)以及文章.在一个页面,显示所有类别,每个目录下显示最新几条新闻. 效果如下: 目录是用DataList控件显示,而文章标题列表是一个用户控件显示,这个用户控件将动态被加入至DataList. 复制代码 代码如下: View Code <asp:Repeater ID="Repeater1" runat="server" OnItemDataBound="Repeater1_Item

  • asp.net动态加载用户控件,关于后台添加、修改的思考

    看下下面这个典型的后台(比较粗糙):说实在,我很厌倦全部用.aspx文件去做,比如"友情连接"这个模块,就有"添加友情连接""修改友情连接""友情连接列表",简单的话,可以把"添加""修改"合成一个文件.每次都去建立一个.aspx文件.我现在的想法是用"用户控件+配置文件"去实现,虽然文件数目可能不会少很多.但在编程到一定地步,我想大家会有跟我一样的想法. 首先需要涉

  • ASP.NET动态加载用户控件的实现方法

    第一步:例如用户控件放在MyList.Ascx,然后其Control指令是: 复制代码 代码如下: <%@ Control Language="C#" AutoEventWireup="true" CodeFile="ViewComment.ascx.cs" Inherits="Control_ViewComment"%> 这时候已经有了Inherits,自带了ClassName就是其名称,如果没有,则必须创建Cl

  • ASP.net 动态加载控件时一些问题的总结

    1 .在使用LoadControl加载控件后,用户控件中的某些控件不再响应事件. 这个问题主要是由于将控件加载放在if (!Page.IsPostBack)之内引起的,放在外面即可.在思归的blog上对此问题进行了详细的说明. 2.用户控件中某些控件的响应出现问题,如某个按钮第一次选择时不触发CLICK事件,第二次可以了. 这是由于没有给控件设置ID引起的,控件ID的作用在下面详细讲述. 如 复制代码 代码如下: Control userControl=(Control)Page.LoadCon

  • 动态加载图片路径 保持JavaScript控件的相对独立性

    当时考虑有三种方法: 1.直接把路径写在js文件里,但如果引用页面路径层级改变就没辙了. 2.写个class,放在主题包里的css文件或者单独创建一个css文件给日期控件专用.但是控件中的其他元素并没有使用class的需要,单独建立相应css文档似乎小题大做. 3.把以上两个方法排除后,自然要采用动态加载图片路径的方法咯. 关键代码如下: 复制代码 代码如下: //创建一个全局变量保存路径 var imgRootUrl = ""; //获取图片路径所在目录 var strPath=wi

  • 在WPF中动态加载XAML中的控件实例代码

    本文实例讲述了在WPF中动态加载XAML中的控件的方法.分享给大家供大家参考,具体如下: using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.Windows; using System.Windows.Controls; using System.Windows.Data; using System.Windows.Documents; using S

  • SpringSecurity动态加载用户角色权限实现登录及鉴权功能

    很多人觉得Spring Security实现登录验证很难,我最开始学习的时候也这样觉得.因为我好久都没看懂我该怎么样将自己写的用于接收用户名密码的Controller与Spring Security结合使用,这是一个先入为主的误区.后来我搞懂了:根本不用你自己去写Controller. 你只需要告诉Spring Security用户信息.角色信息.权限信息.登录页是什么?登陆成功页是什么?或者其他有关登录的一切信息.具体的登录验证逻辑它来帮你实现. 一.动态数据登录验证的基础知识 在本号之前的文

  • Java窗体动态加载磁盘文件的实现方法

    在使用图形界面操作系统时,当打开一个文件夹系统会自动列出该文件夹下的所有文件及子文件夹.本实例实现了类似的功能:首先让用户选择一个文件夹,程序会动态列出该文件夹下的所有文件:如果该文件是隐藏文件,就在属性栏中显示"隐藏文件".要用到进度条来表示是否完成. 思路如下: 首先是视图层.JTextField.JButton.JScrollPane.JTable神马的就不用再提了,都是老盆友了,在这里因为要用到进度条,所以会有一个新盆友:JProgressBar控件.控件们自然是要作为成员变量

  • Android开发中Listview动态加载数据的方法示例

    本文实例讲述了Android开发中Listview动态加载数据的方法.分享给大家供大家参考,具体如下: 最近在研究网络数据加载的问题,比如我有几百,甚至上千条数据,这些数据如果一次性全部加载到arraylist,然后再加载到Listview中.我们必然会去单独开线程来做,这样造成的结果就是会出现等待时间很长,用户体验非常不好.我的想法是动态加载数据,第一次加载十条,然后往下面滑动的时候再追加十条,再往下面滑动的时候再去追加,这样大大减少了用户等待的时间,同时给处理数据留下了时间.网上看到了这样一

随机推荐

其他