请教clng()出错怎么办?
技术信息(用于支持人员)错误类型:
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'clng'
/lzkw/checkcgindex_admin1.asp, 第 18 行
10 <body>
11 <%
12 SQL="Select * from Staff order by id"
13 set rs=server.createobject("Adodb.Recordset")
14 rs.open SQL,conn,1,1
15 dim i,bgc
16 '分页
17 rs.pagesize=20
18 page=clng(request("page"))
19 if page<1 then page=1
20 if page>rs.pagecount then page=rs.pagecount
21 show rs,page
22 '分页子程序
23 sub show(rs,page)
24 rs.absolutepage=page
25 for i=1 to rs.pagesize%>
.
.
.
65 <%rs.movenext
66 if rs.eof then exit for
67 next
68 end sub%>
<form action="checkcgindex_admin1.asp?" method="post">
<div align="center">
<% if page<>1 then%>
<font size="2"> <a href=<%=path%>?page=1>第一页</a> </font><a href=<%=path%>?page=<%=(page-1)%>>上一页</a>
<%end if
if page<>rs.pagecount then%>
<a href=<%=path%>?page=<%=(page+1)%>>下一页</a> <a href=<%=path%>?page=<%=rs.pagecount%>>最后一页</a>
<%end if%>
<font color="#336699">输入页次
<input type="text" name="page" size="3">
页次 </font><font color=red><%=page%>/<%=rs.pagecount%></font> [ <a href="staff_manage.asp">返回</a> ] <br>
80 </form>
81 </body>