Installing Microsoft Data Access Components: Difference between revisions

From NSIS Wiki
Jump to navigationJump to search
m (Updated author and download links, and changed format of some pages.)
(Replaced "!insertmacro PRINT" with "DetailPrint" (no need for a PRINT macro).)
 
(8 intermediate revisions by 4 users not shown)
Line 1: Line 1:
{{PageAuthor|zimsms}}
== Description ==
== Description ==
I have supplied the following since most people installing the Microsoft Data Access Components, only choose to install the English version, which may be incorrect for their end users machine. This also contains the proper error handling, which most installs do not use.  
I have supplied the following since most people installing the Microsoft Data Access Components, only choose to install the English version, which may be incorrect for their end users machine. This also contains the proper error handling, which most installs do not use.  
Line 4: Line 6:
This 'Template' can be used for pretty much any Microsoft download with a few modifications. I have cut most of the 'extra' languages out to keep the example simple.  
This 'Template' can be used for pretty much any Microsoft download with a few modifications. I have cut most of the 'extra' languages out to keep the example simple.  


THIS IS NOT A COMPLETE SCRIPT, IT IS INTENDED TO ASSIST THOSE REQUIRING THE INSTALLATION OF the MMICROSOFT DATA ACCESS COMPONENTS FOR A MULTI-LANGUAGE INSTALL.  
THIS IS NOT A COMPLETE SCRIPT, IT IS INTENDED TO ASSIST THOSE REQUIRING THE INSTALLATION OF THE MICROSOFT DATA ACCESS COMPONENTS FOR A MULTI-LANGUAGE INSTALL.  


== Defines ==  
== Defines ==  
Line 17: Line 19:
; French
; French
!define URL_MDAC28_1036 "http://download.microsoft.com/download/d/8/6/d86f23a0-628a-4fea-9907-5ef1304d8124/MDAC_TYP.EXE"
!define URL_MDAC28_1036 "http://download.microsoft.com/download/d/8/6/d86f23a0-628a-4fea-9907-5ef1304d8124/MDAC_TYP.EXE"
; Portuguese
!define URL_MDAC28_2070 "http://download.microsoft.com/download/e/6/a/e6ad297b-7207-4bf0-9322-b8f8cf893346/MDAC_TYP.EXE"
; Portuguese (Brazil)
; Portuguese (Brazil)
!define URL_MDAC28_1046 "http://download.microsoft.com/download/1/a/4/1a47382d-18f3-41d4-b92c-74db27d5944b/MDAC_TYP.EXE"
!define URL_MDAC28_1046 "http://download.microsoft.com/download/1/a/4/1a47382d-18f3-41d4-b92c-74db27d5944b/MDAC_TYP.EXE"
Line 71: Line 75:
     SetOutPath "$PLUGINSDIR"
     SetOutPath "$PLUGINSDIR"
     file /r "${MDAC28FILESDIR}\MDAC_TYP_1033.exe"
     file /r "${MDAC28FILESDIR}\MDAC_TYP_1033.exe"
     !insertmacro PRINT "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
     DetailPrint "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
     Banner::show /NOUNLOAD "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
     Banner::show /NOUNLOAD "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
     nsExec::ExecToStack '"$PLUGINSDIR\MDAC_TYP_1033.exe" /q /C:"setup /QNT"'
     nsExec::ExecToStack '"$PLUGINSDIR\MDAC_TYP_1033.exe" /q /C:"setup /QNT"'
Line 85: Line 89:
     Goto lbl_DownloadRequired
     Goto lbl_DownloadRequired
     lbl_DownloadRequired:
     lbl_DownloadRequired:
     !insertmacro PRINT "$(DESC_DOWNLOADING1) $(DESC_SHORTMDAC28)..."
     DetailPrint "$(DESC_DOWNLOADING1) $(DESC_SHORTMDAC28)..."
     MessageBox MB_ICONEXCLAMATION|MB_YESNO|MB_DEFBUTTON2 "$(DESC_MDAC28_DECISION)" /SD IDNO IDYES +2 IDNO 0
     MessageBox MB_ICONEXCLAMATION|MB_YESNO|MB_DEFBUTTON2 "$(DESC_MDAC28_DECISION)" /SD IDNO IDYES +2 IDNO 0
     abort
     abort
     ; "Downloading Microsoft .Net Framework"
     ; "Downloading Microsoft Data Access Components 2.8"
     AddSize 153600
     AddSize 153600
     nsisdl::download /TRANSLATE "$(DESC_DOWNLOADING)" "$(DESC_CONNECTING)" \
     nsisdl::download /TRANSLATE "$(DESC_DOWNLOADING)" "$(DESC_CONNECTING)" \
