'***********************************************************************************************************
'Module Name  : au_requirements.js
'Date Written : 12/21/2000
'Company      : CRKInteractive
'Copyright    : (c) 2000, 2001 CRKInteractive All Rights Reserved
'Purpose      : To provide a set of functions that can check requirements for a CRKI produced training AU
'Revisions    :
'***********************************************************************************************************
'***********************************************************************************************************
'Constants
'***********************************************************************************************************

'***********************************************************************************************************
'Variables
'***********************************************************************************************************

'***********************************************************************************************************
'Startup Code
'***********************************************************************************************************

'***********************************************************************************************************
'Functions
'***********************************************************************************************************
Function HasActiveXBLN(strApplication, strVersion)
  On Error Resume Next
  HasActiveXBLN = False
  strApplication = Replace(strApplication, " ", "")
  HasActiveXBLN = IsObject(CreateObject(strApplication & "." & strApplication & "." & CInt(strVersion)))
End Function