Richiamo un campo più volte ma lo visualizza solo la prima volta

[mmaria]

C'è qualcosa che non funzione in questo script?


<%
set rsafoto = Server.CreateObject("ADODB.Recordset")
rsafoto.ActiveConnection = MM_connDUclassified_STRING
rsafoto.Source = "SELECT * FROM afoto WHERE AD_ID = " + Replace(rsafoto__MMColParam, "'", "''") + ""
rsafoto.CursorType = 0
rsafoto.CursorLocation = 2
rsafoto.LockType = 3
rsafoto.Open()
rsafoto_numRows = 0
%>
<%
Dim Repeat1__numRows
Repeat1__numRows = -1
Dim Repeat1__index
Repeat1__index = 0
rsafoto_numRows = rsafoto_numRows + Repeat1__numRows
%>