Line 96: Line 100:
     Pop $0
     Pop $0
     StrCmp "$0" "success" lbl_continue
     StrCmp "$0" "success" lbl_continue
     !insertmacro PRINT "$(DESC_DOWNLOADFAILED) $0"
     DetailPrint "$(DESC_DOWNLOADFAILED) $0"
     Abort
     Abort


     lbl_continue:
     lbl_continue:
       !insertmacro PRINT "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
       DetailPrint "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
       Banner::show /NOUNLOAD "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
       Banner::show /NOUNLOAD "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
       nsExec::ExecToStack '"$PLUGINSDIR\MDAC_TYP.exe" /q /C:"setup /QNT"'
       nsExec::ExecToStack '"$PLUGINSDIR\MDAC_TYP.exe" /q /C:"setup /QNT"'
Line 121: Line 125:
       StrCmp "$MDAC28_RETURN_CODE" "error" lbl_Error
       StrCmp "$MDAC28_RETURN_CODE" "error" lbl_Error
       StrCmp "$MDAC28_RETURN_CODE" "timeout" lbl_TimeOut
       StrCmp "$MDAC28_RETURN_CODE" "timeout" lbl_TimeOut
       ; It's a .Net Error
       ; It's a MDAC Error
       StrCmp "$MDAC28_RETURN_CODE" "4101" lbl_Error_DuplicateInstance
       StrCmp "$MDAC28_RETURN_CODE" "4101" lbl_Error_DuplicateInstance
       StrCmp "$MDAC28_RETURN_CODE" "4097" lbl_Error_NotAdministrator
       StrCmp "$MDAC28_RETURN_CODE" "4097" lbl_Error_NotAdministrator
Line 128: Line 132:


     lbl_Error_DuplicateInstance:
     lbl_Error_DuplicateInstance:
     !insertmacro PRINT "$(ERROR_MDAC28_DUPLICATE_INSTANCE)"
     DetailPrint "$(ERROR_MDAC28_DUPLICATE_INSTANCE)"
     GoTo lbl_Done
     GoTo lbl_Done


     lbl_Error_NotAdministrator:
     lbl_Error_NotAdministrator:
     !insertmacro PRINT "$(ERROR_NOT_ADMINISTRATOR)"
     DetailPrint "$(ERROR_NOT_ADMINISTRATOR)"
     GoTo lbl_Done
     GoTo lbl_Done


     lbl_Error_InvalidPlatform:
     lbl_Error_InvalidPlatform:
     !insertmacro PRINT "$(ERROR_INVALID_PLATFORM)"
     DetailPrint "$(ERROR_INVALID_PLATFORM)"
     GoTo lbl_Done
     GoTo lbl_Done


     lbl_TimeOut:
     lbl_TimeOut:
     !insertmacro PRINT "$(DESC_MDAC28_TIMEOUT)"
     DetailPrint "$(DESC_MDAC28_TIMEOUT)"
     GoTo lbl_Done
     GoTo lbl_Done


     lbl_Error:
     lbl_Error:
     !insertmacro PRINT "$(ERROR_MDAC28_INVALID_PATH)"
     DetailPrint "$(ERROR_MDAC28_INVALID_PATH)"
     GoTo lbl_Done
     GoTo lbl_Done


     lbl_FatalError:
     lbl_FatalError:
     !insertmacro PRINT "$(ERROR_MDAC28_FATAL)[$MDAC28_RETURN_CODE]"
     DetailPrint "$(ERROR_MDAC28_FATAL)[$MDAC28_RETURN_CODE]"
     GoTo lbl_Done
     GoTo lbl_Done


     lbl_Done:
     lbl_Done:
     !insertmacro PRINT "$(FAILED_MDAC28_INSTALL)"
     DetailPrint "$(FAILED_MDAC28_INSTALL)"
     lbl_NoError:
     lbl_NoError:
     lbl_IsSilent:
     lbl_IsSilent:
