ho questo blocco di codice:


<%
'definisco paramentro url
Dim LineNum
LineNum = request("LineNum")
%>
<%
Dim pdn1_clone
Dim pdn1_clone_numRows

Set pdn1_clone = Server.CreateObject("ADODB.Recordset")
pdn1_clone.ActiveConnection = MM_conn_STRING
pdn1_clone.Source = "SELECT * FROM PDN1_clone WHERE LineNum = LineNum ORDER BY data_movim DESC"
'oitm.ItemName, oitm.ItemCode, causali.codice, causali.descrizione FROM pdn1_clone, causali, oitm WHERE pdn1_clone.causale = causali.codice and pdn1_clone.ItemCode = oitm.ItemCode order by pdn1_clone.data_movim

pdn1_clone.CursorType = 0
pdn1_clone.CursorLocation = 2
pdn1_clone.LockType = 1
pdn1_clone.Open()

pdn1_clone_numRows = 0
%>


<%
While ((Repeat1__numRows <> 0) AND (NOT pdn1_clone.EOF))
%>
<%
'definisco var per filtri
Dim articolo
articolo = (pdn1_clone.Fields.Item("ItemCode").Value)

Dim causale
causale = (pdn1_clone.Fields.Item("causale").Value)

%>
<%
Dim articoli
Dim articoli_numRows

Set articoli = Server.CreateObject("ADODB.Recordset")
articoli.ActiveConnection = MM_conn_STRING
articoli.Source = "SELECT oitm.ItemCode, oitm.ItemName FROM oitm WHERE oitm.ItemCode = " & articolo & ""

articoli.CursorType = 0
articoli.CursorLocation = 2
articoli.LockType = 1
articoli.Open()

articoli_numRows = 0
%>
<%
Dim causali
Dim causali_numRows

Set causali = Server.CreateObject("ADODB.Recordset")
causali.ActiveConnection = MM_conn_STRING
causali.Source = "SELECT causali.codice, causali.descrizione FROM causali WHERE causali.codice = " & causale & ""

causali.CursorType = 0
causali.CursorLocation = 2
causali.LockType = 1
causali.Open()

causali_numRows = 0
%>

HTML HTML

<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
pdn1_clone.MoveNext()
Wend
%>



E fin qui ci siamo...

se la tabella ha almeno un record tutto va liscio ma se la tabella è vuota mi da un errore visto che le variabili dei rs successivi a pdn1_clone sono generate dal rs pnd1_clone stesso.

in PHP esiste l' istruzione BRAK che stoppa un ciclo in ASP invece??

ce qualche istruzione??

Grazie