ComponentOne still having trouble

Started by bibin98, August 26, 2012, 09:03:14 PM

Previous topic - Next topic

bibin98

If I added VC Runtimes 6, below is the script written in red color cause I don't have that file in my CPU. But I have this file vcredist_x86.exe is it the same?
 
Source: vcredist.exe; DestDir: {tmp}; Flags:  deleteafterinstall ignoreversion nocompression; AfterInstall: InstallVCRuntime('{tmp}vcredist.exe','/Q /T:{tmp}'); Tasks: VCRuntime6;

bibin98

Yes I modified the script a little, but only at the ComponentOne.tpl, this is the list:
 
Source: D:Project VBSegerAgroScriptsOutputSupporttdbgpp8.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: D:Project VBSegerAgroScriptsOutputSupporttibase8.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: D:Project VBSegerAgroScriptsOutputSupporttishare8.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: D:Project VBSegerAgroScriptsOutputSupporttodgub8.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;

Randem

Have you modified the script at all? It is missing an the VC  Runtimes that should have automatically been added to the script.

bibin98

Dear randem,
 
I still having trouble registering several componentone especially tidate8.ocx and tinumb8.ocx.
 
Below I copy the script I used...In target computer, it shows error message GetLastError can't register tidate8.ocx and tinumb8.ocx, but todg8.ocx works fine
 
 
; InnoScript Version 11.1  Build 19
; Randem Systems, Inc.
; Copyright (c) 2002 - 2011, Randem Systems, Inc.
; Website:  https://randemsystems.support
; Support:  https://randemsystems.support
; OS: Windows NT 6.1 build 7601 (Service Pack 1)
 
; Derived from VB VBP Project File
 
; Designed for Inno Setup Version: 5.5.1 (a)
; Installed Inno Setup Version: 5.5.1 (a)
 
; Date: August 27, 2012
 
; Local Machine Settings. Use these settings as a template for your installation folders
 
; {app}           : C:\Program Files\Randem Systems\InnoScript
; {appdata}       : C:\Users\Admin\AppData\Roaming\Randem Systems\InnoScript\
; {localappdata}  : C:\Users\Admin\AppData\Local\Randem Systems\InnoScript\
; {cf}            : C:\Program Files\Common Files\Randem Systems
; {tmp}           : C:\Users\Admin\AppData\Local\Temp\
; {commonappdata} : C:\ProgramData\Randem Systems\InnoScript\Release\
; {pf}            : C:\Program Files\
 
;              VB Runtime Files Folder:   C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 6 Redist Files\
;     Visual Basic Project File (.vbp):   D:\Project VB\SegerAgro\PrSegerAgroNusantara.vbp
; Inno Setup Script Output File (.iss):   D:\Project VB\SegerAgro\Scripts\PrSegerAgroNusantara Release.iss
;:   C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\ComponentOne.tpl
;:   D:\Project VB\SegerAgro\Scripts\Output\Templates\SegerAgro.tpl
;:   C:\Users\Admin\AppData\Local\Randem Systems\InnoScript\Release\Templates\AutoOSUpdater.tpl
;:   C:\Users\Admin\AppData\Local\Randem Systems\InnoScript\Release\Templates\Crystal Reports.tpl
 
; ------------------------
;        References
; ------------------------
 
; OLE Automation - (stdole2.tlb)
; Microsoft ActiveX Data Objects 2.7 Library - (msado27.tlb)
; Crystal Reports ActiveX Designer Design and Runtime Library 11.5 - (craxddrt.dll)
; Crystal Reports ActiveX Designer Library 11.5 - (craxdui.dll)
; Microsoft Data Binding Collection VB 6.0 (SP4) - (MSBIND.DLL)
 
 
; --------------------------
;        Components
; --------------------------
 
; Data Dynamics ActiveBar 2.0 - (Actbar2.ocx)
; ActiveSplash 1.0 Type Library - (actsplash.ocx)
; Crystal ActiveX Report Viewer Library 11.5 - (CRViewer.dll)
; Microsoft Common Dialog Control 6.0 (SP6) - (comdlg32.ocx)
; Microsoft Windows Common Controls 6.0 (SP6) - (MSCOMCTL.OCX)
; ComponentOne True DBGrid Pro 8.0 (OLEDB) - (todg8.ocx)
; ComponentOne True DBList Pro 8.0 (OLEDB) - (todl8.ocx)
; ComponentOne True DBNumber 8.0 - (tinumb8.ocx)
; ComponentOne True DBDate 8.0 - (tidate8.ocx)
; ComponentOne True DBMask 8.0 - (timask8.ocx)
; FindButton by Bibin - (findbutton.ocx)
 
 
[Setup]
SetupLogging=Yes
AppId=Sistem Informasi Bisnis
 
