vbscript Classic ASP正则表达式VBScript运行时(0x800A01A8)

Question

好的,这是问题所在:

当我尝试运行以下脚本时收到此错误消息

Dim rg
Dim match

Set rg = New RegExp

rg.Pattern = "Mod Read Access"
rg.Global = True

roles = Session("Roles")
Set match = rg.Test(roles)

它在rg.Test(角色)点窒息.

我怀疑我可能做错了,因为我通常不用asp经典编程.我究竟做错了什么？

Answer 1

代替:

设置匹配= rg.Test(角色)

尝试:

match = rg.Test(角色)

Set用于对象分配.Test方法返回一个布尔而不是一个对象,因此使用Set调用它失败(运行时错误800a01a8是"需要对象").