StoreInFolder property

  • Article

StoreInFolder property

This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.

Determines whether supporting files for the Web page are placed into a subfolder that has the same name as the root HTML file.

        
          retLong = object.StoreInFolder
object. StoreInFolder = valLong

retLong

Long. Non-zero (True) to place supporting Web page files in a subfolder; otherwise, zero (False). The default is True.

object

Required. An expression that returns a VisPageWebSettings object.

valLong

Required Long. Non-zero (True) to place supporting Web page files in a subfolder; otherwise, zero (False).

Remarks

If the StoreInFolder property is set to True (non-zero), Microsoft Visio places the supporting files in a subfolder prefixed with the same name as the .htm file. If either the .htm file or subfolder is moved or deleted, its corresponding subfolder or .htm file is also moved or deleted.

If the StoreInFolder property is set to False (0), Visio places all supporting files in the same folder as the .htm file.

This value is the equivalent of selecting the Organize supporting files in a folder check box on the Files tab in the Save As Web Page dialog box (on the File menu, click Save as Web Page, and then click Publish).

Example

The following procedure demonstrates setting the StoreInFolder property so that subfolders are created that contain all a Web page's supporting files. Before running this macro, supply a valid path in the TargetPath property.

  Public Sub saveAsWeb()

  Dim saveAsWeb As VisSaveAsWeb

  Dim webSettings As VisWebPageSettings

  

  Set saveAsWeb = New VisSaveAsWeb

  Set webSettings = saveAsWeb.WebPageSettings

     webSettings.StoreInFolder = True

     webSettings.TargetPath = "c:\temp\org1012.htm"

     saveAsWeb.CreatePages

  End Sub