GetRef捕获方法？

Question

我刚刚发现了VBScript的GetRef函数，该函数获取对其参数命名的函数的引用。有没有办法以这种方式获得对方法的引用？我有一种预感，即VBScript不提供这样做所需的绑定的复杂性，但它肯定会很好。

Answer 1

不，GetRef不支持类方法。

Answer 2

有一种解决方法，请参阅我的回答here

这里是完整的样本

Const forReading = 1, forWriting = 2, forAppending = 8, CreateFile = True
Set my_obj = CreateObject("Scripting.FileSystemObject").OpenTextFile("c:\temp\test.txt", forWriting, CreateFile)

Function my_function(my_obj, method, text)
  command = "my_obj." & method & " """ & text & """"
  ExecuteGlobal command
End Function

'make a reference to our function
Set proc = GetRef("my_function") 
'and call it with parameters, the first being the method invoked
Call proc(my_obj, "WriteLine", "testing")

'cleanup'
my_obj.Close
Set my_obj = Nothing