VBScript-Klassen mit "Konstruktor"

Montag, 29.6.2015, 08:14 > daMax

Ich hasse VBS, ich hasse VBA. Dennoch werde ich gezwungen, mich damit herum zu schlagen. Gerade habe ich einen Trick entdeckt, den ich bis gerade eben noch nicht kannte: man kann Script-Klassen so etwas Ahnliches wie einen Konstruktor verpassen. Dazu deklariert man die entsprechende Methode als default und instantiiert das Objekt dann mit einer total seltsamen Syntax:

Class Person
Private m_Age
Private m_Name

Public Default Function Init(Name, Age)
m_Name = Name
m_Age = Age

Set Init = Me
End Function

Public Property Get Name
Name = m_Name
End Property
Public Property Let Name(v)
m_Name = v
End Property

Public Property Get Age
Age = m_Age
End Property
Public Property Let Age(v)
m_Age = v
End Property
End Class

Dim TheDude : Set TheDude = (New Person)("John",40)

Sachen gibt's...