Componente ASP AdRotator
Componente ASP AdRotator
O componente ASP AdRotator cria um objeto AdRotator que exibe uma imagem diferente sempre que um usuário insere ou atualiza uma página. Um arquivo de texto inclui informações sobre as imagens.
Nota: O AdRotator não funciona com o Internet Information Server 7 (IIS7).
Sintaxe
<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>
Exemplo de ASP AdRotator
Suponha que temos o seguinte arquivo de texto, chamado "ads.txt":
REDIRECT banners.asp
*
w3s.gif
https://www.w3schools.com
Free Tutorials from W3Schools
50
xmlspy.gif
https://www.altova.com
XML Editor from Altova
50
As linhas abaixo do asterisco no arquivo de texto acima especificam o nome das imagens (anúncios) a serem exibidos, os endereços dos hiperlinks, o texto alternativo (para as imagens) e as taxas de exibição (em porcentagem).
A primeira linha no arquivo de texto acima especifica o que acontecerá quando um visitante clicar em uma das imagens. A página de redirecionamento (banners.asp) receberá uma querystring com a URL para redirecionar.
Dica: Para especificar a altura, largura e borda da imagem, você pode inserir as seguintes linhas em REDIRECIONAR:
REDIRECT banners.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
w3s.gif
...
O arquivo "banners.asp" se parece com isso:
Exemplo
<%
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>
Isso é tudo!!
Propriedades do ASP AdRotator
| Property | Description | Example |
|---|---|---|
| Border | Specifies the size of the borders around the advertisement | <% set adrot=Server.CreateObject("MSWC.AdRotator") adrot.Border="2" Response.Write(adrot.GetAdvertisement("ads.txt")) %> |
| Clickable | Specifies whether the advertisement is a hyperlink | <% set adrot=Server.CreateObject("MSWC.AdRotator") adrot.Clickable=false Response.Write(adrot.GetAdvertisement("ads.txt")) %> |
| TargetFrame | Name of the frame to display the advertisement | <% set adrot=Server.CreateObject("MSWC.AdRotator") adrot.TargetFrame="target='_blank'" Response.Write(adrot.GetAdvertisement("ads.txt")) %> |
Métodos ASP AdRotator
| Method | Description | Example |
|---|---|---|
| GetAdvertisement | Returns HTML that displays the advertisement in the page | <% set adrot=Server.CreateObject("MSWC.AdRotator") Response.Write(adrot.GetAdvertisement("ads.txt")) %> |