将站点发布到 Web 服务器上,无论是运行 Microsoft Internet Information Service (IIS) 的服务器还是 Personal Web Server(个人 Web 服务器)。
expression.Publish(DestinationUrl, PublishFlags, UserName, Password)
expression 返回 WebEx 对象的表达式。
DestinationUrl 必选,String 类型。包含站点完整目标 URL 的字符串, 例如 http://wwwroot/Adventure Works。此字符串可以是任何站点的 URL, 例如 http://Web 服务器/文件夹或 file://文件系统/文件夹(对于基于硬盘的站点)。
PublishFlags 可选,FpWebPublishFlags 类型。
FpWebPublishFlags 可以是下列这些 FpWebPublishFlags 常量之一。 |
fpPublishAddToExistingWeb |
fpPublishCopyAllFiles |
fpPublishCopySubwebs |
fpPublishIncremental |
fpPublishLogInTempDir |
fpPublishNoDeleteUnmatched |
fpPublishUseLastPublishTime |
fpPublishNone 默认 |
UserName 可选,String 类型。发布站点的用户名。
Passward 可选,String 类型。用户的密码。
本示例发布当前站点。
注意 如果要发布到的站点是现有站点,您必须使用 fpPublishAddToExistingWeb 参数,否则站点不会发布。如果要发布到的站点不存在,则不要使用 fpPublishAddToExistingWeb 参数,因为站点将不会发布。
Private Sub PublishMyWeb()
Dim myWeb As WebEx
Dim myBaseURL As String
Dim myPublishParam As FpWebPublishFlags
Set myWeb = Application.ActiveWeb
myBaseURL = "http://www.Adventure-Works.com"
myPublishParam = fpPublishAddToExistingWeb
myWeb.Publish myBaseURL, myPublishParam
End Sub