Line 182: Line 186:
FunctionEnd
FunctionEnd
</highlight-nsis>
</highlight-nsis>
== Macros ==
== Macros ==
<highlight-nsis>
<highlight-nsis>
Line 208: Line 213:
I test for IsMDAC28Installed by defining a custom function overriding GUI Init, and set the section selection accordingly.  
I test for IsMDAC28Installed by defining a custom function overriding GUI Init, and set the section selection accordingly.  
Hopefully this was of use to you.  
Hopefully this was of use to you.  
Cheers!  
Cheers!


Page author: [[User:zimsms|zimsms]]
[[Category:Code Examples]]

Latest revision as of 10:02, 28 July 2006

Author: zimsms (talk, contrib)


Description

I have supplied the following since most people installing the Microsoft Data Access Components, only choose to install the English version, which may be incorrect for their end users machine. This also contains the proper error handling, which most installs do not use.

This 'Template' can be used for pretty much any Microsoft download with a few modifications. I have cut most of the 'extra' languages out to keep the example simple.

THIS IS NOT A COMPLETE SCRIPT, IT IS INTENDED TO ASSIST THOSE REQUIRING THE INSTALLATION OF THE MICROSOFT DATA ACCESS COMPONENTS FOR A MULTI-LANGUAGE INSTALL.

Defines

; Microsoft Data Access Components 2.8
; English
!define URL_MDAC28_1033 "http://download.microsoft.com/download/c/d/f/cdfd58f1-3973-4c51-8851-49ae3777586f/MDAC_TYP.EXE"
; German
!define URL_MDAC28_1031 "http://download.microsoft.com/download/a/b/9/ab965707-fbab-48bc-8c33-a4cfd44255c6/MDAC_TYP.EXE"
; Spanish
!define URL_MDAC28_1034 "http://download.microsoft.com/download/b/3/c/b3cbdb35-80a5-4fa2-a9af-ad84d1757f6b/MDAC_TYP.EXE"
; French
!define URL_MDAC28_1036 "http://download.microsoft.com/download/d/8/6/d86f23a0-628a-4fea-9907-5ef1304d8124/MDAC_TYP.EXE"
; Portuguese
!define URL_MDAC28_2070 "http://download.microsoft.com/download/e/6/a/e6ad297b-7207-4bf0-9322-b8f8cf893346/MDAC_TYP.EXE"
; Portuguese (Brazil)
!define URL_MDAC28_1046 "http://download.microsoft.com/download/1/a/4/1a47382d-18f3-41d4-b92c-74db27d5944b/MDAC_TYP.EXE"
; Chinese (Simplified)
!define URL_MDAC28_2052 "http://download.microsoft.com/download/8/b/6/8b6198c0-fe96-4811-9d81-d5c76dd5fea8/MDAC_TYP.EXE"

If you need one not listed above you will have to visit the Microsoft Download site, select the language you are after and scan the page source to obtain the link.

Variables

Var "LANGUAGE_DLL_TITLE"
Var "LANGUAGE_DLL_INFO"
Var "URL_MDAC28"
Var "OSLANGUAGE"
Var "MDAC28_RETURN_CODE"

