<%
Function Ceil(value)
    Dim return
    return = int(value)
    Cei2=value-return
    if Cei2>0 then
        Ceil = return + 1
    else
        Ceil=value+0'就是Ceil=value多一個+0 強調返回值為數字型
    End If
End Function

Response.write Ceil(1.01)
%>