Helpme!!!|

novato_15 · #1 (**permalink**) 02/04/2002, 18:14

saben que pasa aqui que no reacciona:
--------------------------------

Código:

 &lt;% Mi primer ASP
Archivo: prueba1.asp
Creador: Andres
E-mail: [email protected] %&gt;

&lt;html&gt;
&lt;body&gt;
&lt;%@ Language = VBScript %&gt;
&lt;%
Option Explicit

Dim L

if L=14
Response.Write(&quot;La L es igual a 14&quot;)
Else
Response.Write(&quot;La L es distinta a 14&quot;)
End If
%&gt;

&lt;hr&gt;

&lt;%
Dim L

For L=1 to 5
Response.Write(&quot;Esto se repite 5 veces&quot;)
Next
%&gt;

&lt;hr&gt;

&lt;%
Dim L

For L = 1 to 10 step 2
Response.Write (&quot;Esto se repite de dos en dos, L = &quot; &amp; L)
Next
%&gt; 
 
&lt;hr&gt;

&lt;%
Dim L

For L = 10 to 1 step -1
Response.Write (&quot;L = &quot; &amp; L)
Next
%&gt; 
 
&lt;hr&gt;

&lt;%
Dim L

L = 0 'inicializa L igual a 0

While L &lt;&gt; 10 'repita mientras L sea distinto a 10
Response.Write (&quot;L = &quot; &amp; L) 'muestra por pantalla el valor de L
L = L + 1 'incrementa L en uno
Wend 
%&gt;
&lt;% Response.End %&gt;
&lt;hr&gt;
&lt;/body&gt;
&lt;/html&gt;

ashketchum · #2 (**permalink**) 02/04/2002, 18:36

Claro, mira tienes muchos errores, a ver, en donde estas dando entrada a la variable L, no veo que declares ningun valor o tengas algun Input que recoja el valor y lo ponga en la variable, ahora el codigo

Código:

&lt;%@ Language = VBScript %&gt;

debe ir en la primera linea de la página ASP tambien en la seguna linea el Option Explicit tiene que ir en la segunda linea, lo demás se ve bien, pero ponle un valor a L

saludos y suerte

@sh (Maestro Pokémon trajo esto para tí) :-p <br> Fomentando el concepto "INTERNET"

ashketchum · #3 (**permalink**) 02/04/2002, 18:45

Por cierto; aqui esta tu código reparado, segun yo, copialo y checalo. a ver si te sirvio

Código:

&lt;%@ Language = VBScript %&gt;
&lt;%' Mi primer ASP
'Archivo: prueba1.asp
'Creador: Andres
'E-mail: [email protected] %&gt;

&lt;html&gt;
&lt;body&gt;
&lt;%
'Option Explicit

Dim L
L = 5
if L=14 then 
Response.Write(&quot;La L es igual a 14&quot;)
Else
Response.Write(&quot;La L es distinta a 14&quot;)
End If
%&gt;

&lt;hr&gt;

&lt;%

For L = 1 to 5
Response.Write(&quot;Esto se repite 5 veces&quot;)
Next
%&gt;

&lt;hr&gt;

&lt;%

For L = 1 to 10 step 2
Response.Write (&quot;Esto se repite de dos en dos, L = &quot; &amp; L)
Next
%&gt; 

&lt;hr&gt;

&lt;%
For L = 10 to 1 step -1
Response.Write (&quot;L = &quot; &amp; L)
Next
%&gt; 

&lt;hr&gt;

&lt;%
L = 0 'inicializa L igual a 0

While L &lt;&gt; 10 'repita mientras L sea distinto a 10
Response.Write (&quot;L = &quot; &amp; L) 'muestra por pantalla el valor de L
L = L + 1 'incrementa L en uno
Wend 
%&gt;
&lt;% Response.End %&gt;
&lt;hr&gt;
&lt;/body&gt;
&lt;/html&gt;

saludos y suerte

@sh (Maestro Pokémon trajo esto para tí) :-p <br> Fomentando el concepto "INTERNET"