on error resume next 
If Not(IsObject(CreateObject("JavaWebStart.IsInstalled"))) Then 
  javawsInstalled = 0 
Else 
  javawsInstalled = 1 
End If