---

Er der nogen som ved hvordan jeg kan få Microsoft scriptcontrol til at bruge mine egne klasser?

Jeg har prøvet med :


Dim shobj As New Class1

shobj.Mitnavn = "Test"

Set sc = New ScriptControl
sc.Language = "VBScript"
sc.AddObject "sh", shobj, False

sc.AddCode "msgbox mitnavn" 'Test mit object

Set sc = Nothing
Set shobj = Nothing


Men det virker ikke, er der nogen som lige kan se hvad jeg gør forkert? Jeg vil bare have mit object til at være en del af scriptsproget.

---

Det er fordi du mangler at vælge true i shared object :

sc.AddObject "sh", shobj, true

Dette betyder at dit object vil være kendt unden at skulle skrive dit object's navn hver gang. Så skulle dit eksempel virke.

Hvis du ikke vil have dit object til at være shared så skal du skrive :

sc.AddObject "sh", shobj, false

sc.AddCode "msgbox sh.mitnavn"

---

Tak.

Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.