全部显示打开 WebFile 对象。
expression.Open
expression 必选。返回上述对象之一的表达式。
返回 WebEx 对象。
expression.Open(szWebUrl, UserName, Password, WebOpenFlags)
expression 必选。返回上述对象之一的表达式。
szWebUrl 必选，String 类型。站点的基本 URL，例如“C:\My Webs”。它可以是任何绝对 URL，例如“http://web Server”，或“file://file system”（对于基于磁盘的站点）。
UserName 可选，String 类型。用户的登录名。
Password 可选，String 类型。指派的字符串，用来验证对指定站点的访问。
WebOpenFlags 可选，FpWebOpenFlags 类型。
| FpWebOpenFlags 可以是下列这些 FpWebOpenFlags 常数之一： |
| fpOpenInWindow 默认值 |
| fpOpenNoWindow |
本示例会打开 Rogue Cellars 站点和 Oktoberfest Sale 文件，然后执行以下任务：
应用于 WebFile 对象的 Open 方法。mySaleProp 来代替 insertAdjacentText 方法中的文本参数注意 若要运行本示例，必须有一个名为“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 objWeb As Web
Dim objFile As WebFile
Dim strSaleProp As String
Dim strSaleText As String
strSaleText = "Vintage Wines for Oktoberfest Sale!!!"
Set objWeb = Webs.Open("C:\My Documents\My Webs\Rogue Cellars")
Set objFile = ActiveWeb.RootFolder.Files("Sale.htm")
objFile.Properties.Add "SaleText", mySaleText
strSaleProp = objFile.Properties("SaleText")
objFile.Open
ActiveDocument.body.insertAdjacentText "BeforeEnd", strSaleProp
WebWindows.Close
End Sub