;This is my first script for  vb6 application just trying
; 2-02-2006: Dexta

;---------------------------------------
;Start

  !define MUI_PRODCT "ADO Total Show Beta Ver. 1.0.0"
  !define MUI_FILE "ADOTotalsShow"
  !define MUI_VERSION ""
  !define MUI_BRANDINGTEXT "ADO Total Show Beta Ver. 1.0.0"
  CRCCheck On

  !include Library.nsh
  !include "${NSISDIR}\Contrib\Modern UI\system.nsh" 

;-------------------------------------------------
;General

  OutFile "ATS Setup.exe"
  ShowInstDetails "show"
  ShowUninstDetails "nevershow"
  SetCompressor "bzip2"

  !define MUI_ICON "modern-install-blue.ico"
  !define MUI_UNICON "modern-uninstall-blue.ico"
  !define MUI_SPECIALBITMAP "nsis.ico"

  Var ALREADY_INSTALLED

  InstallDir "$PROGRAMFILES\${MUI_FILE}"

;---------------------------------------------------------------------
;UI Configuration

  !define MUI_WELCOMEPAGE
  !define MUI_DIRECTORYPAGE
  !define MUI_ABORTWARNING
  !define MUI_UNINSTALLER
  !define MUI_UNCONFIRMPAGE
  !define MUI_FINISHPAGE

;---------------------------------------------------------------------
 Section "-Install VB6 runtimes"
 
   ;Add code here that sets $ALREADY_INSTALLED to a non-zero value if the
   ;application is already installed. For example:

  SetOutPath "$INSTDIR"

   IfFileExists "$INSTDIR\${MUI_FILE}.exe" 0 new_installation
   ;Replace MyApp.exe with your application filename
     StrCpy $ALREADY_INSTALLED 1
   new_installation:

   file "${MUI_FILE}.exe"
   file "Parts.mdb" 

   !insertmacro InstallLib REGDLL $ALREADY_INSTALLED REBOOT_NOTPROTECTED \
     "msvbvm60.dll" "$SYSDIR\msvbvm60.dll" "$SYSDIR"
   !insertmacro InstallLib REGDLL $ALREADY_INSTALLED REBOOT_PROTECTED \
     "oleaut32.dll" "$SYSDIR\oleaut32.dll" "$SYSDIR"
   !insertmacro InstallLib REGDLL $ALREADY_INSTALLED REBOOT_PROTECTED \
     "olepro32.dll" "$SYSDIR\olepro32.dll" "$SYSDIR"
   !insertmacro InstallLib REGDLL $ALREADY_INSTALLED REBOOT_PROTECTED \
     "comcat.dll"   "$SYSDIR\comcat.dll"   "$SYSDIR"
   !insertmacro InstallLib DLL    $ALREADY_INSTALLED REBOOT_PROTECTED \
     "asycfilt.dll" "$SYSDIR\asycfilt.dll" "$SYSDIR"
   !insertmacro InstallLib TLB    $ALREADY_INSTALLED REBOOT_PROTECTED \
     "stdole2.tlb"  "$SYSDIR\stdole2.tlb"  "$SYSDIR"
   !insertmacro InstallLib TLB    $ALREADY_INSTALLED REBOOT_PROTECTED \
     "msado26.tlb"  "$SYSDIR\msado26.tlb"  "$SYSDIR"
   !insertmacro InstallLib REGDLL    $ALREADY_INSTALLED REBOOT_PROTECTED \
     "msdatgrd.ocx"  "$SYSDIR\msdatgrd.ocx"  "$SYSDIR"

;Create dsktop shortcut
;----------------------------------------------------------------------

  CreateShortCut "$DESKTOP\${MUI_FILE}.lnk" "$INSTDIR\${MUI_FILE}.exe"  "${MUI_SPECIALBITMAP}"
 
;create start-menu items
  CreateDirectory "$SMPROGRAMS\${MUI_FILE}"
  CreateShortCut "$SMPROGRAMS\${MUI_FILE}\Uninstall.lnk" "$INSTDIR\Uninstall.exe" "${MUI_UNICON}" "$INSTDIR\Uninstall.exe" 0
  CreateShortCut "$SMPROGRAMS\${MUI_FILE}\${MUI_FILE}.lnk" "$INSTDIR\${MUI_FILE}.exe"  "${MUI_SPECIALBITMAP}" "$INSTDIR\${MUI_FILE}.exe" 0

;write uninstall information to the registry
  WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${MUI_FILE}" "DisplayName" "${MUI_FILE} (remove only)"
  WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${MUI_FILE}" "UninstallString" "$INSTDIR\Uninstall.exe"
 
  WriteUninstaller "$INSTDIR\Uninstall.exe"
 
SectionEnd
 
 Section "-un.Uninstall VB6 runtimes"
 
   !insertmacro UnInstallLib REGDLL SHARED NOREMOVE "$SYSDIR\msvbvm60.dll"
   !insertmacro UnInstallLib REGDLL SHARED NOREMOVE "$SYSDIR\oleaut32.dll" 
   !insertmacro UnInstallLib REGDLL SHARED NOREMOVE "$SYSDIR\olepro32.dll"
   !insertmacro UnInstallLib REGDLL SHARED NOREMOVE "$SYSDIR\comcat.dll" 
   !insertmacro UnInstallLib DLL    SHARED NOREMOVE "$SYSDIR\asycfilt.dll"
   !insertmacro UnInstallLib TLB    SHARED NOREMOVE "$SYSDIR\stdole2.tlb"
   !insertmacro UninstallLib TLB    SHARED NOREMOVE "$SYSDIR\msado26.tlb"
   !insertmacro UninstallLib REGDLL SHARED NOREMOVE "$SYSDIR\msdatgrd.ocx"
;Delete Files 
   RMDir /r "$INSTDIR\*.*"    
 
;Remove the installation directory
   RMDir "$INSTDIR"
  
;Delete Start Menu Shortcuts
   Delete "$DESKTOP\${MUI_FILE}.lnk"
   Delete "$SMPROGRAMS\${MUI_FILE}\*.*"
   RmDir  "$SMPROGRAMS\${MUI_FILE}"

;Delete Uninstaller And Unistall Registry Entries
   DeleteRegKey HKEY_LOCAL_MACHINE "SOFTWARE\${MUI_FILE}"
   DeleteRegKey HKEY_LOCAL_MACHINE "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\${MUI_FILE}"  
  
 SectionEnd