Sure...
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
Private objContent As ObjectContext
Private objServer As ASPTypeLibrary.Server
Public Sub Class_Initialize ()
Set objContext = GetObjectContext()
Set objServer = objContext.Item ( "Server" )
End Sub
Sen använder du objServer som Server-objektet. Glöm inte att rensa upp efter dig i Class_Terminate() bara... :)
Red.} Kommer fasen inte ihåg vilka libs det var som skuller inkluderas, sitter inte med VB här så jag kan kolla det heller, tyvärr. :l
Jag tror dock att det fanns ett som hette just ASPTypeLibrary, och att det var det enda. Prova. :)
------------------
SPiN, bjorne.w@telia.com
-- Wise men talk because they have something to say; fools, because they have to say something. --
[Redigerat av SPiN den 08 jan 2002]