;------------------------------------------------------------------------------------------------------------------------
; Taken from VBP/VBG Project File Parameters AppName, AppName AppVersion and Company
;------------------------------------------------------------------------------------------------------------------------
 
AppName=Sistem Informasi Bisnis 1.0.0
AppVerName=Sistem Informasi Bisnis
AppPublisher=PT. Seger Agro Nusantara
 
;------------------------------------------------------------------------------------------------------------------------
 
AppVersion=1.0.0
VersionInfoVersion=1.0.0
AllowNoIcons=yes
DefaultGroupName=PT. Seger Agro Nusantara\PrSegerAgroNusantara  
DefaultDirName={pf}\PrSegerAgroNusantara 1  
PrivilegesRequired=None
MinVersion=0,5.01
OnlyBelowVersion=0,7.0
Compression=lzma
OutputBaseFilename=SIB0100000Release
 
[Tasks]
Name: Desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: AutoOSUpdater; Description: Install Database Support Updater; GroupDescription: Database Support:
Name: CRInstallation; Description: Install Crystal Reports Runtime Files; GroupDescription: Install CR Runtime Files:
 
[Files]
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\VB_VC_DCOM_MDAC_JET_AutoSetup.exe; DestDir: {tmp}; Flags:  deleteafterinstall ignoreversion nocompression; AfterInstall: InstallAutoOSUpdater('{tmp}\VB_VC_DCOM_MDAC_JET_AutoSetup.exe','/NORESTART /VERYSILENT'); Tasks: AutoOSUpdater;
Source: D:\Project VB\SegerAgro\Report\*.*; DestDir: {app}\Report\; Flags:  
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\stdole2.tlb; DestDir: {sys}; Flags:  regtypelib restartreplace uninsneveruninstall;  
Source: C:\Program Files\Common Files\Data Dynamics\ActiveBar2\Actbar2.ocx; DestDir: {cf}\Data Dynamics\ActiveBar2\; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\actsplash.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\CRXI_5_RDC_Redistribution.msi; DestDir: {tmp}; Flags:  deleteafterinstall ignoreversion nocompression; Tasks: CRInstallation
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\MSBIND.DLL; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\comdlg32.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\MSCOMCTL.OCX; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\todg8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\todl8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\tinumb8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\tidate8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\timask8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\findbutton.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\SIB.exe; DestDir: {app}; Flags:  ignoreversion restartreplace;  
Source: D:\Project VB\SegerAgro\Background.jpg; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\SegerAgro\Config.lic; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\SegerAgro\sgr.spl; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\SegerAgro\toolbar.tb2; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\c1regserver.exe; DestDir: {app}; Flags:  restartreplace sharedfile;  
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\OLEAUT32.dll; DestDir: {sys}; Flags:  restartreplace sharedfile;  
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\OLEPRO32.DLL; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 6 Redist Files\MSVBVM60.DLL; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\tdbgpp8.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\tibase8.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\tishare8.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\SegerAgro\Scripts\Output\Support\todgub8.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
 
[INI]
 
[Icons]
Name: {group}\PrSegerAgroNusantara ; Filename : {app}\SIB.exe; WorkingDir: {app};
Name: {group}{cm:UninstallProgram, PrSegerAgroNusantara }; Filename: {uninstallexe};
Name: {commondesktop}\PrSegerAgroNusantara ; Filename: {app}\SIB.exe; Tasks: Desktopicon ; WorkingDir: {app};
 
