<% Function ShowAdvertisementBottomRight() Dim objAd Set objAd = Server.CreateObject("MSWC.AdRotator") objAd.TargetFrame = "TARGET=new" ShowAdvertisementBottomRight = objAd.GetAdvertisement("bottomrightbanner.txt") Set objAd = Nothing End Function %>