VB Problem

Parky_007

New Member
I get a Run-time error 424: Object Required, when using this code:
Code:
Public Sub Form_Load()
MainBrowser.Navigate ("about:blank")

If Dir$(App.Path & "\detail.dll") = "detail.dll" Then
    Open App.Path & "\detail.dll" For Input As #1
    sDetail = Input(1, #1)
    Close #1
Else
    sDetail = "0"
End If

If sDetail = "0" Then
    High.Checked = True
    Low.Checked = False
End If
If sDetail = "1" Then
    High.Checked = False
    Low.Checked = True
End If


If Dir$(App.Path & "\plugin.dll") = "plugin.dll" Then
    Open App.Path & "\plugin.dll" For Input As #2
    sJava = Input(1, #2)
    Close #2
Else
    sJava = "0"
End If
If sJava = "0" Then
    Java0.Checked = True
    Java1.Checked = False
    Java2.Checked = False
    Java3.Checked = False
End If
If sJava = "1" Then
    Java0.Checked = False
    Java1.Checked = True
    Java2.Checked = False
    Java3.Checked = False
End If
If sJava = "2" Then
    Java0.Checked = False
    Java1.Checked = False
    Java2.Checked = True
    Java3.Checked = False
End If
If sJava = "3" Then
    Java0.Checked = False
    Java1.Checked = False
    Java2.Checked = False
    Java3.Checked = True
End If

End Sub
Please can anyone correct this code?
 
Back
Top