ASP函数-向上取整

<%
Function Ceil(value)
Dim return
return = int(value)
Cei2=value-return
if Cei2>0 then
Ceil = return + 1
else
Ceil=value+0 '+0 强调返回值为数字型
End If
End Function
'测试
Response.write Ceil(2.01)
%>