' *** Hermes Application script include file. ***

    '   Hermes functions and procedures for writing to the Registry and copying files

   Declare function HMSCopyFile Lib     "SMSCFG.DLL"    (Target$, Destination$)As Integer
    Declare function HMSAppsRegRead Lib  "SMSCFG.DLL"    (TargetRegistryPath$, Value$)As Integer
   Declare function HMSAppsRegWrite Lib "SMSCFG.DLL"    (TargetRegistryPath$, Value$)As Integer
   Declare function RegWrite Lib        "SMSCFG.DLL"    (TargetRegistryPath$, Value$)As Integer
    Declare function WK_SETUP Lib        "SMSSETUP.DLL"  ( AppRegName$, StfFile$ ) As Integer
    '  User Profile Routines
    Declare Function WriteProfileString Lib "Kernel" (lpApplicationName$, lpKeyName$, lpString$) As Integer
    Declare Function WritePrivateProfileString Lib "Kernel" (lpApplicationName$, lpKeyName$, lpString$, lplFileName$) As Integer
    Declare Function WinExec Lib "Kernel" ( lpCmdLine As String, nCmdShow As Integer) As Integer
    Declare Function IsTask Lib "Kernel" ( htask As Integer) As Integer
    Declare Function GetActiveWindow LIb "User" () As Integer
    Declare Function GetWindowTask Lib "User" ( hWnd As Integer ) As Integer
    Declare Function MessageBox Lib "User" ( hWnd As Integer, lpText As String, lpCaption As String, wType As Integer) As Integer
    Declare Function GetWindowText Lib "User" ( hWnd As Integer, RestartTitle As String, RestartTitleLen As Integer ) As Integer