最近在学习regexp，从百度中看到下面代码
<%
Function RegExpTest(patrn, strng)
Dim regEx,Match,Matches
Set regEx = new RegExp
regEx.Pattern = patrn ＇设置模式。
regEx.IgnoreCase = True ＇设置是否区分字符大小写。
regEx.Global = True ＇设置全局可用性。
Set Matches = regEx.Execute(strng) ＇执行搜索。
For Each Match in Matches ＇遍历匹配集合。
RetStr = RetStr & "Match found at position "
RetStr = RetStr & Match.FirstIndex & ". Match Value is ＇"
RetStr = RetStr & Match.Value & "＇." & "<BR>"
Next
RegExpTest = RetStr
End Function
response.write RegExpTest("[ij]s.", "IS1 Js2 IS3 is4")
%>
在自己机器中却出现下面问题：
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 编译器错误 错误 '800a0408'
无效字符
/a.asp，行3
Dim regEx,Match,Matches。
-------------^
后来我把Dim regEx,Match,Matches后面的两个变量去掉，结果又出现regEx.Pattern = patrn ＇设置模式。
-------------^
我又在百度中搜了一下，有人说脚本引擎版本太低，建议IE升至6。
可我的IE已经是6.0 sp1,vbscript版本为5.6.0.7426。
请各位大虾专家权威人士帮助解决一下
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 编译器错误 错误 '800a0408'
无效字符
/a.asp，行5
regEx.Pattern = patrn ＇设置模式。
-------------
??????????????究竟为什么^
