<% sqlstmt = "Select DISTINCT PrayFor, PrayerRequest FROM bookofintentions WHERE Active = 'Yes' and Display = 'Yes' ORDER BY PrayFor" rs.open sqlstmt, conn, 3, 3 total = rs.RecordCount %> Christian Family Book of Intentions
Book of Intentions

Book of Intentions

Book of Intentions Home

Write your entry in the Book


<%IF RS.EOF THEN%> Currently there are no names. <%Else DIM J DO WHILE NOT RS.EOF j = j +1 IF int(j/2) = J/2 then Response.Write "" Else Response.Write "" End If rs.MoveNext Loop End if rs.Close set rs = nothing conn.Close set conn = nothing %>
Pray ForPrayer Request
" & rs("PrayFor") & " " & rs("PrayerRequest") & "
" & rs("PrayFor") & " " & rs("PrayerRequest") & "