I'm trying to build a VB6 component that uses the data from "MSWC.BrowserType". But I can't get it to work. I can't instanciate MSWC.BrowserType!!!

This is what I'm trying to do:

Option Explicit

Implements ObjectControl

Private m_oContext As ObjectContext
Private m_oBrowserType As BrowserType.BrowserCap
Private m_strPlatform As String
Private m_strBrowser As String
Private m_strVersion As String
Private m_strMajorVersion As String
Private m_strMinorVersion As String
Private m_strFramesSupport As String
Private m_strTablesSupport As String
Private m_strBackgroundSoundsSupport As String
Private m_strVbscriptSupport As String
Private m_strJavascriptSupport As String
Private m_strCookiesSupport As String

Private Sub ObjectControl_Activate()
Set m_oContext = GetObjectContext()
End Sub
Private Function ObjectControl_CanBePooled() As Boolean
ObjectControl_CanBePooled = False
End Function
Private Sub ObjectControl_Deactivate()
Set m_oContext = Nothing
End Sub


Public Sub GetBrowserInformation()

On Error GoTo ErrHnd

Set m_oBrowserType = m_oContext.CreateInstance("MSWC.BrowserType")

m_strPlatform = m_oBrowserType.Platform
m_strBrowser = m_oBrowserType.Browser
m_strVersion = m_oBrowserType.Version
m_strMajorVersion = m_oBrowserType.Majorver
m_strMinorVersion = m_oBrowserType.Minorver
m_strFramesSupport = m_oBrowserType.Frames
m_strTablesSupport = m_oBrowserType.Tables
m_strBackgroundSoundsSupport = m_oBrowserType.BackgroundSounds
m_strVbscriptSupport = m_oBrowserType.Vbscript
m_strJavascriptSupport = m_oBrowserType.Javascript
m_strCookiesSupport = m_oBrowserType.Cookies

GoTo Leave
ErrHnd:
Err.Raise Err.Number, Err.Source, Err.Description
Leave:
Set m_oBrowserType = Nothing
End Sub

What am I doing wrong?

Please help!! I'm going crazy over this!