Language Strings

  LangString DESC_REMAINING ${LANG_ENGLISH} " (%d %s%s remaining)"
  LangString DESC_PROGRESS ${LANG_ENGLISH} "%d.%01dkB/s" ;"%dkB (%d%%) of %dkB @ %d.%01dkB/s"
  LangString DESC_PLURAL ${LANG_ENGLISH} "s"
  LangString DESC_HOUR ${LANG_ENGLISH} "hour"
  LangString DESC_MINUTE ${LANG_ENGLISH} "minute"
  LangString DESC_SECOND ${LANG_ENGLISH} "second"
  LangString DESC_CONNECTING ${LANG_ENGLISH} "Connecting..."
  LangString DESC_DOWNLOADING ${LANG_ENGLISH} "Downloading %s"
  LangString DESC_SHORTMDAC28 ${LANG_ENGLISH} "Microsoft Data Access Components 2.8"
  LangString DESC_LONGMDAC28 ${LANG_ENGLISH} "Microsoft Data Access Components 2.8"
  LangString DESC_MDAC28_DECISION ${LANG_ENGLISH} "$(DESC_SHORTMDAC28) is required.$\nIt is strongly advised that you install$\n$(DESC_SHORTMDAC28) before continuing.$\nIf you choose to continue, you will need to connect$\nto the internet before proceeding.$\nWould you like to continue with the installation?"
  LangString SEC_MDAC28 ${LANG_ENGLISH} "$(DESC_SHORTMDAC28) "
  LangString DESC_INSTALLING ${LANG_ENGLISH} "Installing"
  LangString DESC_DOWNLOADING1 ${LANG_ENGLISH} "Downloading"
  LangString DESC_DOWNLOADFAILED ${LANG_ENGLISH} "Download Failed:"
  LangString ERROR_MDAC28_DUPLICATE_INSTANCE ${LANG_ENGLISH} "The $(DESC_SHORTMDAC28) Installer is already running."
  LangString ERROR_NOT_ADMINISTRATOR ${LANG_ENGLISH} "$(DESC_000022)"
  LangString ERROR_INVALID_PLATFORM ${LANG_ENGLISH} "$(DESC_000023)"
  LangString DESC_MDAC28_TIMEOUT ${LANG_ENGLISH} "The installation of the $(DESC_SHORTMDAC28) has timed out."
  LangString ERROR_MDAC28_INVALID_PATH ${LANG_ENGLISH} "The $(DESC_SHORTMDAC28) Installation$\nwas not found in the following location:$\n"
  LangString ERROR_MDAC28_FATAL ${LANG_ENGLISH} "A fatal error occurred during the installation$\nof the $(DESC_SHORTMDAC28)."
  LangString FAILED_MDAC28_INSTALL ${LANG_ENGLISH} "The installation of $(PRODUCT_NAME) will$\ncontinue. However, it may not function properly$\nuntil $(DESC_SHORTMDAC28)$\nis installed."

Section

  Section $(SEC_MDAC28) SECMDAC28
    SectionIn RO
    IfSilent lbl_IsSilent
    !define MDAC28FILESDIR "Common\Files\MSNET"
    StrCpy $MDAC28_RETURN_CODE "0"
!ifdef MDAC28_ONCD_1033
    StrCmp "$OSLANGUAGE" "1033" 0 lbl_Not1033
    SetOutPath "$PLUGINSDIR"
    file /r "${MDAC28FILESDIR}\MDAC_TYP_1033.exe"
    DetailPrint "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
    Banner::show /NOUNLOAD "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
    nsExec::ExecToStack '"$PLUGINSDIR\MDAC_TYP_1033.exe" /q /C:"setup /QNT"'
    pop $MDAC28_RETURN_CODE
    Banner::destroy
    SetRebootFlag true
    Goto lbl_NoDownloadRequired
    lbl_Not1033:
