从指定的 WebFolder 对象删除 WebEx 对象。
expression.RemoveWeb(UserName, Password)
expression 返回 WebFolder 对象的表达式。
UserName 可选,String 类型。用户的登录名。
Passward 可选,String 类型。用户的密码。
RemoveWeb 方法是对 MakeWeb 方法的补充。正如 MakeWeb 方法从文件夹创建站点的 meta 数据一样,RemoveWeb 方法从文件夹删除站点的 meta 数据,但文件夹仍然保持不变。这不同于 WebEx 对象的 Delete 方法,Delete 方法会删除指定站点的全部内容。
本示例从文件夹删除站点。该文件夹和其内容保持不变,但文件夹不再是站点。
注意 您必须打开包含该文件夹的站点。
Private Sub WebRemove()
Dim myFolders As WebFolders
Dim myFolder As WebFolder
Set myWebFolders = Webs(0).RootFolder.Folders
For Each myFolder In myFolders
If myFolder.Name = "TempWeb" Then
myFolder.RemoveWeb
Exit For
End If
Next
End Sub