FP: How to Create a Script for the Marquee Control

• Microsoft FrontPage 97 for Windows with Bonus Pack

SUMMARY

You can use the Marquee control to add a dynamic look your Web pages. This article describes a method to use a control that scrolls a separate page within the current page and creates two buttons that allow you to control the scrolling speed of the marquee.

NOTE: You can combine ActiveX controls to add greater functionality to your Web pages than would be possible with a single control.

MORE INFORMATION

WARNING: ANY USE 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.

Use the following steps to create a control that scrolls a separate page and uses two buttons to control the scrolling speed of the marquee:

1. Open a Web page in FrontPage Editor.

2. On the Insert menu, point to Other Components, and then click ActiveX control.

3. In the Pick A Control list box, click MarqueeCtl Object.

4. In the Name box, enter a name for the MarqueeCtl Object. For example, type "Marquee" (without the quotation marks).

5. Click Properties.

6. In the Object Parameters dialog box, click Add.

7. In the Name box, enter "szURL" (without the quotation marks). Under Value, in the Data box, enter the following Uniform Resource Locator (URL):

         http://www.microsoft.com
   

8. Click OK two times.

9. In the ActiveX Control Properties dialog box, click Extended.

10. Click Add.

11. In the Name box, enter "TYPE" (without the quotation marks). In the

        Value box, enter "application/x-oleobject" (without the quotation
        marks). Click OK.
    

12. Click OK two more times.

13. On the Insert menu, point to Form Field, and then click Push

        Button.
    

14. Right-click the form field, and then click Form Field Properties.

15. In the Name box, enter "BtnFast" (without the quotation marks). In

        the Value/Label box, enter "Fast"(without the quotation marks).
        Click Normal. Click OK.
    

16. Repeat steps 13 and 14.

17. In the Name box, enter "BtnSlow" (without the quotation marks). In

        the Value/Label box, enter "Slow" (without the quotation marks).
        Click Normal. Click OK.
    

18. Right-click the form area, and click Script Wizard.

19. In the Event pane, double-click BtnSlow, and then click onClick.

        In the Action pane, double-click Marquee, and then double-click
        ScrollDelay.
    

        The following code appears in the Script pane:
    

           Sub BtnSlow_Onclick
           Marquee1.ScrollDelay
    
    

20. Place the insertion point immediately following the

        "Marquee1.ScrollDelay" code and type "=200" (without the quotation
        marks), so that the code looks like this:
    

           Sub BtnSlow_Onclick
           Marquee1.ScrollDelay=200
    
    

21. In the Event pane, double-click BtnFast, and then click onClick.

        In the Action pane, double-click Marquee, and then double-click
        ScrollDelay.
    

        The following code appears in the Script pane:
    

           Sub BtnFast_Onclick
           Marquee1.ScrollDelay
    
    

22. Place the insertion point immediately following the

        "Marquee1.ScrollDelay" code and type "=0" (without the quotation
        marks), so that the code looks like this:
    

           Sub BtnSlow_Onclick
           Marquee1.ScrollDelay=0
    
    

23. Click OK.