FP2000: Web Shared Borders Replaced by File Shared Borders (219656)

The information in this article applies to:

Microsoft FrontPage 2000

This article was previously published under Q219656

SYMPTOMS

When you add file level borders by using a macro, the web level shared borders are removed.

RESOLUTION

Open the file in a PageWindow before applying the file level shared border. This adds the border to the existing shared borders. The following sample code demonstrates how to do this:

Sub webvsfile()
    Dim w As Web
    Set w = ActiveWeb
    w.SharedBorders(fpBorderTop) = True
    w.RootFolder.Files(0).Edit
    w.RootFolder.Files(0).SharedBorders(fpBorderBottom) = True
    ActivePageWindow.Save
End Sub

STATUS

Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article.

Modification Type:	Major	Last Reviewed:	12/2/2000
Keywords:	kbbug KB219656