随笔 - 235, 文章 - 12, 评论 - 1671
  博客园  :: 首页  :: 联系 :: 订阅 订阅  :: 管理

MOSS点滴(2):自定义Application Page

Posted on 2008-04-19 20:07  生鱼片  阅读(3594)  评论(8编辑  收藏

在MOSS中后台管理的页面都是Application Page,比如网站设置的页面(settings.aspx)就是典型的Application Page,它不能被Sharepoint Desiger定制。如果我们要修改只能手动的使用其他工具来修改,我们也可以添加Application Page,必须放在C:\Program Files\Common Files\Microsoft Shared\web server extensions\12\TEMPLATE\LAYOUTS目录下,它对应的虚拟路径为_layouts。所有的Application Page都使用application.master这个母版页,我们自定义的Application Page也是一样,可以使用内嵌代码也可以使用后置代码。自定义的application page继承自LayoutsPageBase类,下面我们就来做两个自定义的Application Page,下面是项目的结构:

1

Feature.xml中代码如下:
<?xml version="1.0" encoding="utf-8" ?>
<Feature Id="86689158-7048-4421-AD21-E0DEF0D67C81"
   Title="自定义ApplicationPage"
   Description="使用SPTreeViw演示自定义ApplicationPage"
   Version="1.0.0.0"
   Scope="Web"
   Hidden="FALSE"        
   ImageUrl="TPG\PithHelmet.gif"        
   xmlns="http://schemas.microsoft.com/sharepoint/">
<ElementManifests>
<ElementManifest Location="elements.xml" />
</ElementManifests>
</Feature>

ApplicationPage1.aspx和ApplicationPage2.aspx就是我们自定义的Application Page,ApplicationPage1.aspx演示的是在一个列表库的列表项的编辑菜单里出现一个链接,统计该列表的信息,如下图:

2

要添加此菜单须在Elements.xml中填加如下代码:

<!-- 出现在控件的编辑项中-->
<CustomAction Id="CustomApplicationPage1"
RegistrationType
="List"
RegistrationId
="101"
ImageUrl
="/_layouts/images/GORTL.GIF"
Location
="EditControlBlock"
Sequence
="240"
Title
="此文档库信息" >
<UrlAction Url="~site/_layouts/CustomApplicationPages/ApplicationPage1.aspx?ItemId={ItemId}&amp;ListId={ListId}"/>
</CustomAction>


RegistrationType="List":代表注册的类型是列表.
Location="EditControlBlock":代表菜单将出现在控件编辑项当中.
UrlAction 是它的链接,URL中的ItemId 和ListId是通过 QueryString得到的。


ApplicationPage1.cs中代码如下:

using System;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using Microsoft.SharePoint;
using Microsoft.SharePoint.WebControls;

namespace CustomApplicationPages 
{
  
public class ApplicationPage1 : LayoutsPageBase 
 {
    
protected Label lblSiteTitle;
    
protected Label lblSiteID;
    
protected Label lblSiteUrl;
    
protected Label lblListID;
    
protected Label lblListTile;
    
protected Label lblRootFolderUrl;
    
protected Label lblDocumentID;
    
protected Label lblDocumentName;
    
protected Label lblDocumentUrl;
    
protected Label lblDocumentTemplateUrl;
    
protected Label lblFileAuthor;
    
protected Label lblFileSize;
    
protected Label lblFileLastModified;
    
protected Label lblFileCheckOutStatus;

    
protected override void OnLoad(EventArgs e) 
   {
      SPSite siteCollection = this.Site;
      SPWeb site 
= this.Web;
      lblSiteTitle.Text 
= site.Title;
      lblSiteUrl.Text 
= site.Url.ToLower();      
      
string ListId = Request.QueryString["ListId"];
      lblListID.Text 
= ListId;
      SPList list 
= site.Lists[new Guid(ListId)];
      lblListTile.Text 
= list.Title;
      lblRootFolderUrl.Text 
= list.RootFolder.Url;      
      
string ItemId = Request.QueryString["ItemId"];
      lblDocumentID.Text 
= ItemId;
      SPListItem item 
= list.Items.GetItemById(Convert.ToInt32(ItemId));
      lblDocumentName.Text 
= item.Name;
      lblDocumentUrl.Text 
= item.Url;

      
if (list is SPDocumentLibrary)
    {
        SPDocumentLibrary documentLibrary 
= (SPDocumentLibrary)list;
        lblDocumentTemplateUrl.Text 
= documentLibrary.DocumentTemplateUrl;

        SPFile file 
= site.GetFile(item.Url);
        lblFileAuthor.Text 
= file.Author.Name;
        lblFileSize.Text 
= file.TotalLength.ToString("0,###"+ " bits";
        lblFileLastModified.Text 
= "By " + file.ModifiedBy.Name +
                                   
" on " + file.TimeLastModified.ToLocalTime().ToString();
        lblFileCheckOutStatus.Text 
= file.CheckOutStatus.ToString();
      }
    }
    
  }
}


结果如下图:

3

ApplicationPage2.aspx中我们使用控件SPTreeView来显示该站点的文件夹结构,我们将菜单添加到“网站操作“中,并且设置只有管理员权限才可以看到,如下图:

4

Elements.xml中填加如下代码:

<!-- 有管理员权限才可以察看 -->
<CustomAction Id="CustomApplicationPage2"
GroupId
="SiteActions"
Location
="Microsoft.SharePoint.StandardMenu"
Sequence
="2006"
Title
="获取站点信息"
Description
="使用SPTreeView获取站点信息"
RequireSiteAdministrator
="True">
<UrlAction Url="~site/_layouts/CustomApplicationPages/ApplicationPage2.aspx"/>
</CustomAction>


RequireSiteAdministrator="True":改属性说明该项操作只有拥有管理员权限的用户才可以操作

ApplicationPage2.cs中代码如下:

using System;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;

using Microsoft.SharePoint;
using Microsoft.SharePoint.WebControls;

namespace CustomApplicationPages
{
  
public class ApplicationPage2 : LayoutsPageBase 
  {    
    
protected SPTreeView treeSitesFiles;
    
const string siteImg = @"\_layouts\images\FPWEB16.GIF";
    
const string foloerImg = @"\_layouts\images\FOLDER16.GIF";
    
const string ghostedFileImg = @"\_layouts\images\NEWDOC.GIF";
    
const string unGhostedFileImg = @"\_layouts\images\RAT16.GIF";

    
protected override void OnLoad(EventArgs e)
    {
      SPWeb site 
= SPContext.Current.Web;
      SPFolder rootFolder 
= site.RootFolder;
      TreeNode rootNode 
= new TreeNode(site.Url, site.Url, siteImg);
      LoadFolderNodes(rootFolder, rootNode);
      treeSitesFiles.Nodes.Add(rootNode);
      treeSitesFiles.ExpandDepth 
= 1;
    }

    
protected void LoadFolderNodes(SPFolder folder, TreeNode folderNode)
    {
      
foreach (SPFolder childFolder in folder.SubFolders) 
      {
        TreeNode childFolderNode 
= new TreeNode(childFolder.Name, childFolder.Name, foloerImg);
        childFolderNode.NavigateUrl 
= Site.MakeFullUrl(childFolder.Url);
        LoadFolderNodes(childFolder, childFolderNode);        
        folderNode.ChildNodes.Add(childFolderNode);
      }

      
foreach (SPFile file in folder.Files) 
      {
        TreeNode fileNode;
        
if (file.CustomizedPageStatus == SPCustomizedPageStatus.Uncustomized) 
        {
            fileNode 
= new TreeNode(file.Name, file.Name, ghostedFileImg);          
        }
        
else 
        {
            fileNode 
= new TreeNode(file.Name, file.Name, unGhostedFileImg);
        }
        fileNode.NavigateUrl 
= Site.MakeFullUrl(file.Url);
        folderNode.ChildNodes.Add(fileNode);
      }
    } 
  }
}


效果如下图:

5

如何调试:
1.修改当前web应用程序的配置文件如下:
<configuration>
  
<SharePoint>
    
<SafeMode CallStack="true" />
   
</SharePoint>
  
<system.web>
    
<customErrors mode="Off" />
    
<compilation debug="true" />
  
</system.web>
</configuration>
2.然后附加w3wp进程,设置断点即可调试了。