ASP.NET中不定级动态菜单的实现- ASP.NET

当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > ASP.NET中不定级动态菜单的实现

ASP.NET: Asp.net利用JQuery弹出层加载数据代码; asp.net dataview做无限极分类的又一用法; asp.net ckeditor编辑器的使用方法; 告别ADO.NET实现应用系统无缝切换的烦恼(总结篇); asp.net 实现动态显示当前时间(不用javascript不考虑开销); .net动态显示当前时间(客户端javascript); asp.net 结合YUI 3.0小示例; asp.net 取消缓存相关问题说明; asp.net 计划任务管理程序实现，多线程任务加载; ASP.NET 跨页面传值方法; asp.net中url地址传送中文参数时的两种解决方案; Asp.net 菜单控件简洁版; asp.net jQuery Ajax用户登录功能的实现; asp.net SharpZipLib的压缩与解压问题; asp.net url重写后页面回传问题; asp.net与Discuz!NT整合集成实例教程; Discuz!NT 3与asp.net 整合的实例教程; 测试控制台使用方法; .net 动态标题实现方法; asp.net *.ashx类型的文件使用说明

No. « ‹ 162 163 164 165 › »

技术文章搜索

关键字

ASP.NET中不定级动态菜单的实现

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-08-14 浏览: 76 ::

收藏到网摘: n/a

ASP.NET+XML Web服务客户端创建Web服务安装IE补丁后ASP.NET将无法运行

作者：xiangwa出处：CSDN

　前日，根据客户需要，要根据如下的表动态生成如下的菜单：表中的数据是动态更新的。

我们平时IEWebContr来做菜单时都是在html中直接输入，也就是说是静态的，现在要做成动态的，而且菜单级数不定，怎么来实现呢？笔者通过研究发现，用IEWebContr来做菜单时，菜单项可以直接输入，也可以用如下的方法指定从某一个文件中读取菜单项：

　<iewc:TreeViewrunat="server"ID="Treeview1"NAME="Treeview1">
<iewc:TreeNodeid="Treenode1"runat="server"TreeNodeSrc="menuone.txt"Expanded="True"Text="信息类别列表"></iewc:TreeNode>
</iewc:TreeView>

其中menuone.txt的内容如下：

　</treenode>
<treenodetext='桃子'NavigateUrl='xxcb_add.aspx?classname=桃子&classid=0202'??Target='main1'/>
<treenodetext='荔枝'NavigateUrl='xxcb_add.aspx?classname=荔枝&classid=0203'??Target='main1'/>
</treenode>
<treenodetext='粮食'NavigateUrl='xxcb_add.aspx?classname=粮食&classid=03'?Target='main1'>
<treenodetext='大米'NavigateUrl='xxcb_add.aspx?classname=大米&classid=0301'??Target='main1'/>
<treenodetext='玉米'NavigateUrl='xxcb_add.aspx?classname=玉米&classid=0302'??Target='main1'/>
</treenode>
</TREENODES>

现在的问题变成了如何将数据表根据“类别号”修改menuone.txt文件。将该过程放在对数据表修改后进行。下面是根据表的内容生成menuone.txt的源代码：

　ImportsSystem.IO
DimtxtwriterAsStreamWriter
txtwriter=File.CreateText(Server.MapPathstrpath("\menuone.txt"))
txtwriter.WriteLine("<TREENODES>")

DimobjConnAsOleDbConnection
DimobjCmdAsOleDbCommand
DimobjReadAsOleDbDataReader
DimstrSQL,strDSNAsString
Dimstrid,strname,strid1,strname1AsString
DimstrandAsString
strand="&"

Dimi,j,k,mAsInteger
i=0
j=0
k=0
m=0

strSQL="select*fromclassorderbyclassid"

objConn=NewOleDbConnection(ConfigurationSettings.AppSettings("connString"))
objCmd=NewOleDbCommand(strSQL,objConn)
objCmd.Connection.Open()
objRead=objCmd.ExecuteReader()

WhileobjRead.Read()

Ifj=0Then
j=Len(Trim(objRead.Item("classid")))
Else
strid=strid1
strname=strname1
i=Len(Trim(objRead.Item("classid")))

k=i-j

SelectCasek
CaseIs>0
txtwriter.WriteLine("<treenodetext='"&strname&"'NavigateUrl='xxcb_add.aspx?classname="&strname&""&strand&"classid="&strid&"'Target='main1'>")
CaseIs=0
txtwriter.WriteLine("<treenodetext='"&strname&"'NavigateUrl='xxcb_add.aspx?classname="&strname&""&strand&"classid="&strid&"'Target='main1'/>")
CaseIs<0
txtwriter.WriteLine("<treenodetext='"&strname&"'NavigateUrl='xxcb_add.aspx?classname="&strname&""&strand&"classid="&strid&"'Target='main1'/>")
'txtwriter.WriteLine("</treenode>")

m=k
Whilem<0
txtwriter.WriteLine("</treenode>")
m=m+2
EndWhile

EndSelect

j=Len(Trim(objRead.Item("classid")))

EndIf

strid1=Trim(objRead.Item("classid"))
strname1=Trim(objRead.Item("classname"))

EndWhile

'strid=strid1
'strname=strname1
i=Len(strid)
k=j-i
strid=strid1
strname=strname1
SelectCasek
CaseIs>0
txtwriter.WriteLine("<treenodetext='"&strname&"'NavigateUrl='xxcb_add.aspx?classname="&strname&""&strand&"classid="&strid&"'Target='main1'/>")
'txtwriter.WriteLine("</treenode>")

m=Len(strid)/2

Whilem>1
txtwriter.WriteLine("</treenode>")
m=m-1
EndWhile
CaseIs=0
txtwriter.WriteLine("<treenodetext='"&strname&"'NavigateUrl='xxcb_add.aspx?classname="&strname&""&strand&"classid="&strid&"'Target='main1'/>")
'txtwriter.WriteLine("</treenode>")
m=Len(strid)/2

Whilem>1
txtwriter.WriteLine("</treenode>")
m=m-1
EndWhile
CaseIs<=0
txtwriter.WriteLine("<treenodetext='"&strname&"'NavigateUrl='xxcb_add.aspx?classname="&strname&""&strand&"classid="&strid&"'Target='main1'/>")
'txtwriter.WriteLine("</treenode>")

m=Len(strid)/2

Whilem>1
txtwriter.WriteLine("</treenode>")
m=m-1
EndWhile

EndSelect
txtwriter.WriteLine("</TREENODES>")
txtwriter.Close()

这样menuone.txt就按要求生成了菜单源文件。

ASP.NET+XML Web服务客户端创建Web服务安装IE补丁后ASP.NET将无法运行

ASP.NET中不定级动态菜单的实现

评论 (0) All