<% Dim ad Set ad = Server.CreateObject("MSWC.AdRotator") Response.Write(ad.GetAdvertisement("/ctrfiles/ads/adrot.txt")) %>