ASP Componente AdRotator
El componente ASP AdRotator crea un objeto AdRotator que muestra una imagen diferente cada vez que un usuario entra o actualiza una página. Un archivo de texto incluye información sobre las imágenes.
Nota: El AdRotator no funciona con Internet Information Server 7 (IIS7) .
Sintaxis
<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>ASP AdRotator Ejemplo
Supongamos que tenemos el siguiente archivo de texto, llamado "ads.txt" :
REDIRECT banners.asp
*
w3s.gif
http://www.w3ii.com
Free Tutorials from w3ii
50
xmlspy.gif
http://www.altova.com
XML Editor from Altova
50
Las líneas debajo del asterisco en el archivo de texto anterior especifica el nombre de las imágenes (ads) que se mostrará, las direcciones de hipervínculo, el texto alternativo (for the images) , y las tasas de visualización (in percent) .
La primera línea del archivo de texto anterior especifica qué sucede cuando un usuario hace clic en una de las imágenes. La página de redirección (banners.asp) recibirá una cadena de consulta con la dirección URL para redirigir a.
Tip: Para especificar la altura, la anchura y borde de la imagen, puede insertar las siguientes líneas bajo REDIRECT:
REDIRECT banners.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
w3s.gif
...
El "banners.asp" archivo es como sigue:
Ejemplo
<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>
<!DOCTYPE html>
<html>
<body>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("textfile.txt"))
%>
</body>
</html>
Mostrar Ejemplo »
¡¡Eso es todo!!
ASP Propiedades AdRotator
| Propiedad | Descripción | Ejemplo |
|---|---|---|
| Frontera | Especifica el tamaño de los bordes alrededor de la publicidad | <% establecer adrot = Server. CreateObject("MSWC.AdRotator") adrot.Border = "2" Respuesta. Write(adrot.GetAdvertisement("ads.txt") ) %> |
| se puede hacer clic | Especifica si el anuncio es un hipervínculo | <% establecer adrot = Server. CreateObject("MSWC.AdRotator") adrot.Clickable = false Respuesta. Write(adrot.GetAdvertisement("ads.txt") ) %> |
| TargetFrame | Nombre del marco para mostrar el anuncio | <% establecer adrot = Server. CreateObject("MSWC.AdRotator") adrot.TargetFrame = "target = '_ blank'" Response.Write (adrot.GetAdvertisement ( "ads.txt")) %> |
Métodos AdRotator ASP
| Método | Descripción | Ejemplo |
|---|---|---|
| GetAdvertisement | Devuelve HTML que muestra el anuncio en la página | <% set adrot=Server. CreateObject("MSWC.AdRotator") Response. Write(adrot.GetAdvertisement("ads.txt") ) %> |