When I run following code in debug mode in VB5 on Winnt4, it runs ok. But when I make and EXE and run it, I get Automation Error -2147467259(80004005)

I have IE6


Sub Main()
'Check if ACP pages need review date to be changed.
'In project references need
'1) SHDOCVW.DLL for MS Internet Controls
'2) MSHTML.TLB for MS HTML objects

Dim o As New SHDocVw.InternetExplorer
Dim h As New HTMLDocument
Dim b As New HTMLBody
Dim strHTML As String
Dim pos1 As Integer
Dim pos2 As Integer
o.Visible = False
o.navigate "http://alice.intra.bt.com/minder/networks/"
Set h = o.document
Set b = h.body
strHTML = h.body.innerHTML
pos1 = 0
pos1 = InStr(1, strHTML, "agasheh", 1)
pos2 = 0
pos2 = InStr(1, strHTML, "ghosh", 1)

If pos1 <> 0 Or pos2 <> 0 Then
MsgBox "ACP page needs review date to be checked. Please goto http://alice.intra.bt.com/minder/networks/", vbCritical
End If

Set b = Nothing
Set h = Nothing
Set o = Nothing

End Sub


Any clues ?

Harshad