Error 429 - Utilizando MSComm

[greisy]

Hola a todos, me está dando el error 429 El componente Activex no puede ser creado. Ya he agregado en el registro windows MSCOMM32.OCX y tambien agregado el componente Microsoft Comm Control 6.0 pero nada aca dejo el código:

Public Sub generar(numero)

On Error GoTo cError

Set objComunicar = CreateObject("SMCommLib.MSComm")
'Obj del tipo MSComm para la comunicacion con el puerto serie


cSalir:
Exit Sub

cError:
MsgBox Err.Number & " - " & Err.Description, vbExclamation
GoTo cSalir
End Sub


Justo en la línea de la creación del objeto me da el error. Estoy trabajando en windows xp, visual basic 6.0

Gracias...