hjælp til asp script billed galleri

Hey, jeg har dette her billedgalleri script som jeg har lavet om fra 9 billeder til 4, gjordt bilelderne mindre og sat sidetal under billderne hvor de før stod oven over. fjernet noget hvor den fortalte om hvor mange bilelder der er i galleriet og på hvor mange sider...

men nu virker dte ikke så godt. der er 6 billeder i galleriet. men når jeg trykker på side 2 så kommer der de same billeder frem. en som kan rette scriptet sådan det virker ?

se galleri: www.recort.dk/galleri/galleri.asp

<%
page = trim(Request.QueryString("page"))
start = trim(Request.QueryString("start"))

strPathInfo = Request.ServerVariables("PATH_INFO")
strPhysicalPath = Server.MapPath(strPathInfo)


Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(strPhysicalPath)
Set objFolder = objFile.ParentFolder
Set objFolderContents = objFolder.Files


row_count = 0
row = 1
max_row = 2
count = 1
If NOT start <> "" then
Start = 1
End If
%>


<p align=center>


<%


info_page = 0
info_page_count = 0
info_Count = - 1



%>
<div align="center">
<table border="0" cellspacing="3" cellpadding="3">
  <tr>

<%
For Each objFileItem in objFolderContents

If objFileItem.Name = "galleri.asp" then
Else
 
  If CLng(count) < CLng(start) then
  count = count + 1
  Else

  If CLng(row) => CLng(max_row) And row_count = 2 then
  Else
 
 
 
 
  If row_count > 1 then
    response.write "<tr>"
    row_count = 0
    row = row + 1
  End If

 
  Response.write " <td><a href='"
  Response.Write(objFileItem.Name)
  Response.write "'><img border=0 src='" & (objFileItem.Name) & "' alt='" & (objFileItem.Name) & "' width=214 height=160></a>"
  row_count = row_count + 1   
  count = count + 1
End If
End If
End If
Next
%>

    </td>
  </tr>
</table>
  <% If page <> "" then
response.write "side <a href='galleri.asp'>1</a> "
else
Response.write "side 1 "
End If
For Each objFileItem in objFolderContents
info_page = info_page + 1
if info_page = 4 then
info_page_count = info_page_count + 1
info_page = 0
End If
If info_page = 0 then
If trim(info_page_count + 1) = trim(page) then
response.write info_page_count + 1 & " "
Else
response.write "<a href='galleri.asp?start=" & info_count & "&page=" & info_page_count + 1 & "'>" & info_page_count + 1 & "<a> "
End If
End If
Next
%>