ASP AdRotator Component
O componente ASP AdRotator cria um objeto AdRotator que exibe uma imagem diferente a cada vez que um usuário entra 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 ASP AdRotator
Suponha que temos o seguinte arquivo de texto, chamado "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
As linhas abaixo do asterisco no arquivo texto acima especifica o nome das imagens (ads) a ser exibido, os endereços de hiperlink, o texto alternativo (for the images) , e as taxas de exibição (in percent) .
A primeira linha no arquivo de texto acima especifica o que acontece quando um visitante clica em uma das imagens. A página de redirecionamento (banners.asp) receberá uma querystring com a URL para redirecionar para.
Tip: Para especificar a altura, a largura ea borda da imagem, você pode inserir as seguintes linhas sob REDIRECT:
REDIRECT banners.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
w3s.gif
...
O "banners.asp" arquivo parecido com este:
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>
Mostrar exemplo »
Isso é tudo!!
Propriedades AdRotator ASP
| Propriedade | Descrição | Exemplo |
|---|---|---|
| Fronteira | Especifica o tamanho das bordas ao redor o anúncio | <% definir adrot = Server. CreateObject("MSWC.AdRotator") adrot.Border = "2" Resposta. Write(adrot.GetAdvertisement("ads.txt") ) %> |
| Clicável | Especifica se o anúncio é um hiperlink | <% definir adrot = Server. CreateObject("MSWC.AdRotator") adrot.Clickable = false Resposta. Write(adrot.GetAdvertisement("ads.txt") ) %> |
| TargetFrame | Nome do quadro para exibir o anúncio | <% definir adrot = Server. CreateObject("MSWC.AdRotator") adrot.TargetFrame = "target = '_ blank'" Response.Write (adrot.GetAdvertisement ( "ads.txt")) %> |
Métodos AdRotator ASP
| Método | Descrição | Exemplo |
|---|---|---|
| GetAdvertisement | Retorna HTML que exibe o anúncio na página | <% set adrot=Server. CreateObject("MSWC.AdRotator") Response. Write(adrot.GetAdvertisement("ads.txt") ) %> |