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

在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，下面是项目的结构：

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演示的是在一个列表库的列表项的编辑菜单里出现一个链接，统计该列表的信息，如下图：

要添加此菜单须在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}&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();
      }
    }

  }
}

结果如下图：

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

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);
      }
    }
  }
}

效果如下图：

如何调试：

1.修改当前web应用程序的配置文件如下：

2.然后附加w3wp进程，设置断点即可调试了。

本文转自生鱼片博客园博客，原文链接：http://www.cnblogs.com/carysun/archive/2008/04/19/applicationpage.html，如需转载请自行联系原作者