20/01/2002, 01:36
|
| | | Fecha de Ingreso: enero-2002
Mensajes: 106
Antigüedad: 23 años, 3 meses Puntos: 0 | |
| Re: script para hacer un intercambio de banners
Aqui te va algo haber si te sirve
lo siguiente se llamara banners.asp
<HTML>
<HEAD><TITLE> Mostrando Banners</TITLE></HEAD>
<BODY>
<CENTER><H1>Mostrando Distintos Banners!</H1></CENTER>
<HR>
<%
Set MyAd=Server.CreateObject("MSWC.AdRotator" ;)
MyAd.TargetFrame= "TARGET=""blank""" ;
%>
<CENTER><%= MyAd.GetAdvertisement("banners.txt") %></CENTER>
</BODY>
</HTML>
este otro se llamara banners.txt
REDIRECT adredir.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
banner1.gif
http://www.lavariable.com
El Portal de Programación en Internet
60
banner2.gif
http://www.webklan.com.ar
WebKlan
20
banner3.gif
http://www.neolatina.com
Neolatina
20
y llamas a los banners asi:
el archivo se llamara asi adredir.asp
<%
Response.AppendToLog Request.QueryString("url")
Response.Redirect Request.QueryString("url")
%>
Bye ;) |