有没有办法检查是否定义了VBScript函数？

发布时间：2020-12-15 23:13:08 所属栏目：asp.Net 来源：网络整理

导读：这可能只是一厢情愿的想法… 在调用ASP / VBScript函数之前,有没有办法检查？解决方法这是一个稍微恶作剧的方式,因为它依赖于设置“在错误恢复下一步”,但你可以做这样的事情： On Error Resume NextDim objRef1,objRef2Set objRef1 = GetRef("DoStuff1")I

这可能只是一厢情愿的想法…

在调用ASP / VBScript函数之前,有没有办法检查？

解决方法

这是一个稍微恶作剧的方式,因为它依赖于设置“在错误恢复下一步”,但你可以做这样的事情：

On Error Resume Next
Dim objRef1,objRef2
Set objRef1 = GetRef("DoStuff1")
If objRef1 Is Nothing Then
    Call objRef1
Else
    MsgBox "DoStuff1 is not defined!"
End If

Set objRef2 = GetRef("DoStuff2")
If objRef2 Is Nothing Then
    MsgBox "DoStuff2 is not defined!"
Else
    Call objRef2
End If

Sub DoStuff1
    MsgBox "DoStuff1!"
End Sub

如果您尝试获取指针的子或函数不存在(如DoStuff2的情况),则GetRef的调用将生成异常.然后,您可以检查引用是否按预期设置.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!