Custom ASP scripts in constants!

QuickerSite v172 includes a neat feature for ASP/VBScript developers: you can add scripts anywhere in your website: in any page, form, email, catalogue, ...

If you are an ASP/VBScript developer, you probable won't need the sample scripts below, but I'll include them anyway..

This page actually includes 2 sample scripts:

  1. The first script is a simple "hello world"-application. 
    The code for this script is simple:
    for i=6 to 1 step -1
         response.write "<h"&i& ">Hello World!</h"&i&">"
    next

    The output is :
    Hello World!
    Hello World!

    Hello World!

    Hello World!

    Hello World!

    Hello World!


     
     
  2. The second script creates an instance of the content rotator component.
    The code here is even shorter:
    set cr=server.createobject("MSWC.ContentRotator")
    response.write(cr.ChooseContent("/userfiles/cr.txt"))
     
    The output is different everytime this page is loaded... that is the point of the script :-)
    This time, the output is:
    Here's a link.