Go.asp, come realizzare il frame superiore quando apriamo link esterni

Nella lezione di oggi, "sveliamo" un altro truccoche WebMasterPoint.org adotta ormai da molto tempo, e chedecine di portali e siti web importanti adottano.

Provate a cliccare qui; come vedrete siaprirà una finestra con la homepage di Virgilio.it enella parte superiore un frame nel quale è presente illogo di WebMasterPoint.org, dei links e un bannerpubblicitario.

Questa tecnica è spessoutilizzata per generare maggiori impressions. E' unatecnica che funziona, in quanto spesso si utilizzano reloaddi pagina anche molto brevi (30/50 secondi) in quanto ilcaricamento di questo frame (che contiene semplicemente unapagina web) richiede un tempo quasi pari a zero... visto lasua leggerezza.

Il tutto richiede 2 pagine inAsp:

- link_esterno.asp

-link_esterno_frame.asp

LINK_ESTERNO.asp

E' la pagina principale cheeffettua tutte le operazioni necessarie per utilizzare questatecnica.

Il codice base è:

    "104,*" Framespacing=1 frameborder=1 resize=1>     "link_esterno_frame.asp?url=<%=Request("url")%>" border=0 frameborder=0 scrolling=no resize=no>    "<%=Request("url")%>" border=1 frameborder=0 scrolling=auto resize=no name=sito>

Analizziamo questo codice. Tra i tag TITLEindichiamo il testo che dovrà comparire nella TitleBar. Poi abbiamo un utilizzo di 2frame:

- uno superiore (piccolo) in cui verràcaricata la pagina web link_esterno_frame.asp
- un frame inferiore , di maggiori dimensioni, doveapparirà il sito esterno.

Volendo si può anche inserire uncontaclick dei siti esterni, questo è possibileaggiungendo qualche riga di codice prima deltag

(anche dopo non presenta problemi).

    <%url = Request("url") da = Request("http_referer") ip = Request.ServerVariables("REMOTE_ADDR") 'Connessione al database Set cn = Server.CreateObject("ADODB.Connection") cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("database/click.mdb") ' Aggiunta Click Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "siti" , cn, 3, 3 rs.AddNew rs("sito") = url rs("da") = da rs("data") = now() rs("ip") = ip rs.Update rs.close Set rs = Nothing %>

LINK_ESTERNO_FRAME.asp

Questa pagina contiene tutto ciò chevoi vorrete inserire: il logo, links,banners...

Noi consigliamo l'utilizzo del link TOGLIFRAME nel caso l'utente voglia vedere il sito esterno aschermo intero, senza il nostro frame, per fare questoabbiamo già previsto il codice necessario nella paginaprincipale, e quindi basterà inserire una riga dicodice simile a :

    "<%=Request("url")%>" target="_top">TOGLI FRAME

Dove il codicerosso è necessario per l'obbiettivo che ci siamoprefissati.