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 'EnsureParentFolderC#
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);
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 'UploadFileC#
public void UploadFile(string srcUrl, string destUrl)
{
if (! File.Exists(srcUrl))
{
throw new ArgumentException(String.Format("{0} does not exist",
srcUrl), "srcUrl");
}