FrontPage VBA教程:Save方法

保存 PageWindowEx对象。

expression.Save(ForceOverwrite)

expression  返回 PageWindowEx对象的表达式。

ForceOverwrite  可选,Boolean 类型。ForceOverwrite参数可用于覆盖现有文件。默认值是 True。

VBA示例

本示例创建属性,并将其添加到文件中,然后保存活动网页窗口。

注意  若要运行本示例,必须有一个称为“C:\My Documents\My Webs\Rogue Cellars”(对于在 Microsoft Windows 上运行的服务器)或“C:\WINNT\Profiles\logon alias\Personal\My Webs\Rogue Cellars”(对于在 Windows NT 上运行的服务器)的站点,或者也可以用另一站点 URL 和文件来代替。


Private Sub AddSaleText()
    Dim myWeb As WebEx
    Dim myFile As WebFile
    Dim mySaleProp As String
    Dim mySaleText As String
    mySaleText = "Vintage Wines for Oktoberfest Sale!!!"
    Set myWeb = Webs.Open("C:\My Documents\My Webs\Rogue Cellars")
    Set myFile = ActiveWeb.RootFolder.Files("Sale.htm")
    myFile.Properties.Add "SaleText", mySaleText
    mySaleProp = myFile.Properties("SaleText")
    myFile.Open
    ActiveDocument.body.insertAdjacentText "BeforeEnd", mySaleProp
    ActivePageWindow.Save
    WebWindows.Close
End Sub

上页:FrontPage VBA教程:Run方法 下页:FrontPage VBA教程:SaveAs方法

FrontPage VBA教程:Save方法

FrontPage VBA教程:SaveAs方法 FrontPage VBA教程:SaveReport方法
FrontPage VBA教程:setBotAttribute方法 FrontPage VBA教程:toString方法
FrontPage VBA教程:UndoCheckout方法 FrontPage VBA教程:VerifyAllLinks方法
FrontPage VBA教程:Application对象 FrontPage VBA教程:BasicList对象
FrontPage VBA教程:DispFPHTMLDocument对象 FrontPage VBA教程:DocumentLibrary对象
FrontPage VBA教程:IFPDocument对象 FrontPage VBA教程:IHTMLFrontPageBotElement对象
FrontPage VBA教程:List对象 FrontPage VBA教程:ListField对象
FrontPage VBA教程:ListFieldChoice对象 FrontPage VBA教程:ListFieldComputed对象
FrontPage VBA教程:ListFieldCounter对象 FrontPage VBA教程:ListFieldCurrency对象
FrontPage VBA教程:ListFieldDateTime对象 FrontPage VBA教程:ListFieldFile对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号