|
'***P1
<% url=request.querystring("url") 'se vogliamo andare subito in quel sito aggiungiamo un redirect. response.redirect url %> '***P2 Ed eccoci allo script per far funzionare tutto quello che abbiamo imparato finora: <% Set banner=Server.CreateObject("MSWC.AdRotator") banner.targetframe="target='_new'" banner.Border=10 banner.Clickable=True response.write banner.GetAdvertisement("banner.txt") ' Se il file rotator schedule si chiamasse "banner.txt" %> 'banner.targetframe="target='_new'" - contiene il nome del frame in 'cui verra' visualizzata la pagina del banner '(in questo caso in una nuova finestra del browser). 'banner.Border=10 - il bordo cosi' come nel file rotator schedule. 'banner.Clickable=true - o false, se vogliamo che il banner sia 'cliccabile o meno. 'L'output eventuale sul client, in caso l'immagine prescelta fosse 'quella di ASPITALIA, sarebbe: '<A HREF="pagina.asp?url=<http://www.aspitalia.com&image=Immagine1.bmp> _ 'target='_new'> '<IMG SRC="Immagine1.bmp" ALT="ASPITALIA, il sito italiano per imparare _ 'l'ASP" 'WIDTH=550 HEIGHT=200 BORDER=0></A> 'Una nota importante: nell'istruzione GetAdvertisement("nomefile") 'dev'essere inserito il percorso relativo alla pagina ASP corrente, e 'non va MAI utilizzato il comando Server.MapPath. |