UndoCheckout 方法

将指定的 WebFile 对象恢复到它原来在版本控制项目中的状态。

注意  在使用本方法之前必须在适当的位置有一个版本控制项目。有关版本控制项目的详细信息，请参阅管理版本控制项目。

expression  返回 WebFile 对象的表达式。

示例

本示例将文件签入为其原状态（在签出之前的状态）。该文件必须是版本控制项目的一部份。

注意  若要运行本过程，您必须在适当位置有一个版本控制项目，且打开一个站点窗口，而且该站点中包含一个称为 Zinfandel.htm 的网页。或者，也可以用您所选择的站点和文件来代替。

Private Sub UndoCheckout()
    Dim myWeb As WebEx

    Set myWeb = ("C:/My Webs/Rogue Cellars")
    myWeb.RootFolder.Files("Zinfandel.htm").UndoCheckout
End Sub