<% if (Request.ServerVariables("QUERY_STRING") = "") then %>

AdRotator

Astro Mt. Bike Company

 <% else %> <% set obj = Server.CreateObject("MSWC.AdRotator") %>

<% =obj.GetAdvertisement("/smoke/adrot.txt") %>

 <% end if %>