function pageto(a) dim tbl tbl = "<%=request.querystring("tbl")%>" window.location.href = "?tbl="& tbl &"&page="& a end function
<form name="form1" onsubmit="pageto(document.forms['form1'].pgto.value)"> 把代码拷贝进来 </form>