如何在asp+ 中使用自定义的pagelet

/*
豆腐制作都是精品
http://www.asp888.net 豆腐技术站
如转载请注明版权信息
*/

asp+ 中提供了一种类似xml 的代码描写方法，例如

 1<asp:label id="test" runat="server">   
 2在本篇文章里 我会给大家描述一下 如何 编写自己的pagelet 例如:<asp888:mytestmenu <script="" @="" ```="" import="" language="vb" namespace="System.Drawing" page="" runat="server" 文件中进行引用="" 文件，这个文件必须在aspx="" 首先我们写一个aspc=""&gt;   
 3'创建公共变量   
 4Public ForeColor As Color   
 5Public BackColor As Color   
 6Public Width As Unit   
 7' 创建调用的函数和过程   
 8Public Sub AddMenuItem(ByVal IN_Text As String, ByVal IN_URL As String)   
 9Dim NewMenuItem As New TableCell   
10NewMenuItem.Text = "&lt;a href='" &amp;amp; IN_URL &amp;amp; "'&gt;" &amp;amp; IN_Text &amp;amp; "&lt;/a&gt;"   
11mySubRow.Cells.Add(NewMenuItem) 'myMenu.Rows(0).Cells.Add(NewMenuItem)   
12End Sub   
13Sub Page_Load(ByVal Source As Object, ByVal E As EventArgs)   
14myASPTable.BackColor = BackColor   
15myASPTable.Width = Width   
16myMenu.ForeColor = ForeColor   
17End Sub   
18
19&lt;asp:table border="1" id="myASPTable" runat="server"&gt;
20&lt;asp:tablerow id="myRow1" runat="server"&gt;
21&lt;asp:tablecell id="myMainCell" runat="server"&gt;
22&lt;!-- Begin nested menu table --&gt;
23&lt;asp:table border="1" cellpadding="6" cellspacing="0" id="myMenu" runat="server"&gt;
24&lt;asp:tablerow id="mySubRow"&gt;
25&lt;/asp:tablerow&gt;
26&lt;/asp:table&gt;
27&lt;!-- End nested menu table --&gt;
28&lt;/asp:tablecell&gt;
29&lt;/asp:tablerow&gt;
30&lt;/asp:table&gt;   
31好了，下面我们看看aspx 文件

@ Page Language="vb"

@ Register TagPrefix="asp888" TagName="myTestControl" src="menu_control.aspc"

 1&lt;html&gt;
 2&lt;head&gt;
 3&lt;script runat="server"&gt;   
 4Sub Page_Load(ByVal Sender As Object, ByVal e As EventArgs)   
 5menuControl1.AddMenuItem("豆腐技术站", "http://www.asp888.net")   
 6If Page.IsPostBack   
 7menuControl1.AddMenuItem(txtNewMenuText.Text, txtNewMenuLink.Text)   
 8End If   
 9End Sub   
10&lt;/script&gt;
11&lt;/head&gt;
12&lt;body&gt;
13&lt;asp888:mytestcontrol backcolor="gray" forecolor="Silver" id="menuControl1" runat="server" width="100%"&gt;&lt;/asp888:mytestcontrol&gt;
14&lt;form action="myMenuControl.aspx" method="POST" runat="server"&gt;
15&lt;p&gt;   
16新的联结显示:   
17&lt;asp:textbox id="txtNewMenuText" runat="server"&gt;&lt;/asp:textbox&gt;
18&lt;/p&gt;
19&lt;p&gt;   
20新的联结地址:   
21&lt;asp:textbox id="txtNewMenuLink" runat="server"&gt;&lt;/asp:textbox&gt;
22&lt;/p&gt;
23&lt;p&gt;
24&lt;input runat="server" type="submit" value="Submit"/&gt;
25&lt;/p&gt;&lt;/form&gt;
26
27&lt;/body&gt;
28&lt;/html&gt;   
29大家运行后，就可以看到这个的直接效果了 
30
31  
32作者:豆腐&lt;/asp888:mytestmenu&gt;&lt;/asp:label&gt;