******
Microsoft VBScript 运行时错误 错误 '800a0006'
溢出
/603711/4.asp，行 24
******
这是我做网站的时候出的错误
怎么解决???? 我在网上搜了 有好多是吧错误的类型写出来了
但没有写怎么解决 各位能不能帮我解决一下啊????
下边是源代码
*********
<%
function w (a,b,c)
a = request.QueryString("biaozhun") """"bianzhun""""是我数据库中的一个表里的字段
b = request.QueryString("fenshu") """"fenshu """" 同上
c = 100
if(abs((a-b)/a )< 0.05) then ****24行****
w = c
else
if(b>a) then
w = 100+(((b-a)/a-0.05)/0.05)*2
else
w = 100-(((a-b)/a-0.05)/0.05)*2
end if
end if
end function
%>
<%
dim q
q = w(a,b,c)
response.write(q)
%>
*********
急啊!!!!!!!!!!!!!!!

[此贴子已经被作者于2007-9-5 0:09:52编辑过]