大家帮我看看, vbscript 的类型不匹配的问题

[复制链接]

水中de云

电梯直达

1^#

发表于 2010-1-18 09:23:28 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

打开主页是就出现:
Microsoft VBScript 运行时错误错误 '800a000d'
类型不匹配: 'vcount'

/index.asp，行 50
---------------------------------------------------------------------------------------------
代码:














<link rel="Shortcut Icon" href="qianginfo.ico">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="javascript">
window.open ('guanggao.html', 'newwindow', 'height=500, width=600, top=0,left=0, toolbar=no, menubar=no, scrollbars=no, resizable=no,location=no, status=no')
</script>
<%
stats="首页"
dim founderr,errmsg
founderr=false
errmsg=""
if request("page")<>"" then
if not isInteger(request("page")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的日记id参数。"
end if
end if
if founderr then
call diserror()
response.end
else
openadmin
sql="select articlecount,softcount,coolsitescount,friendlinkcount,newscount,diarycount,gbcount from allcount"
set rs=conn.execute(sql)
articlecount=rs("articlecount")
softcount=rs("softcount")
coolsitescount=rs("coolsitescount")
friendlinkcount=rs("friendlinkcount")
newscount=rs("newscount")
diarycount=rs("diarycount")
gbcount=rs("gbcount")
rs.close
set rs=nothing
vcount-----------------------------50行,不知道怎么回事
call top()
call index_nav()
call index_body()
call endpage()
end if
%>

收藏0