Microsoft KB Archive/922480

= Internet Explorer does not load the Hover button ActiveX control after you install security update 912812 in FrontPage 2003 =

Article ID: 922480

Article Last Modified on 2/7/2007

-

APPLIES TO


 * Microsoft Office FrontPage 2003

-





SYMPTOMS
Consider the following scenario. You install security update 912812 on your computer. After you do this, Microsoft Internet Explorer does not load the Hover button ActiveX control. Instead, you must click the control placeholder to start and to enable the Hover button control.

This problem occurs when you use Microsoft Office FrontPage 2003 to create the Web pages that use the Hover button.

For more information about security update 912812, click the following article number to view the article in the Microsoft Knowledge Base:

912812 MS06-013: Cumulative security update for Internet Explorer



CAUSE
This problem occurs because of changes to COM component handling that are contained in security update 912812. When this update is installed, the APPLET, EMBED, and OBJECT page elements cannot load an ActiveX control. This is especially true of the Hover button control.



RESOLUTION
To resolve this problem, replace the existing Hover buttons in the Web page. To do this, you can use a script that converts these Hover buttons into CSS buttons. CSS buttons function in a similar manner.

To do this, follow these steps.

Warning The changes that are made by this script cannot be reverted. Make sure that you have a complete backup of the Web site before you run this script.

Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements.  In FrontPage 2003, point to Macro on the Tools menu, and then click Visual Basic Editor. In Project Explorer, right-click Modules, point to Insert, and then click Module.  In the new module, copy the following lines of code, and then save the module. Option Explicit

Sub ReplaceHoverButtons

Dim applet As IHTMLElement Dim param As IHTMLElement Dim objHead As IHTMLElement Dim theWeb As WebEx Dim webFiles As webFiles Dim webFile As webFile Dim buttonText As String Dim buttonURL As String Dim buttontarget As String Dim styleBlock As String

Set theWeb = ActiveWeb Set webFiles = theWeb.RootFolder.AllFiles ' build the style block with colors that match default hover buttons from sample document styleBlock =&quot;&quot; & vbCrLf & _ &quot;#hoverButton {width: 150px;background-color: #FFFFFF;position: relative;&quot; & _ &quot;clear: both;display: inline;font-family:Arial;Helvetica;sans-serif}&quot; & vbCrLf & _ &quot;#hoverButton a {list-style-type: none;width: 100%;margin: 0;&quot; & _ &quot;text-decoration: none;color: #CC6600;&quot; & _ &quot;display:block;padding: 5px;border-bottom: 1px solid #f2f2f2;}&quot; & vbCrLf & _ &quot;#hoverButton a:hover {text-decoration: none;color: #000000;&quot; & _ &quot;border-bottom: 1px solid #f2f2f2;background-color: #FF9933;}&quot; & vbCrLf & _ &quot; &quot;

For Each webFile In webFiles If webFile.Extension =&quot;htm&quot; Or _ webFile.Extension =&quot;aspx&quot; Or _ webFile.Extension =&quot;asp&quot; Or _ webFile.Extension =&quot;html&quot; Then ' open the file webFile.Open ' Add style block to each of the pages Set objHead = ActiveDocument.all.tags(&quot;head&quot;).Item(0) Call objHead.insertAdjacentHTML(&quot;BeforeEnd&quot;, styleBlock)

' loop through the applets to get target, url and text to display For Each applet In ActiveDocument.all.tags(&quot;applet&quot;) ' only get the values for hover buttons If applet.getAttribute(&quot;code&quot;) =&quot;fphover.class&quot; Then For Each param In applet.Children ' get the value of the target If param.getAttribute(&quot;name&quot;) =&quot;target&quot; Then buttontarget = param.getAttribute(&quot;value&quot;) End If                   ' get the value of the URL If param.getAttribute(&quot;name&quot;) =&quot;url&quot; Then buttonURL = param.getAttribute(&quot;value&quot;) End If                   ' get the value of the display text If param.getAttribute(&quot;name&quot;) =&quot;text&quot; Then buttonText = param.getAttribute(&quot;value&quot;) End If               Next

End If           ' replace the applet with new html based on the settings from above applet.outerHTML =&quot;&quot; & buttonText &&quot; &quot; Next ' save the page - don't worry about the embedded files dialog ActiveDocument.Save (False) ActivePageWindow.Close (False)

End If   Next ' uncomment the next line to close the web 'theWeb.Close End Sub  In FrontPage 2003, open the Web site that contains the pages that use Hover buttons.</li> On the Tools menu, point to Macro, and then click Macros.</li> Click ReplaceHoverButtons in the list of Macros, and then click Run.</li></ol>

<div class="status_section">

STATUS
Microsoft has confirmed that this is a problem in the Microsoft products that are listed in the &quot;Applies to&quot; section.

Additional query words: FP2003 FrontPage2003 FP11 FrontPage11

Keywords: kbtshoot kbscript kbprogramming kbexpertisebeginner kbprb KB922480

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.