<%
Function ShowAdvertisementTopLeft()

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