No se si ahora se pueda pero en la versión anterior que tengo yo solo puede elegirse un banner, por página y después de un buen rato de no mover el admentor ayer le estuve dando a ver como funcionaría metiendole un aleatorio en asp y quedo más o menos asi
este es el codigo html
<!------- AdMentor Ad code ------------->
<script language="JavaScript"> var code = '';
var now = new Date();
var nIndex = now.getTime();
document.write('<s' + 'cript src="http://localhost/eradio/compras/admentor/scriptinject.asp?B=6&nocache=' + nIndex + '">');
document.write('</' + 's' + 'cript>');
</script>
<script language="JavaScript">document.write(code);</script>
<noscript><a href="http://localhost/eradio/compras/admentor/adclick.asp?B=6">
<img border="0" src="http://localhost/eradio/compras/admentor/adserve.asp?B=6"></a></noscript>
<!--------- End AdMentor Ad code --------------->
esto es por cada banner, luego tome cada código y lo meti en una bd de Access
y coloqué este asp aleatorio
<%
Dim oConn, RS, registros, registro_azar
' Conectamos a la BD.
Set oConn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("\fpdb\publicidades.mdb")&";"
' seleccionamos todos los registros.
sql = "SELECT * FROM tablita"
RS.OPEN sql, oConn, 1, 1
'los contamos con RecordCount.
registros = rs.RecordCount
'Iniciamos randomize para que funcione el Rnd.
Randomize()
'obtenemos un regitro al azar.
registro_azar = Int((registros * Rnd))
'Vamos hasta el registro.
RS.Move(registro_azar)
'Mostramos donde estamos parados.
response.write RS(0)
'Cerramos y limpiamos (como siempre).
RS.Close
oConn.close
Set RS = Nothing
Set oConn = Nothing
%>
Esto obliga a que se consulte un registro aleatorio y entonces muestra cada banner, registra las vistas, clicks y todas esas cosas
Opiniones?
reclamos?
Coloquen su mensaje