[Run]
Filename: msiexec.exe; Parameters: /package CRXI_5_RDC_Redistribution.msi /passive /promptrestart /l* {sd}\CRXI_5_RDC_Redistribution.msi.txt; WorkingDir: {tmp}; Flags: skipifdoesntexist runascurrentuser; Tasks: CRInstallation; StatusMsg: Installing Crystal Reports Runtimes;
; Register the Crystal Reports Merge Module components that need to be registered in place where the Merge Modules installed them
Filename: regsvr32.exe; Parameters: /s {code:GetCLSIDFldr|!F62B9FA4-455F-4FE3-8A2D-205E4F0BCAFB@\11.5.0.313}{code:LogFileName|crviewer.dll}; WorkingDir: {code:GetCLSIDFldr|!F62B9FA4-455F-4FE3-8A2D-205E4F0BCAFB@\11.5.0.313}\; StatusMsg: Registering Crystal ActiveX Report Viewer Library 11.5; Tasks: CRInstallation; Flags: runascurrentuser
Filename: regsvr32.exe; Parameters: /s {code:GetCLSIDFldr|!4FB2D832-C996-4EB1-BE0D-4DE953CF25F0@\11.5.0.313}{code:LogFileName|craxddrt.dll}; WorkingDir: {code:GetCLSIDFldr|!4FB2D832-C996-4EB1-BE0D-4DE953CF25F0@\11.5.0.313}\; StatusMsg: Registering Crystal Reports ActiveX Designer Design and Runtime Library 11.5; Tasks: CRInstallation; Flags: runascurrentuser
Filename: regsvr32.exe; Parameters: /s {code:GetCLSIDFldr|!BD4B4E53-F7B8-11D0-964D-00A0C9273C2A@\11.5.0.313}{code:LogFileName|craxdui.dll}; WorkingDir: {code:GetCLSIDFldr|!BD4B4E53-F7B8-11D0-964D-00A0C9273C2A@\11.5.0.313}\; StatusMsg: Registering Crystal Reports ActiveX Designer Library 11.5; Tasks: CRInstallation; Flags: runascurrentuser
Filename: {app}\c1regserver.exe; Parameters: {sys}\tidate8.ocx; Flags: skipifdoesntexist; WorkingDir: {app}
Filename: {app}\c1regserver.exe; Parameters: {sys}\tinumb8.ocx; Flags: skipifdoesntexist; WorkingDir: {app}  
Filename: {app}\SIB.exe; Description: {cm:LaunchProgram, PrSegerAgroNusantara }; Flags: nowait postinstall skipifsilent runascurrentuser; WorkingDir: {app}
 
[UninstallDelete]
Type: dirifempty; Name: {app}
 
 
[InstallDelete]
Type: files; Name: {app}\Install.log;
 
[Code]
//=============================================================
// Install the Automatic OS Updater
//=============================================================
Procedure InstallAutoOSUpdater(Filename: String; Param: String);
var
  ErrorCode: Integer;
  begin
     ShellExec('', ExpandConstant(Filename), ExpandConstant(Param), '', SW_SHOW, ewWaitUntilTerminated, ErrorCode);
  end;
 
//========================================================================================================================
// Get the CLSID from the registry for the queried file to locate where this file was installed by the CR merge module
// We do this so that we know where to register the file after installation.
//========================================================================================================================
 
function GetCLSIDFldr(Param: String): String;
var
  Location: String;
  CSLID: String;
  LogFile: String;
  sStr: String;
begin
  CSLID := Param;
  StringChangeEx(CSLID, '!', '{', True);
  StringChangeEx(CSLID, '@', '}', True);
 
  LogFile := ExpandConstant('{app}')   '\Install.log';
  SaveStringToFile(LogFile, #13#10   CSLID   #13#10, True);
 
  if not RegQueryStringValue(HKEY_CLASSES_ROOT, 'TypeLib\'   CSLID   '\0\win32','', Location) then
     Result := 'Not Registered !!!'   #13#10   'Possible Wrong Crystal Reports Version Installed on Source Machine or '   #13#10   'Wrong CRystal Reports Merge Module Installed on Target Machine'   #13#10;
     
  begin
    Location := ExpandConstant(Location)
    sStr := #13#10   Location   #13#10   StringOfChar('*',70)   #13#10
    SaveStringToFile(LogFile, sStr, True);
    Result := ExtractFileDir(Location);
  end;
end;
 
//=============================================================
// Log the filename process to a log file  
//=============================================================
 
function LogFileName(Filename: String): String;
var
  LogFile: String;
  sSTr: String;
begin
  LogFile := ExpandConstant('{app}')   '\Install.log';
  sStr := #13#10   'Registering '   Filename   #13#10;
  SaveStringToFile(LogFile, sStr, True);
  Result := Filename;
end;
 
//============================================================================