You could try a search from what you want - you could always email LvL and remind us of just how slack we are if you like <% else news = tigRS("news") datestamp = tigRS("datestamp") %>

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

<% 'close the news query tigRS.close end if set tigCON = Server.CreateObject("ADODB.Connection") tigCON.Open(DSN) query = "SELECT " & _ "mods_list.id AS id, " & _ "mods_login.name AS author, " & _ "mods_login.email AS author_email, " & _ "mods_list.nmb_comments AS nmb_comments, " & _ "mods_list.game_type AS type, " & _ "mods_list.datestamp AS datestamp, " & _ "mods_list.website AS website, " & _ "mods_list.name AS mod_name, " & _ "mods_list.info AS info " & _ "FROM mods_list INNER JOIN " & _ "mods_login ON " & _ "mods_list.id_login = mods_login.id " & _ "WHERE mods_login.active = 1 and mods_list.active = 1 " & _ "ORDER BY mods_list.datestamp DESC" 'Response.Write("query = [" & query & "]
") page=Request.QueryString("page") If page="" then page = 1 end if pagesize=Request.QueryString("pagesize") If pagesize="" then pagesize = 8 end if 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 if (tigRS.EOF) Then %> There is currently no mods to list, bummer hey :[

You could try a search from what you want, as the front page seems to be having a problem :[ email LvL and let s know of the problem if you like <% end if dim mod_name, website, da_review, sm_jpg, lg_jpg ' Now loop through then all do until tigRS.eof or howmanyrecs>=maxrecs mod_name = tigRS("mod_name") if Cint(tigRS("nmb_comments")) = 0 then comments_to_date = "none yet" else comments_to_date = tigRS("nmb_comments") end if tmp_id = tigRS("id") website = tigRS("website") da_review = tigRS("info") 'check for beta image shots sm_jpg = false lg_jpg = false sm_jpg = ModImageCheckSM(tmp_id) lg_jpg = ModImageCheckLG(tmp_id) %> <% if sm_jpg then %> <% else %> <% end if %> <% if sm_jpg then %> <% else %> <% end if end if %>

	<%=mod_name%> by "><%=tigRS("author")%> (<%=tigRS("type")%>)
	<% if website <> "" then %> website - <% end if %> updated <%=realdate(tigRS("datestamp"))%> - comments (<%=comments_to_date%>)   <%=da_review%>		<% if lg_jpg then %>

<% tigRS.movenext howmanyrecs=howmanyrecs+1 loop ' close, destroy tigRS.close set tigRS=nothing 'close connection tigCON.close ' 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("tig debug counter=[" & counter & "] ") 'Response.Write("right(cstr(counter),1)=[" & right(cstr(counter),1) & "] ") 'i guess this could have been done a lot cleaner, however ... :] --19 feb 00-- if (cint(counter) < 10) or (cint(counter) > 20) then 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 else tmp_group = cstr(counter) & "th" 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=" : More" Response.Write ref ref=" : Last" Response.Write ref end if %>