[RESOLVED] runtime error 429

[dlern]

I am recieving a error on running

active X component cannot create object

Private Sub Form_Load()
 
    Dim oShell As IWshShell_Class[B]
    [COLOR=Sienna]Set oShell = New IWshShell_Class[/COLOR][/B]
   
    oShell.RegWrite "HKLM\Software\OTN\InstallLocation", App.Path, "REG_SZ"
 
   Set oShell = Nothing
    Shell App.Path & "\IWKSoft.exe", vbNormalFocus
    End
End Sub

Error occurs at the line indicated on debuging

only occurs on some compters under windows 98, but not others

I have reinstalled stdole2.tlb and wshom.ocx
when trying run regsvr32 \windows\system\STDOLE2.TLB I get a message stating

stdole2.tlb was loaded, but the dllRegisterService entry point was not found
stdole2.tlb does not appear to be a dll or ocx file

any idea of why?