Adrotator

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • India777
    New Member
    • Apr 2012
    • 61

    Adrotator

    Hai all,
    When i run my asp web page i got the Following Error. I am created object For MSWC.AdRotator in Page.

    Below is the code i am using to create object for AdRotator.
    Code:
    Sub DisplayBanner(adSource)
    	Dim varAd, objAd
    
    	Set objAd = Server.CreateObject("MSWC.AdRotator")
    	
    	If err.Number = 0 Then
    		
    		objAd.Border="0" 
    		
    		objAd.Clickable = True 
    	
    		objAd.TargetFrame="target=_new"
    		
    		varAd = objAd.GetAdvertisement(adSource)
    		If err.Number = 0 Then
    			Response.Write varAd
    		Else
    			Response.Write("<!-- ERROR: Source DisplayBanner - Error parsing ad file (" & Err.Description & ") -->")
    			err.Clear
    		End If
    	Else
    		Response.Write("<!-- ERROR: Source DisplayBanner - Error opening MSWC.AdRotator (" & Err.Description & ") -->")
    		err.Clear
    	End If
    	
    	set objAd = nothing
    	
    End Sub
    ------------------------------------------
    Server object error 'ASP 0177 : 800401f3'

    Server.CreateOb ject Failed

    /inc/layoutlib.asp, line 1222

    800401f3
    -------------------------------------------

    Thanks,
    SR
Working...