FP2000: Themes "Selected Pages" Option Not Available to Active Server PagesID: Q219916
|
The "Selected Pages" option is unavailable in the Themes dialog box, when you apply a Theme to an Active Server Page.
WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.
Sub applyatheme()
'x = MsgBox("Do you want to apply a Theme to this page")
'FileSize = oMyFile.Files("test.asp").Properties
myThemeName = "downtown"
Set myFile = ActiveWeb.RootFolder.Files("test.asp")
'myThemeName = ""
Call myFile.ApplyTheme(myThemeName, fpThemePropertiesAll)
End Sub
Sub remove_theme()
myThemeName = ""
Set myFile = ActiveWeb.RootFolder.Files("test.asp")
Call myFile.ApplyTheme(myThemeName, fpThemePropertiesAll)
End Sub
For more information about Active Server Pages, click Microsoft FrontPage Help on the
Help menu, type "ASP" in the Answer Wizard, and then click Search
to view the topic.
For more information about Themes, click Microsoft FrontPage Help on the
Help menu, type "Themes" in the Answer Wizard, and then click Search
to view the topic.
Additional query words: FP2K front page
Keywords : kbdta
Version : WINDOWS:
Platform : WINDOWS
Issue type : kbprb
Last Reviewed: July 1, 1999