Ciclo IF ...ELSE IF

Home

Registrati Logout

Logout

HTML.it forum Archive > Lato server > ASP

nicolal

Sicuramente sbaglio qualcosa perchè l'errore è:

Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03FB)
Previsto 'Loop'
scroll.asp, line 25

è un ciclo if ...else if, lo posto :fagiano:

<%
Do while not Scroll.EOF
sito = scroll("link")
pag = scroll("IDPagina")
%>

<%if sito = ("http://") and pag = ("0") then%>
<%=Scroll("Scroll")%>
<%end if%>

<%else if sito <> ("http://") and pag = ("0") then%>
<a href="<%=(sito)%>" target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>
<%end if%>

<%else if sito = ("http://") and pag <> ("0") then%>
<a href="PAGINA INTERNA"
target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>

<%end if%>
<%end if%>
<%end if%>
<%end if%>
<%
Scroll.movenext
loop
%>

optime

la if...elseif si costruisce cosi'

IF condizione1 THEN
'
ELSEIF condizione2 THEN
'
..
ELSEIF condizioneN THEN
'
END IF

:ciauz:

nicolal

:confused:

Ciao optime

...ma io non ho proprio fatto così?

optime

annamo bbene... :D l'hai scritto tu... puoi ben vedere che non e' proprio
corretto

nicolal

<%
Do while not Scroll.EOF
sito = scroll("link")
pag = scroll("IDPagina")
%>

<%if sito = ("http://") and pag = ("0") then%>
<%=Scroll("Scroll")%>
<%end if%>

<%else if sito <> ("http://") and pag = ("0") then%>
<a href="<%=(sito)%>" target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>
<%end if%>

<%else if sito = ("http://") and pag <> ("0") then%>
<a href="PAGINA INTERNA"
target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>

<%end if%>
<%end if%>
<%end if%>
<%
Scroll.movenext
loop
%>

...sono sicuro che qualcosa è sbagliato, ma dalla mia esperienza non riesco a
vedere cosa :messner: :messner:

optime

piu' che di esperienza mi pare questione di oculistica! :D

hai scritto

if ... then
end if

else if ...then
end if

else if ... then
end if
end if
end if

confrontalo col mio esempio e correggi :ciauz:

nicolal

Vero Optime non me ne ero accorto :fagiano:

Per cui ho fatto:
<%
Do while not Scroll.EOF
sito = scroll("link")
pag = scroll("IDPagina")
%>

<%if sito = ("http://") and pag = ("0") then%>
<%=Scroll("Scroll")%>

<%else if sito <> ("http://") and pag = ("0") then%>
<a href="<%=(sito)%>" target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>

<%else if sito = ("http://") and pag <> ("0") then%>
<a href="PAGINA INTERNA"
target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>

<%end if%>
<%end if%>
<%end if%>
<%
Scroll.movenext
loop
%>

ma ora ... :bhò:

Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A040E)
'Loop' senza 'Do'

optime

ah, ma allora sei recidivo!

elseif senza spazi
un solo end if alla fine

sta' attento

nicolal

:bhò: non mi sgridare :bhò:

okok ho fatto:

<%if Scroll.EOF or Scroll.BOF then%>
Sezione in aggiornamento
<%else%>
<%
Do while not Scroll.EOF
sito = scroll("link")
pag = scroll("IDPagina")
%>

<%if sito = ("http://") and pag = (0) then%>
<%=Scroll("Scroll")%>

<%elseif sito <> ("http://") and pag = (0) then%>
<a href="<%=(sito)%>" target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>

<%elseif sito = ("http://") and pag <> (0) then%>
<a href="http://127.0.0.1/server"
target="<%=scroll("target")%>"><%=Scroll("Scroll")%></a>

<%end if%>
<%end if%>

ma.... :bhò: nada

kalosjo

:biifu:

Un solo end if alla fine......

La serie di condizione If, elseif...... è una sola, quindi un solo end if

nicolal

Si ma io ho anche

<%if Scroll.EOF or Scroll.BOF then%>
Sezione in aggiornamento
<%else%> ............

per cui alla fine devo chiudere 2 IF questo e quello del ciclo

kalosjo

Bene, allora il loop lo devi mettere prima dell'ultimo end if

nicolal

kalosjo and C. :D GRAZIE :unz:

nadia79

Scusate ma io ho scritto

If .... Then
' Codice
Elseif
' Codice
Elseif
' Codice
End if

e mi dice:

Citazione:

Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03EA)
Errore di sintassi
/sitoweb/pages/prova.asp, line 105, column 6
ElseIf
-----^

dove l'errore è proprio su ElseIf.... io uso VBScript forse non è compatibile?

optime

ELSEIF da solo muore

ELSEIF a=1 THEN

:ciauz:

lufo5

codice:

If a=a then
  ...
elseif a=b then
  ...
end if

optime

Citazione:

Originariamente inviato da lufo5
codice:

If a=a then

:oVVoVe: :D

nadia79

Grazie!

:)

lufo5

Citazione:

Originariamente inviato da optime
:oVVoVe: :D

funziona. :D

optime

mi piacerebbe vedere il messaggio di errore che viene emesso a fronte della ELSE
! :D

nadia79

Ciao Tecnologi :D

saprete indicarmi gentilmente uno script per il controllo del campo e-mail?

io ho questo:
codice:

miaStringa = form.newsletter.value;
  if (miaStringa.indexOf("@")==(-1)  || miaStringa.indexOf(".")==(-1)) {
	alert("Inserisci un indirizzo e-mail valido!.")
	form.newsletter.focus();
	return false
  }

ma non riesco a gestire l'estensione finale limitandola a solo 4 caratteri (it
com net info ecc)

Un piccolo aiuto? :)

lufo5

questo va in javascript, non in asp.

Trova la soluzione al tuo problema, cerca tra le guide di HTML.it

ALTRI LINK INTERESSANTI