Ver Mensaje Individual
  #2 (permalink)  
Antiguo 24/06/2010, 14:42
Avatar de Adler
Adler
Colaborador
 
Fecha de Ingreso: diciembre-2006
Mensajes: 4.671
Antigüedad: 18 años
Puntos: 126
Respuesta: hola a todos, me gustaria saber si se puede hacer que las imagenes vayan r

Hola

Se puede hacer. Nada de Flash

Código ASP:
Ver original
  1. <%
  2. Dim Imagen, Url, Texto, i, j
  3. Dim ristra_img, ristra_url, ristra_texto
  4. Imagen = 0
  5. Url = 1
  6. Texto = 2
  7.  
  8. 'conexión
  9. SQL ="SELECT Imagen, Url, Texto FROM RotadorBanner"
  10. set rs = oConn.Execute(SQL)
  11.  
  12. registros = rs.getrows()
  13. rs.Close
  14. Set rs = Nothing
  15. oConn.Close
  16. Set oConn = Nothing
  17.  
  18. ristra_img = ""
  19. ristra_url = ""
  20. ristra_texto = ""
  21. For i = 0 to UBound(registros,2)
  22. ristra_img = ristra_img & "'" & registros(Imagen,i) &"',"
  23. ristra_url = ristra_url & "'" & registros(Url,i) &"',"
  24. ristra_texto = ristra_texto & "'" & registros(Texto,i) &"',"
  25. Next 'i
  26. %>
  27.  
  28.  
  29. <html>
  30. <head>
  31. <title>Rotador de publicidad</title>
  32.  
  33. <script type="text/javaScript">
  34. var publicidad = [<%=Left(ristra_img,Len(ristra_img)-1)%>];
  35. var direccion = [<%=Left(ristra_url,Len(ristra_url)-1)%>];
  36. var texto = [<%=Left(ristra_texto,Len(ristra_texto)-1)%>];
  37.  
  38. var contador = 0;
  39. var url = "";
  40.  
  41. function RotarPublicidad(){
  42.     if(contador > 4)
  43.  
  44.       contador = 0;
  45.  
  46.         document.getElementById("publicidad").innerHTML = "<img src="+publicidad[contador]+" width='62px' height='12px' title="+texto[contador]+" border='0px' />"
  47.         url = direccion[contador];
  48.         document.getElementById("texto").innerHTML = texto[contador];
  49.         document.getElementById("publicidad_peq_4").style.background="#FFFFFF";
  50.         document.getElementById("publicidad_peq_"+contador).style.background="#FF0000";
  51.     if (contador >= 1)
  52.         document.getElementById("publicidad_peq_"+(contador-1)).style.background="#FFFFFF";  
  53.  
  54.       contador++;
  55.     }
  56.  
  57.  
  58. timer = setInterval("RotarPublicidad()", 2000);
  59. window.onload = RotarPublicidad;
  60.  
  61. </script>
  62. </HEAD>
  63. <body>
  64. <a href="#" onClick="window.open(url,'Ventana');">
  65. <div id="publicidad"></div>
  66. </a>
  67.  
  68. <div id="texto"></div>
  69.  
  70. <table border="1">
  71. <tr>
  72. <%
  73. For j = 0 to UBound(registros,2)
  74. %>
  75. <td id="publicidad_peq_<%=j%>">
  76. <img src="<%=registros(Imagen,j)%>" />
  77. </td>
  78. <%
  79. Next 'j
  80. %>
  81. </tr>
  82. </table>
  83. </body>
  84. </html>

Suerte
__________________
Los formularios se envían/validan con un botón Submit
<input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" />