parameter problem

Jeg har en side hvor jeg får et recordset vist det er meningen hvis der er flere versioner (til den softwareID jeg kom med fra en anden side), skal disse kunne ses via page links, problemt er at jeg mister et eller andet jeg kan sagtens se de første versioner, men det går galt når jeg vil bruge link'ene til side 1,2,3 osv, af versionerne de skal jo page back

Jeg har pastet siden her:

<%@ Language=VBScript %>
<!--#include file="../protect.inc"-->
<SCRIPT id=DebugDirectives runat=server language=javascript>
// Set these to true to enable debugging or tracing
@set @debug=false
@set @trace=false
</SCRIPT>

<%

dim Conn, RS, RSSoft, strSQL, strConnString, myConn
dim strError
dim RSsoftware, RSsoftversion
dim RSsofts

reqSoftwareID = Request.QueryString("SoftwareID")

Page = trim(Request("page"))
if Page = "" then Page = 1

'onpage = ????????

%>
<!--#include file="../../inc/sql.inc"-->
<%
       
'recordset for at få data i grid for SOFTWAREN-----------------------------------------
                StrSQL = "SELECT DISTINCT * from softversion WHERE (SoftwareID = " & reqSoftwareID & ")"
                Set RSsoftware=Server.CreateObject("ADODB.Recordset")
                    RSsoftware.CursorLocation = 2
                    RSsoftware.Open(strSQL), Conn, 1
'                    RSsoftware.MoveFirst
                    'RSsoftware.PageSize = 5
               
                StrSQL = "SELECT * from software WHERE (SoftwareID = " & reqSoftwareID & ")"
                Set RSsofts=Server.CreateObject("ADODB.Recordset")
                    RSsofts.CursorLocation = 2
                    RSsofts.Open(strSQL), Conn, 1
'--------------------------------------------------------------------------------------
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
<LINK rel="stylesheet" type="text/css" href="../../Style.css">
</HEAD>

<BODY>
<H3 align=center>Software version Administration</H3>
<P align=center>
</P>
<%
'her fyldes data fra recoordset RSsoftware---------------------------------------------
dim bgcolor

Response.Write "<TABLE border=0 align=center cellspacing=0 cellpadding=3>"
                Response.Write"<tr>"
                Response.Write "<th colspan=3>Versioner: "
                Response.Write RSsofts("Software")
                Response.Write "</th>"
                Response.Write"</tr>"
               
                if (RSsoftware.BOF and RSsoftware.EOF) then
                Response.Write "<TR BGCOLOR=#EEEEEE>"
               
                Response.Write "<td align=left width=420px colspan=3>"
                Response.Write ("Der er ingen versioner til denne software")
               
                Response.Write "<td align=left width=30px >"
                Response.Write "<a href=nyversioner.asp?SoftwareID="& reqSoftwareID &">"
                Response.Write "Ny"
                Response.Write "</a>"
                else
               
    RSsoftware.AbsolutePage = page
            for i = 1 to RSsoftware.PageSize
                if RSsoftware.EOF then exit for
                If i Mod 2 = 1 Then bgcolor = "#EEEEEE" Else bgcolor = "#FFFFFF"

                Response.Write "<TR BGCOLOR="
                Response.Write bgcolor
                Response.Write ">"
               
                Response.Write "<td align=left width=380px>"
                Response.Write RSsoftware("SoftwareVersion")
           
                Response.Write "<td align=left width=40px>"
                Response.Write "<a href=retversioner.asp?SoftVersionID="& RSsoftware("SoftVersionID") &">"
                Response.Write "Ret"
                Response.Write "</a>"
               
               
                Response.Write "<td align=left width=30px>"
                Response.Write "<a href=nyversioner.asp?SoftwareID="& reqSoftwareID &">"
                Response.Write "Ny"
                Response.Write "</a>"
                                   
                'Response.Write "<td align=left width=50px>"
                'Response.Write "<a href=sletversioner.asp>"
                'Response.Write "SLET"
                'Response.Write "</a>"
               
                    rowcount = rowcount + 1
                    RSsoftware.MoveNext

            next
                end if
                Response.Write "</tr>"
                Response.Write "</table>"
               
                Response.Write("<p align=center>")
                if RSsoftware.PageCount <> 1 then
                for i = 1 to RSsoftware.PageCount
                Response.Write "<a href='versioner.asp?onpage=on&page=" & i & "'>" & i & "</a>&nbsp"
                           
                Next
                end if
                Response.Write("</p>")
               
                Response.Write ("<A href=java script:%20history.go(-1)>Tilbage..</A>")

'LUKKER DATABASE FORBINDELSEN SAMT RECORDSET-------------------------------------------
RSsoftware.Close
Set RSsoftware = NOTHING

Conn.Close
set Conn = Nothing

%>
</BODY></HTML>