MSWC.AdRotator - un circuito di rotazione banner

Home + Articoli + Banner e Advertising + Articolo # 18

Un problema che affligge ogni Webmaster è quello di dover esporre un notevole numero di banner sulle proprie pagine, a volte elevato al punto tale che non c'è ragionevolmente spazio a sufficienza su di una pagina per inserirli tutti.

A questo proposito è possibile realizzare un semplice programmino che visualizzi a caso, nello stesso spazio dedicato, banner diversi al caricamento o al refresh della pagina corrente o al cambio pagina.

A questo proposito Microsoft mette a disposizione il componente MSWC.AdRotator che ha il compito di generare la casualità del banner sulla pagina, generando in automatico il link all'immagine che desideriamo associarvi.

L'utilizzo di questo componente è estremamente semplice; creiamo per prima cosa un file di testo e chiamiamolo banner.txt che includerà una serie di direttive, ovvero tutti i banner, con relativi link e descrizioni, che appariranno sulle pagine del nostro sito.

Vediamo il codice:

REDIRECT banner.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
aspcenter.gif
http://www.aspcenter.net
Microsoft Active Server Pages Development Center
50
mrwebmaster.gif
http://www.mrwebmaster.net
Il portale italiano dei Webmaster
50

La prima riga mostra il comando REDIRECT che indica il file a cui reindirizzeremo l'utente dopo il click sul banner; specifichiamo poi le misure del banner espresse in larghezza ed altezza ed imposteremo il bordo a zero; separiamo poi questa parte del file con un asterisco (*) dalla successiva che riguarda nello specifico il banner ed il sito di appartenenza.

La prima riga dopo l'asterisco indica il percorso (in questo caso relativo) del file immagine (il banner); la seconda indica l'indirizzo (URL); la terza indica il testo che verrà incluso come testo alternativo dell'immagine (... alt="TITOLO DEL SITO") ed in fine la percentuale di volte che vogliamo che il banner appaia sulla pagina.

In ogni pagina ASP del sito in cui desideriamo inserire il circuito di banner in rotazione, aggiungiamo nel punto prescelto questo semplice script:

<%@LANGUAGE = VBScript%>

<div align="center">
    <%
        Dim banner
        Set banner = Server.CreateObject("MSWC.AdRotator")
        Response.Write banner.GetAdvertisement("banner.txt")
        Set banner = Nothing
   %>
</div>

Una volta generato l'oggetto, il metodo GetAdvertisement() richiamerà il file banner.txt in cui abbiamo configurato i banner, su ognuno dei quali verrà generato il link al file banner.asp, di cui vediamo subito il codice:

<%@LANGUAGE = VBScript%>
<%
    Dim url
    url = Request.QueryString("url")
    Response.Redirect url
%>

Memorizziamo nella variabile url la querystring associata all'indirizzo del sito da raggiungere ed il nome del file immagine del banner che sarà qualcosa del genere:

banner.asp?url=http://www.aspcenter.net&image=aspcenter.gif

A questo punto generiamo il redirect verso la URL segnalata nella querystring.

Iscriviti
Cancellati