asp-classic - 得到 VBSCRIPT 错误：“800a03f4”

Question

我有以下功能：

Function getNext10(num)
    pageLen = len(num)
    If pageLen = 1 Then
        next10 = 10
    ElseIf pageLen>1 Then
        pageRem = 10
        pageTen = right(num, 1)
        next10 = num + pageRem - pageTen
    End If
    getNext10 = next10
End Function

如果我使用该功能，我会收到以下错误：

Microsoft VBScript 编译“800a03f4”

'如果'预期

/display/paging.asp，第 27 行

结束函数
------^

该功能有什么问题？

Answer 1

尝试这个：

Function getNext10(num)
    pageLen = len(num)
    If pageLen = 1 Then
        next10 = 10
    End If
    If pageLen>1 Then
        pageRem = 10
        pageTen = right(num, 1)
        next10 = num + pageRem - pageTen
    End If
    getNext10 = next10
End Function