ScriptLogic.com: Windows Management…Point, Click, Done

Overview:

This custom script will automatically install /n Software's Email Templates v2.0. For more information on this application, visit the manufacturer's website at http://www.nsoftware.com.

Add these line(s) to Custom Script  2:

; ** /nSoftware - Email Templates 2.0 Auto-Install [Begin] **
; E-mail Templates does not support a command line parameter for quiet install.
; This script requires manually installing E-mail Templates to a PC and
; then copying the installed files (from %windir%\system[32]) to the folder you specify as $SourcePath.
; If the target PC is NT/2000, the user logging on must be admin of the workstation.
if ingroup('Domain Users') and $ConnType='LAN'
  $SourcePath='\\Server1\Installs\EmailTemplates.20'
  $SerialNumber='XXXXXX-0000-XXXX'
  $KeyCode='XXXX-XXXX-XXXX-XXXX'
  $EtKey='$HKCU\Software\nsoftware\et\2.0'
  if comparefiletimes('$DllDir\et.dll','$SourcePath\et.dll')<0 or 1-exist('$DllDir\et.dll')
    ; * Copy Files *
    $FileList='et.dll,ettcl80.dll,init.tcl,et.hlp,et.cnt,msvcrt.dll'
    $DestPath=$DllDir+'\'
    $FileList=$FileList+','
    :CopyFilesLoop
    if len('$FileList')>1
      $File=substr($FileList,1,instr($FileList,',')-1)
      $FileList=substr($FileList,len($File)+2,len($FileList)-len($File)-1)
      $Source=$SourcePath+'\'+$File
      $Dest=$DestPath+'\'+$File
      if comparefiletimes($Dest,$Source)<0 or 1-exist($Dest)
        Copy $Source $Dest
      endif
      goto CopyFilesLoop
    endif
    ; * Let Outlook know a new extension has been installed *
    $AppData=readvalue('$HKCUSM\Windows\Explorer\Shell Folders','AppData')
    $cmdline='$AppData\Microsoft\Outlook\extend.dat'
    Del $cmdline

    ; * Write Registry Values *
    $result=addkey('$EtKey')
    $result=writevalue('$ETkey','*','$KeyCode $SerialNumber','REG_SZ')
    $RegKey='$HKLM\Software\Microsoft\Exchange\Client\Extensions'
    $RegVal='Email Templates'
    $RegExp='4.0;et.dll;1'
    $RegTyp='REG_SZ'
    $result=writevalue('$RegKey','$RegVal','$RegExp','$RegTyp')
    $RegKey='$HKLM\Software\Microsoft\Exchange\Client\Custom Actions'
    $RegVal='activate template'
    $RegExp='4.0;et.dll;2'
    $RegTyp='REG_SZ'
    $result=writevalue('$RegKey','$RegVal','$RegExp','$RegTyp')
    $RegKey='$HKLM\Software\Microsoft\Exchange\Client\Custom Actions'
    $RegVal='reply with template'
    $RegExp='4.0;et.dll;3'
    $RegTyp='REG_SZ'
    $result=writevalue('$RegKey','$RegVal','$RegExp','$RegTyp')
    $RegKey='$HKLM\Software\Microsoft\Exchange\Client\Custom Actions'
    $RegVal='forward through template'
    $RegExp='4.0;et.dll;4'
    $RegTyp='REG_SZ'
    $result=writevalue('$RegKey','$RegVal','$RegExp','$RegTyp')
    $RegKey='$HKLM\Software\Microsoft\Exchange\Client\Extensions'
    $RegVal='Outlook Setup Extension'
    $RegExp='4.0;Outxxx.dll;7;00000000000000;0000000;OutXXX'
    $RegTyp='REG_SZ'
    $result=writevalue('$RegKey','$RegVal','$RegExp','$RegTyp')
    if exist('$DllDir\et.dll') and readvalue('$HKLM\Software\Microsoft\Exchange\Client\Extensions','Email Templates')='4.0;et.dll;1'
      $result=messagebox('/nSoftware Email Templates has been successfully installed/upgraded.','ScriptLogic Notice',4160,5)
    endif ; successfully installed
  endif ; ET not already installed
endif ; LAN connection
; ** /nSoftware - Email Templates 2.0 Auto-Install [End] **