[AccessD] Unbound Report Only Showing Last Record

Julie Reardon-Taylor prosoft6 at hotmail.com
Tue Jul 12 14:48:18 CDT 2005


Set db = CurrentDb()
Here is the code, if this helps!


Set rs = db.OpenRecordset("qryLocalAuthority", dbOpenDynaset)
i = 0

rs.MoveFirst
If Forms![frmmembersearch]![Index] = 0 Then

    Do Until i = Forms![frmmembersearch]![ListCount]
        MsgBox i
        MsgBox rs!Field0
        Reports![rptMemberSearch]![Text0] = rs![Field0]
        rs.MoveNext
        i = i + 1
    Loop




Julie Reardon-Taylor
PRO-SOFT OF NY, INC.
44 Public Square Suite #5
Watertown, NY 13601
Phone/Fax: (315) 785-0319
www.pro-soft.net





More information about the AccessD mailing list