I think it can be done though.
In fpdbrgn1.inc, change the code between lines 214 and 227, which should start with
select case fp_sMoveType
. . . and end with
end select
. . . and replace all that with . . .
if fp_sMoveType <> "" then
fp_rs.AbsolutePage = fp_sMoveType
end ifThen, in fpdbrgn2.inc, we are going to change everything between the <FORM> and </FORM> tags. Search for those lines, and replace everything inbetween with this code.
%>
<SCRIPT language="javascript">
function changepage(page) {
document.<%=fp_sFormName%>.<%=fp_sFormKey%>.value = page;
document.<%=fp_sFormName%>.submit();
}
</script>
<%
Response.Write "<FORM NAME=""" & fp_sFormName & """ ACTION=""" & fp_sPagePath & """ TARGET=""_self"" METHOD=POST>"
Response.Write "<INPUT TYPE=""hidden"" name=" & Chr(34) & fp_sFormKey & Chr(34) & " value=""3"">"
for index=1 to fp_rs.PageCount
if index = fp_iAbsPage then
Response.Write index & " "
else
Response.Write "<a href=""javascript:changepage("&index&")"">"&index&"</a> "
end if
next
' remember names and values used in query
for each fp_sKey in fp_dictInputs
fp_sVal = fp_dictInputs.Item(fp_sKey)
Response.Write "<INPUT TYPE=HIDDEN NAME=""" & fp_sKey & """ VALUE=""" & fp_sVal & """>"
next
Response.Write "</FORM>"
You never know, it might just work ![]("http://www.frontpagewebmaster.com/ubb/wink.gif")
Vince
------------------
Internet Business Solutions S.L.(Spain)
