WSS3SDK之：如何从本地文件夹上传文件到SharePoint站点

本节将展示如何从本地上传一个文件到WSS站点。通过使用EnsureParentFolder方法来确保目标文件夹有效。
步骤
1、在VS 2005中创建一个Web应用程序，添加FormDigest控件，并在.aspx文件中引用Microsoft.SharePoint.WebControls命名空间，如下:

<%@ Register Tagprefix="SharePoint"
      Namespace="Microsoft.SharePoint.WebControls"
   Assembly="Microsoft.SharePoint, Version=11.0.0.0,
      Culture=neutral,
   PublicKeyToken=71e9bce111e9429c" %>

注意：
我们可以从默认WSS部署中的default.aspx文件中获取PubliceKeyToken的值，该文件位于Local_Drive:\Program Files\Common Files\Microsoft Shared\web server extensions\12\TEMPLATE\SiteTemplates\sts文件夹。或者从Microsoft.SharePoint组件所提供的信息中获取，该组件位于资源管理器中的Local_Drive:\%WINDOWS%\assembly。
2、添加一个HtmlInputFile控件，一个textbox，和一个button到.aspx页面form中。

3、在.aspx.cs code-beihind文件中，添加System.IO和Microsoft.SharePoint命名空间。
VB

Imports System.IO
Imports Microsoft.SharePoint

using System.IO;
using Microsoft.SharePoint;

4、添加下列代码到button的Click事件。
VB

If File1.PostedFile Is Nothing Then
Return
End If

Dim destUrl As String = TextBox1.Text

Dim site As SPWeb = New SPSite(destUrl).OpenWeb()

Dim fStream As Stream = File1.PostedFile.InputStream
Dim contents(fStream.Length) As Byte

fStream.Read(contents, 0, CInt(fStream.Length))
fStream.Close()

EnsureParentFolder(site, destUrl)

site.Files.Add(destUrl, contents)

if (File1.PostedFile == null)
return;

string destUrl = TextBox1.Text;

SPWeb site = new SPSite(destUrl).OpenWeb();

Stream fStream = File1.PostedFile.InputStream;
byte[] contents = new byte[fStream.Length];

fStream.Read(contents, 0, (int)fStream.Length);
fStream.Close();

EnsureParentFolder(site, destUrl);

site.Files.Add(destUrl, contents);

传递给destUrl参数，也就是textbox中输入的目标位置的值必须是一个包含文件名的绝对URL地址。
此外，实例化父站点的SPWeb对象时，可以结合SPSite构造器和OpenWeb方法来验证URL是否属于当前WSS部署。不在当前WSS管辖范围内的URL将抛出参数异常。System.Web.UI.HtmlControls.HtmlInputFile对象用来读取源文件，内容存到一个byte数组中，以便传给SPFileCollection类的Add方法。
5、EnsureParentFolder方法确保了在某网站中目标URL的父文件夹确实存在，并会返回该父文件夹的网站相对URL路径。该方法接受两个参数：一个是由SPWeb对象代表的父站点，另一个是包含绝对URL路径的字符串(从UploadFile方法传过来的)。如果父文件夹不存在，EnsureParentFolder方法将创建它。
VB

Public Function EnsureParentFolder(parentSite As SPWeb,
        destinUrl As String) As String

    destinUrl = parentSite.GetFile(destinUrl).Url

    Dim index As Integer = destinUrl.LastIndexOf("/")
    Dim parentFolderUrl As String = String.Empty

    If index > - 1 Then
        parentFolderUrl = destinUrl.Substring(0, index)
        Dim parentFolder As SPFolder
            = parentSite.GetFolder(parentFolderUrl)

        If Not parentFolder.Exists Then
            Dim currentFolder As SPFolder = parentSite.RootFolder
            Dim folder As String

            For Each folder In  parentFolderUrl.Split("/"c)
                currentFolder = currentFolder.SubFolders.Add(folder)
            Next folder
        End If
    End If

    Return parentFolderUrl
End Function 'EnsureParentFolder

public string EnsureParentFolder(SPWeb parentSite, string destinUrl)
{
    destinUrl = parentSite.GetFile(destinUrl).Url;

    int index = destinUrl.LastIndexOf("/");
    string parentFolderUrl = string.Empty;

    if (index > -1)
    {
        parentFolderUrl = destinUrl.Substring(0, index);

        SPFolder parentFolder
            = parentSite.GetFolder(parentFolderUrl);

        if (! parentFolder.Exists)
        {
            SPFolder currentFolder = parentSite.RootFolder;

            foreach(string folder in parentFolderUrl.Split('/'))
            {
                currentFolder
                    = currentFolder.SubFolders.Add(folder);
            }
        }
    }
    return parentFolderUrl;
}

6、SPWeb类的GetFile方法用于与SPFile类的Url属性一并将URL转换成站点相当URL，如果特定的URL在该站点区域内不存在则抛出异常。父文件夹的URL是通过String.LastIndexOf方法通过判断目标URL最末端的斜线(/)的方式计算出来的。如果没有发现斜线（换句话说index等于-1），那么目标就是站点的根文件夹，parentFolderUrl参数将返回空字符串。否则，正如样例中所示，SPWeb类的GetFolder方法返回目标父一级文件夹。如果该文件夹不存在，样例代码将创建该文件夹。
如果要从本地上传一个文件到运行WSS的同一台服务器上，我们可以用System.IO.FileStream对象来代替。这时，需要添加System.IO命名空间的引用。此外，也要引用System和Microsoft.SharePoint命名空间。下面的例子在Click事件处理程序中调用UploadFile方法，它反过来再调用先前创建的EnsurePartentFolder方法。
VB

Public Sub UploadFile(srcUrl As String, destUrl As String)

    If Not File.Exists(srcUrl) Then

        Throw New ArgumentException(String.Format("{0} does not exist",
            srcUrl), "srcUrl")

    End If

    Dim site As SPWeb = New SPSite(destUrl).OpenWeb()

    Dim fStream As FileStream = File.OpenRead(srcUrl)
    Dim contents(fStream.Length) As Byte
    fStream.Read(contents, 0, CInt(fStream.Length))
    fStream.Close()

    EnsureParentFolder(site, destUrl)

    site.Files.Add(destUrl, contents)

End Sub 'UploadFile

public void UploadFile(string srcUrl, string destUrl)
{
    if (! File.Exists(srcUrl))
    {
        throw new ArgumentException(String.Format("{0} does not exist",
            srcUrl), "srcUrl");
    }

    SPWeb site = new SPSite(destUrl).OpenWeb();

    FileStream fStream = File.OpenRead(srcUrl);
    byte[] contents = new byte[fStream.Length];
    fStream.Read(contents, 0, (int)fStream.Length);
    fStream.Close();

    EnsureParentFolder(site, destUrl);
    site.Files.Add(destUrl, contents);
}

UploadFile方法有两个参数。srcUrl参数指定了本地文件系统中的源位置，destUrl参数指定目标位置的绝对URL。System.IO.FileStream对象用于读源文件的内容，并存到byte数组中传给SPFileCollection类的Add方法。
注意：
上传文件的大小不能超过2GB。