62,242
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
lihonggen0 2004-07-11
- 打赏
- 举报
http://www.123aspx.com/ReadReviews.aspx?res=13844
lihonggen0 2004-07-11
- 打赏
- 举报
C#的；
http://aspalliance.com/399
http://aspalliance.com/399
draclosta 2004-07-11
- 打赏
- 举报
<%@ Register TagPrefix="Acme" TagName="BookList" Src="pagelet7.ascx" %>
<html>
<script language="C#" runat="server">
void Page_Load(Object sender, EventArgs E) {
Page.Controls.Add(new HtmlGenericControl("hr"));
Control c1 = LoadControl("pagelet7.ascx");
((Pagelet7CS)c1).Category = "business";
Page.Controls.Add(c1);
Page.Controls.Add(new HtmlGenericControl("hr"));
Control c2 = LoadControl("pagelet7.ascx");
((Pagelet7CS)c2).Category = "trad_cook";
Page.Controls.Add(c2);
Page.Controls.Add(new HtmlGenericControl("hr"));
Control c3 = LoadControl("pagelet7.ascx");
((Pagelet7CS)c3).Category = "mod_cook";
Page.Controls.Add(c3);
}
</script>
<body style="font: 10.5pt 宋体">
<h3>以编程方式创建用户控件</h3>
</body>
</html>
<html>
<script language="C#" runat="server">
void Page_Load(Object sender, EventArgs E) {
Page.Controls.Add(new HtmlGenericControl("hr"));
Control c1 = LoadControl("pagelet7.ascx");
((Pagelet7CS)c1).Category = "business";
Page.Controls.Add(c1);
Page.Controls.Add(new HtmlGenericControl("hr"));
Control c2 = LoadControl("pagelet7.ascx");
((Pagelet7CS)c2).Category = "trad_cook";
Page.Controls.Add(c2);
Page.Controls.Add(new HtmlGenericControl("hr"));
Control c3 = LoadControl("pagelet7.ascx");
((Pagelet7CS)c3).Category = "mod_cook";
Page.Controls.Add(c3);
}
</script>
<body style="font: 10.5pt 宋体">
<h3>以编程方式创建用户控件</h3>
</body>
</html>
lihonggen0 2004-07-11
- 打赏
- 举报
象这样:
Private Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
Dim HeaderControl As Control = Page.LoadControl("/Controls/Header.ascx")
Page.Controls.Add(HeaderControl)
Dim ContentControl As Control = Page.LoadControl("/Controls/Content.ascx")
Page.Controls.Add(ContentControl)
Dim FooterControl As Control = Page.LoadControl("/Controls/Footer.ascx")
Page.Controls.Add(FooterControl)
End Sub
Private Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
Dim HeaderControl As Control = Page.LoadControl("/Controls/Header.ascx")
Page.Controls.Add(HeaderControl)
Dim ContentControl As Control = Page.LoadControl("/Controls/Content.ascx")
Page.Controls.Add(ContentControl)
Dim FooterControl As Control = Page.LoadControl("/Controls/Footer.ascx")
Page.Controls.Add(FooterControl)
End Sub
