8 messaggi dal 04 settembre 2002
Salve,
il codice sotto riportato fa una cosa strana: ogni tanto va in loop. Dico ogni tanto perchè non so come mai 99 volte su 100 funziona, ma la volta che non funziona entra in loop.

Tra l'altro non è nemmeno troppo complesso, sono alle prime armi, potreste darmi una mano?
Grazie.

RIPORTO IL CODICE




<%Response.Buffer=True
mydsn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db/nomedbmdb")

'oggetto DB
set rs=server.createobject("adodb.recordset")

rs.CursorLocation = 3

rs.CursorType = 3
%>
<html>
<head>
<title>Controllo Database e redirect</title>
</head>
<body>


<%'controllo l'id più recente
dim flag
strsql="select * from [iArticlesZones] order by articleid DESC"

rs.open strsql,mydsn
flag = false
Do while not (rs.EOF)
if (rs("zoneid")= 1) then
flag = true
Response.Redirect("http://www.amantinitrasporti.com/asppages/anmviewer.asp?a=" & rs("articleid") & "&z=1")
else
rs.MoveNext
end if
loop
'chiudo
rs.close

If not(flag) then
Response.Redirect("http://www.amantinitrasporti.com/asppages/templates/no.asp")
end if

%>
</body>
</html>
Modificato da GiAND1 il 11 novembre 2003 16.38 -
2.584 messaggi dal 14 maggio 2001
Il loop sembra corretto... cosa intendi con entrare in loop?
8 messaggi dal 04 settembre 2002
seoman ha scritto:
Il loop sembra corretto... cosa intendi con entrare in loop?



Che si blocca, nel senso:
questa pagina viene caricata 99 su 100 ma quando si blocca, comincia a caricare e non smette.
Gli operatori dell'hosting dicono che è questo codice che entra in loop infinto.
E io non capisco come può succedere.
In fin dei conti pesco solo un campo dal DB e faccio un redirect...non è che c'è grosso margine d'errore, secondo te ci sono errori di sintassi che non vedo?

Grazie
2.584 messaggi dal 14 maggio 2001
iArticlesZones è una tabella?
Secondo me è tutto corretto... la pagina puoi modificarla così dato che non ti serve la parte Html...

<%
Response.Buffer=True
mydsn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db/nomedbmdb")

'oggetto DB
set rs=server.createobject("adodb.recordset")
rs.CursorLocation = 3
rs.CursorType = 3

'controllo l'id più recente
strsql="select * from iArticlesZones order by articleid DESC"
rs.open strsql,mydsn
Do while not rs.EOF=True
if rs("zoneid")=1 then
rs.close
Response.Redirect ("http://...........?a=" & rs("articleid") & "&z=1")
else
rs.MoveNext
end if
loop

'chiudo
rs.close

Response.Redirect("http://www.amantinitrasporti.com/asppages/templates/no.asp")
%>


Ho tolto il flag perché non ti serviva in quanto se uscivi dal loop il flag era sempre "false"
8 messaggi dal 04 settembre 2002
seoman ha scritto:
iArticlesZones è una tabella?
Secondo me è tutto corretto... la pagina puoi modificarla così dato che non ti serve la parte Html...

<%
Response.Buffer=True
mydsn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("db/nomedbmdb")

'oggetto DB
set rs=server.createobject("adodb.recordset")
rs.CursorLocation = 3
rs.CursorType = 3

'controllo l'id più recente
strsql="select * from iArticlesZones order by articleid DESC"
rs.open strsql,mydsn
Do while not rs.EOF=True
if rs("zoneid")=1 then
rs.close
Response.Redirect ("http://...........?a=" & rs("articleid") & "&z=1")
else
rs.MoveNext
end if
loop

'chiudo
rs.close

Response.Redirect("http://www.amantinitrasporti.com/asppages/templates/no.asp")
%>


Ho tolto il flag perché non ti serviva in quanto se uscivi dal loop il flag era sempre "false"



Grazie :)
in effetti sembra più veloce il tempo di redirect...

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.