Programación Web y Scripting > JavaScript

 Archivo Global.asa

(1/1)

sony_cari:
Mi problema es que quiero que el fondo de todas mis pantallas del programa cambie según la estación del año en la que estemos, con 4 fondos diferentes. El mismo fondo para todas mis pantallas. Pero creo un objeto session y no me funciona, no me salen los fondos. Si me puedierais decir si he echo algo mal lo agradecería. Os adjunto mi archivo global.asa y como llamo en la página principal .asp:

GLOBAL.ASA:
<script language="VBScript" RUNAT="server">
   Server.ScriptTimeout=900
   Sub Session_OnStart
      session("MiSesion")=1

      dim mes
      mes=month(now)
      select case mes
         case 1:
            session("fondo")="invierno.jpg"
         case 2:
            session("fondo")="invierno.jpg"            case 3:
            session("fondo")="primavera.jpg"
         case 4:
            session("fondo")="primavera.jpg"
         case 5:
            session("fondo")="primavera.jpg"
         case 6:
            session("fondo")="verano.jpg"
         case 7:
            session("fondo")="verano.jpg"
         case 8:
            session("fondo")="verano.jpg"
         case 9:
            session("fondo")="otoño.jpg"
         case 10:
            session("fondo")="otoño.jpg"
         case 11:
            session("fondo")="otoño.jpg"
         case 12:
            session("fondo")="invierno.jpg"
      end select
   Sub Session_onEnd
   end sub
</script>

PRINCIPAL.ASP:
<html>
   <head>
      <title>
         Restaurante Pizzeria
      </title>
   </head>
  <%
  response.write("<body background="&session("fondo")&">")
   %>
------
------

    </body>
</html>

Kev:
Talvez unas pequeñas modificaciones:

Global.asa

--- Código: Text --- &#60;script Language=&#34;VBScript&#34; RUNAT=Server&#62;Sub Session_OnStart()  session(&#34;MiSesion&#34;)=1  dim mes  mes=month(now)  select case mes    case 1:      session(&#34;fondo&#34;)=&#34;invierno.jpg&#34;    case 2:      session(&#34;fondo&#34;)=&#34;invierno.jpg&#34;     case 3:      session(&#34;fondo&#34;)=&#34;primavera.jpg&#34;    case 4:      session(&#34;fondo&#34;)=&#34;primavera.jpg&#34;    case 5:      session(&#34;fondo&#34;)=&#34;primavera.jpg&#34;    case 6:      session(&#34;fondo&#34;)=&#34;verano.jpg&#34;    case 7:      session(&#34;fondo&#34;)=&#34;verano.jpg&#34;    case 8:      session(&#34;fondo&#34;)=&#34;verano.jpg&#34;    case 9:      session(&#34;fondo&#34;)=&#34;otoño.jpg&#34;    case 10:      session(&#34;fondo&#34;)=&#34;otoño.jpg&#34;    case 11:      session(&#34;fondo&#34;)=&#34;otoño.jpg&#34;    case 12:      session(&#34;fondo&#34;)=&#34;invierno.jpg&#34;  end selectEnd Sub&#60;/script&#62;  
Creo que notaste que que no hay el end sub del Session_OnStart, porque tambien escribiste un Session_onEnd (quizas sin querer)


Otras modificaciones:

Principal.asp

--- Código: Text --- &#60;html&#62;&#60;head&#62;  &#60;title&#62;Restaurante Pizzeria&#60;/title&#62;&#60;/head&#62;&#60;%Response.Write(&#34;&#60;body background='&#34; & session(&#34;fondo&#34;) & &#34;'&#62;&#34;)%&#62;&#60;/body&#62;&#60;/html&#62;  
Aunque yo preferiria escibirlo de la siguiente manera

--- Código: Text --- &#60;html&#62;&#60;head&#62;  &#60;title&#62;Restaurante Pizzeria&#60;/title&#62;&#60;/head&#62;&#60;body background=&#34;&#60;%=session(&#34;fondo&#34;)%&#62;&#34;&#62;&#60;/body&#62;&#60;/html&#62;  
En este ultimo escribiste todo junto &session("fondo")&, cosa que deberia ser

--- Código: Text ---& session(&#34;fondo&#34;) &  con espacios, verifica que los paths de las imagenes son validos y las imagenes se encuentran ahi.

Viste que sangrar el codigo y ordenar te ayuda a detectar tus errores, y no solo eso hace que tu codigo sea entendible y facil de manipular, es una buena costumbre, pero tabula con la tecla TAB y no con espacios(los espacios te complican en ves de ayudarte)

NOTA.-  :huh: No que este post deberia ir en la sección ASP......... :blink:

Salu2
 :comp:  :hola:

sony_cari:
:gracias:  :gracias:  :gracias:  :gracias:  :gracias:  :gracias:  :gracias:

MIL Y UNA GRACIAS, ME HAS AYUDADO MUCHO, LA VERDAD ES QUE ERA UNA TONTERÍA!

P.D.-> Respecto a lo de estar en el otro foro tienes razón, pero es que soy nueva aquí y no lo encontré  :P

Navegación

[0] Índice de Mensajes

Ir a la versión completa