还有，分页的下拉列表跳转JavaScript代码可以改一下，document.all是IE独有的，虽然目前FireFox1.04已经兼容了，但其它浏览器还不支持。 警告： 非标准的属性 document.all。请使用 W3C 的标准形式 document.getElementById() 。 源文件：http://60.9.10.75:82/kehu/photo/ 行：362 <script>function sed(){var x=document.all.page.options[document.all.page.selectedIndex].value;window.location='?fl=&page='+x;}</script> 话说回来，你实际上没必要用document.all 或 document.getElemnetById，请看如下： <%

..............

function showpage(cnt,size,page,url)'//分页函数 cot=int(cnt/size) ca=cnt mod size if ca<>0 then cot=cot+1 else cot=cot end if if page>cot then page=cot response.Write"共"&cnt&"条&nbsp;每页"&size&"条&nbsp;页次:"&page&"/"&cot&"&nbsp;" if page=1 then response.Write "[首页]&nbsp;[上页]&nbsp;" else response.Write"[<a href="&url&"page=1>首页</a>]&nbsp;[<a href="&url&"page="&page-1&">上页</a>]&nbsp;" end if if page=cot then response.Write "[下页]&nbsp;[尾页]&nbsp;" else response.Write"[<a href="&url&"page="&page+1&">下页</a>]&nbsp;[<a href="&url&"page="&cot&">尾页</a>]&nbsp;" end if response.Write"<select name='page' onchange='sed(this.value)'>" for i=1 to cot response.Write"<option value='"&i&"'" if i=page then response.Write "selected" response.Write">"&i&"</option>" next response.Write"</select>" response.Write"<script>" response.Write"function sed(page){" response.Write"window.location='" & url & "page='+page;" response.Write"}</script>" end function %>

[此贴子已经被作者于2005-5-16 10:40:11编辑过]

[此贴子已经被作者于2005-5-16 10:55:03编辑过]