!endif
; Insert Other language blocks here
 
    ; the following Goto and Label is for consistencey.
    Goto lbl_DownloadRequired
    lbl_DownloadRequired:
    DetailPrint "$(DESC_DOWNLOADING1) $(DESC_SHORTMDAC28)..."
    MessageBox MB_ICONEXCLAMATION|MB_YESNO|MB_DEFBUTTON2 "$(DESC_MDAC28_DECISION)" /SD IDNO IDYES +2 IDNO 0
    abort
    ; "Downloading Microsoft Data Access Components 2.8"
    AddSize 153600
    nsisdl::download /TRANSLATE "$(DESC_DOWNLOADING)" "$(DESC_CONNECTING)" \
       "$(DESC_SECOND)" "$(DESC_MINUTE)" "$(DESC_HOUR)" "$(DESC_PLURAL)" \
       "$(DESC_PROGRESS)" "$(DESC_REMAINING)" \
       /TIMEOUT=30000 "$URL_MDAC28" "$PLUGINSDIR\MDAC_TYP.exe"
    Pop $0
    StrCmp "$0" "success" lbl_continue
    DetailPrint "$(DESC_DOWNLOADFAILED) $0"
    Abort
 
    lbl_continue:
      DetailPrint "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
      Banner::show /NOUNLOAD "$(DESC_INSTALLING) $(DESC_SHORTMDAC28)..."
      nsExec::ExecToStack '"$PLUGINSDIR\MDAC_TYP.exe" /q /C:"setup /QNT"'
      pop $MDAC28_RETURN_CODE
      Banner::destroy
      SetRebootFlag true
      ; silence the compiler
      Goto lbl_NoDownloadRequired
      lbl_NoDownloadRequired:
 
      ; obtain any error code and inform the user ($MDAC28_RETURN_CODE)
      ; If nsExec is unable to execute the process,
      ; it will return "error"
      ; If the process timed out it will return "timeout"
      ; else it will return the return code from the executed process.
      StrCmp "$MDAC28_RETURN_CODE" "" lbl_NoError
      StrCmp "$MDAC28_RETURN_CODE" "0" lbl_NoError
      StrCmp "$MDAC28_RETURN_CODE" "3010" lbl_NoError
      StrCmp "$MDAC28_RETURN_CODE" "8192" lbl_NoError
      StrCmp "$MDAC28_RETURN_CODE" "error" lbl_Error
      StrCmp "$MDAC28_RETURN_CODE" "timeout" lbl_TimeOut
      ; It's a MDAC Error
      StrCmp "$MDAC28_RETURN_CODE" "4101" lbl_Error_DuplicateInstance
      StrCmp "$MDAC28_RETURN_CODE" "4097" lbl_Error_NotAdministrator
      StrCmp "$MDAC28_RETURN_CODE" "1633" lbl_Error_InvalidPlatform lbl_FatalError
      ; all others are fatal
 
    lbl_Error_DuplicateInstance:
    DetailPrint "$(ERROR_MDAC28_DUPLICATE_INSTANCE)"
    GoTo lbl_Done
 
    lbl_Error_NotAdministrator:
    DetailPrint "$(ERROR_NOT_ADMINISTRATOR)"
    GoTo lbl_Done
 
    lbl_Error_InvalidPlatform:
    DetailPrint "$(ERROR_INVALID_PLATFORM)"
    GoTo lbl_Done
 
    lbl_TimeOut:
    DetailPrint "$(DESC_MDAC28_TIMEOUT)"
    GoTo lbl_Done
 
    lbl_Error:
    DetailPrint "$(ERROR_MDAC28_INVALID_PATH)"
    GoTo lbl_Done
 
    lbl_FatalError:
    DetailPrint "$(ERROR_MDAC28_FATAL)[$MDAC28_RETURN_CODE]"
    GoTo lbl_Done
 
    lbl_Done:
    DetailPrint "$(FAILED_MDAC28_INSTALL)"
    lbl_NoError:
    lbl_IsSilent:
  SectionEnd
 
!insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
  !insertmacro MUI_DESCRIPTION_TEXT ${SECMDAC28} $(DESC_LONGMDAC28)
!insertmacro MUI_FUNCTION_DESCRIPTION_END

This requires some setup in .OnInit:

Function .onInit
  StrCpy $LANGUAGE_DLL_TITLE "Installer Language"
  StrCpy $LANGUAGE_DLL_INFO "Please select a language:"
  StrCpy $URL_MDAC28 "${URL_MDAC28_1033}"
  StrCpy $OSLANGUAGE "1033"
 
; Insert other Language Blocks Here
 
  !define MUI_LANGDLL_WINDOWTITLE "$LANGUAGE_DLL_TITLE"
  !define MUI_LANGDLL_INFO "$LANGUAGE_DLL_INFO"
  !insertmacro MUI_LANGDLL_DISPLAY
  !undef MUI_LANGDLL_WINDOWTITLE
  !undef MUI_LANGDLL_INFO
  InitPluginsDir
  SetOutPath "$PLUGINSDIR"
  File "Common\Plugins\*.*"
  File /r "${NSISDIR}\Plugins\*.*"
FunctionEnd

Macros

!macro IsMDAC28Installed
   push $0
   push $1
   ; format 2.80.1022.3
   ReadRegStr $0 HKLM "SOFTWARE\Microsoft\DataAccess" "Version"
   StrCmp "$0" "" _MDAC28notInstalled
   StrCpy $1 "$0" 1
   IntCmp $1 "2" _MDAC2 _MDAC28notInstalled _MDAC28Installed
   _MDAC2:
   StrCpy $1 "$0" 1 2
   IntCmp "$1" "8" _MDAC28Installed _MDAC28notInstalled _MDAC28Installed
 
   _MDAC28notInstalled:
   StrCpy $0 "0"
   Goto +3
   _MDAC28Installed:
   StrCpy $0 "1"
   ; done
   pop $1
   exch $0
!macroend

I test for IsMDAC28Installed by defining a custom function overriding GUI Init, and set the section selection accordingly. Hopefully this was of use to you. Cheers!