You could try a search for what you want - or maybe email LvL and remind us just how slack we are. <% else news = tigRS("news") datestamp = tigRS("datestamp") %>

	..::LvL beta - <%=realdate(datestamp)%><%=site_status()%>
	<%=news%>

<% 'close the news query tigRS.close end if set tigCON = Server.CreateObject("ADODB.Connection") tigCON.Open(DSN) query = "SELECT beta_mappers.email AS m_email, " & _ "beta_mappers.name AS m_name, beta_levels.title AS l_title, " & _ "beta_mappers.homepage AS homepage, " & _ "beta_levels.download AS l_download, " & _ "beta_levels.nmb_comments l_comments, " & _ "beta_levels.str_type AS l_type, " & _ "beta_levels.moreinfo AS l_moreinfo, " & _ "beta_levels.id AS l_id, " & _ "beta_levels.info AS l_info " & _ "FROM beta_mappers INNER JOIN " & _ "beta_levels ON beta_mappers.id = beta_levels.author " & _ "WHERE (beta_mappers.active = 1) AND (beta_levels.active = 1) " & _ "ORDER BY beta_levels.datestamp DESC" page=Request.QueryString("page") If page="" then page = 1 end if pagesize=Request.QueryString("pagesize") If pagesize="" then pagesize = 8 end if set tigRS = tigCON.Execute(query) if (tigRS.EOF) Then %> The server is telling me there is currently no levels to list for review :[

Now we know that can't be right so maybe email LvL and we will give the HD a kick. <% else set tigRS=Server.CreateObject("ADODB.Recordset") tigRS.cursorlocation=aduseclient tigRS.cachesize=5 tigRS.open query,DSN tigRS.movefirst tigRS.pagesize=pagesize maxpages=cint(tigRS.pagecount) maxrecs=cint(tigRS.pagesize) tigRS.absolutepage=page howmanyrecs=0 howmanyfields=tigRS.fields.count -1 dim l_id, l_download, l_moreinfo, sm_jpg, lg_jpg, da_review, homepage 'Now loop through then all do until tigRS.eof or howmanyrecs>=maxrecs l_id = tigRS("l_id") l_download = tigRS("l_download") l_moreinfo = tigRS("l_moreinfo") homepage = tigRS("homepage") if Cint(tigRS("l_comments")) = 0 then comments_to_date = "none yet" else comments_to_date = tigRS("l_comments") end if da_review = tigRS("l_info") 'check for beta image shots sm_jpg = false lg_jpg = false sm_jpg = BetaImageCheckSM(l_id) lg_jpg = BetaImageCheckLG(l_id) %> <% if sm_jpg then %> <% else %> <% end if %> <% if sm_jpg then %> <% else 'no homepage %>" border="0"> <% end if else %>" border="0"> <% end if end if %>

	<%=tigRS("l_title")%> by "><%=tigRS("m_name")%> (<%=tigRS("l_type")%>)
	download <% if l_moreinfo <> "" then %> - moreinfo <% end if %> - comments (<%=comments_to_date%>)   <%=InsertHyperlinks(da_review, false)%>		<% if lg_jpg then if (instr(1,homepage,"http://") > 0) and (len(homepage) > 8) then 'a homepage! %>" border="0"> Authors www site

<% tigRS.movenext howmanyrecs=howmanyrecs+1 loop ' close, destroy tigRS.close set tigRS=nothing 'close connection tigCON.close 'close the EOF if statment end if ' Now make the page _ of _ hyperlinks Call PageNavBar sub PageNavBar() pad=" " scriptname=request.servervariables("script_name") %>

Summary groups -	<% if (page mod 10) = 0 then counterstart = page - 9 else counterstart = page - (page mod 10) + 1 end if counterend = counterstart + 9 if counterend > maxpages then counterend = maxpages end if if counterstart <> 1 then ref="First : " Response.Write ref ref="Previous : " Response.Write ref end if 'Response.Write "[" for counter = counterstart to counterend if counter >= 8 then pad="" end if 'DEBUG 'Response.Write("page=[" & page & "] ") 'Response.Write("counter=[" & counter & "] ") 'Response.Write("right(cstr(counter),1)=[" & right(cstr(counter),1) & "] ") 'Response.Write("right(cstr(counter),2)=[" & right(cstr(counter),2) & "] ") 'i guess this could have been done a lot cleaner, however ... :] if len(counter) > 1 then if (right(cstr(counter),1) = "1") and (not right(cstr(counter),2) = "1") then tmp_group = cstr(counter) & "st" elseif (right(cstr(counter),1) = "2") and (not right(cstr(counter),2) = "1") then tmp_group = cstr(counter) & "nd" elseif (right(cstr(counter),1) = "3") and (not right(cstr(counter),2) = "1") then tmp_group = cstr(counter) & "rd" else tmp_group = cstr(counter) & "th" end if else if (right(cstr(counter),1) = "1") then tmp_group = cstr(counter) & "st" elseif (right(cstr(counter),1) = "2") then tmp_group = cstr(counter) & "nd" elseif (right(cstr(counter),1) = "3") then tmp_group = cstr(counter) & "rd" else tmp_group = cstr(counter) & "th" end if end if if cstr(counter) <> cstr(page) then ref="" & pad & tmp_group & "" else ref="" & pad & tmp_group & "" end if response.write ref if counter <> counterend then response.write " " end if next 'Response.Write "]" if counterend <> maxpages then ref=" : Next" Response.Write ref ref=" : Last" Response.Write ref end if %>