当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 在ASP.NET 2.0中建立站点导航层次(4)

ASP.NET
Script:WINDOWS Script 枚举运行中进程
使用Flex结合Webservice完成域名查询
VSTS Team System 总算装好了。
用于部署数据库的 数据库初始化工具 xzSQLDeploy Tools V1.0 (for SQLServer) f...
一个将阿拉伯数字转换成中文大写的最简单算法
SCRIPT:使用Windows Script 关闭和打开指定程序
Script:使用WINDOWS脚本访问WEB SERVICES
asp.net连接Access数据库
VB中IIS Application发布可能出现的问题
VB打包后的安装问题
Nhibernate的数据分页技术(续)
使用API函数复制文件,可显示进度。
VB打包技巧
VB.NET实现DirectSound9 (9) 实现示波器
VB.NET 实现DirectSound9 (10) 均衡器
[水晶报表部署系列之一]轻松搞定水晶报表9.2打包
DataGrid 中双向排序的一种办法
利用System.EventHandler来实现两个窗体间的事件调用
多线程应用程序中调用窗体的一点心得
Smart Client之旅一:用B/S方式运行Exe应用程序

在ASP.NET 2.0中建立站点导航层次(4)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 138 ::
收藏到网摘: n/a

'Check if there is a newsgroup type in the query string 
Dim typeID As String = Nothing  
Dim typeIDUrlEncoded As String = Nothing  
If Not String.IsNullOrEmpty(e.Context.Request.QueryString("type")) Then 
typeID = e.Context.Server.HtmlEncode(e.Context.Request.QueryString("type")) 
typeIDUrlEncoded = e.Context.Server.UrlEncode(e.Context.Request.QueryString("type")) 
End If 

  '首先执行发布页面URL的固定 
  '如果查询字符串中包含发布ID,我们就知道当前节点式发布页面 
If Not String.IsNullOrEmpty(e.Context.Request.QueryString("postingID")) Then 
Dim postingID as string = _ 
e.Context.Server.HtmlEncode(e.Context.Request.QueryString("postingID")) 
Dim postingIDUrlEncoded as string = _ 
e.Context.Server.UrlEncode(e.Context.Request.QueryString("postingID")) 
Dim NewUrl As String = tempNode.Url + "?type=" + typeIDUrlEncoded + "&postingID=" + postingIDUrlEncoded  
Dim NewTitle As String = tempNode.Title + ": " + postingID  
tempNode.Url = NewUrl 
tempNode.Title = NewTitle 

tempNode = tempNode.ParentNode 
End If 

  '然后,对新闻组页面进行固定 
  '这时候nodeCopy 变量知贤了新闻组节点 
If Not String.IsNullOrEmpty(e.Context.Request.QueryString("type")) Then 
Dim NewUrl As String = tempNode.Url + "?type=" + typeIDUrlEncoded  
Dim NewTitle As String = tempNode.Title + ": " + typeID  
tempNode.Url = NewUrl 
tempNode.Title = NewTitle 
End If 

  '最后返回当前节点 
Return nodeCopy 
End Function 
End Class