ASP转DLL问题如何在VB6里使用正则表达式和字典对象

Question

要将ASP中的VBSCRIPT用DLL封装，但不常用VB6，因此有问题想问一下1、如何在VB6中使用正则表达式，在国内外很多网站上找了，看8懂，一种说是在工程栏里找什么，二是直接写DIM ***  AS NEW *****，但都没用。2、在ASP中有字典型脚本对象（Dictionary)，由于想用VB6做DLL组件，封装在VBSCRIPT中写的函数，但不知道VB6里能否实现。或是用其他方式可以做到类似的功能

Answer 1

1.
'引用 microsoft VBScript Regular Expressions 5.5Private Sub Form_Load()
    Dim s As String
    Dim re As New RegExp
    
    s = "2004-08-02 22:22:02"
    
    re.Global = True
    re.Pattern = "\D"
    s = re.Replace(s, "")    MsgBox s
End Sub

Answer 2

2、在ASP中有字典型脚本对象（Dictionary)，由于想用VB6做DLL组件，封装在VBSCRIPT中写的函数，但不知道VB6里能否实现。或是用其他方式可以做到类似的功能可以使用集合，还可以引用microsoft active server pages object library类型库
vb中可以使用asp的内置对象

Answer 3

1、re As New RegExp
用户定义类型未定义……
肯定要“INCLUDE”什么东东，8知道怎么弄2、我引用了该库
在使用中写
    Set dict = Server.CreateObject("Scripting.Dictionary")
    dict.Add "abc", "cda"
    
    Set dict = Nothing
出现424错误。如何写才正确？谢谢指教 ^_^

Answer 4

2、Dim dict As ASPTypeLibrary.????
其中所列出的几个只有一个ScriptingContext在《ASP组件开发指南》中没看到过的
只可能用Dim dict As ASPTypeLibrary.ScriptingContext了……再查资料……

Answer 5

汗了……找了半天发现通过它才能调用ASP内置对象，脚本对象似乎无法调用……

Answer 6

1.工程->引用 
microsoft VBScript Regular Expressions 5.5
2
引用后就可以使用