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 (https://randemsystems.support)
; Support: https://randemsystems.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;
//============================================================================
Have you modified the script at all? It is missing an the VC Runtimes that should have automatically been added to the script.
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;
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;
VC Runtimes doesn't automatically added to the script, but in my other VB project, it's automatically added to the script and I don't know why is that
It maybe. You should just download it from the download menu in InnoScript to make sure.
Before you modify a script, if you make sure it works first then you will know when it stops working and you will know what you changed to make it stop working.
Also use a Virtual machine for testing, not your development machine.
Source: {src}tdbgpp8.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: {src}tibase8.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: {src}{src}tishare8.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: {src}todgub8.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
In componentone.tpl, I use {src} but doesn't automatically refer to D:Project VBSegerAgroScriptsOutputSupport. What function should I use to automatically refer to my VB project directory?
What version of VC I should used to register? VC6 or 2005 or 2008 or 2010?
Is it right to register all ComponentOne OCX using c1regserver.exe rather than regsvr32.exe?
InnoScript puts in all you needed. {src} would not refer to your project path as the Inno Setup directives state. I can not tell you what version of VC you will need, that is what InnoScript does automatically, it places the correct version into your script.
No, you just cannot use c1regserver to register the components. You can only do that if the proper VC runtimes are already installed.
Why did you remove what InnoScript put into your script at the beginning? Any files that InnoScript needs that it adds into your script can be downloaded from the Download menu, that is why it is there.
Dear randem,
I don't remove anything that automatically created by InnoScript, I just create template ComponentOne.tpl and edit it by myself.
Weirdly it don't happen in my other VB project. It only happen at this project
Is it correct to register all ComponentOne OCX using c1regserver.exe not using regsvr32.exe?
What is in your ComponentOne.tpl file? Did you know that items in the template WILL replace items in the script???
Did you start from the beginning without any additions to see exactly what a virgin script looks like?
There are per-requisites to registering ComponentOne files, you just can't attempt registration in any order. That is why it is important to follow the order that InnoScript sets for you unless you plan on doing it yourself.
This is pure script:
; InnoScript Version 11.1 Build 19
; Randem Systems, Inc.
; Copyright (c) 2002 - 2011, Randem Systems, Inc.
; Website: https://randemsystems.com (https://randemsystems.com)
; Support: https://randemsystems.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 29, 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
;: 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;
[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}\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;
//============================================================================
OK, do you have the associated run logs?
The Automatic OS Updater does not automatically get placed into the script. That is why the VC runtimes do not get put in. Remove the OS Updater then re-run
This is the pure script after I removed Automatic OS Updaters:
; InnoScript Version 11.1 Build 19
; Randem Systems, Inc.
; Copyright (c) 2002 - 2011, Randem Systems, Inc.
; Website: https://randemsystems.com (https://randemsystems.com)
; Support: https://randemsystems.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 30, 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
;: D:\Project VB\SegerAgro\Scripts\Output\Templates\SegerAgro.tpl
;: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\JetWXP.tpl
;: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\JetWVista.tpl
;: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\JetWin7.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: CRInstallation; Description: Install Crystal Reports Runtime Files; GroupDescription: Install CR Runtime Files:
Name: DatabaseSupport; Description: Install Database Support; GroupDescription: Install Database Support:
[Files]
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;
;
; Download MDAC and JET files from the Download menu of InnoScript or https://randemsystems.com/os-updater-support (https://randemsystems.com/os-updater-support)
;
Source: ..\Scripts\Output\Support\mdac_typ_281.exe; DestDir: {tmp}; Flags: ignoreversion nocompression deleteafterinstall; MinVersion: 4.0,4.0; OnlyBelowVersion: 0,6.0; Tasks: DatabaseSupport
Source: ..\Scripts\Output\Support\mdac_typ_20.exe; DestDir: {tmp}; Flags: ignoreversion nocompression deleteafterinstall; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
Source: ..\Scripts\Output\Support\Jet35sp3.exe; DestDir: {tmp}; Flags: ignoreversion nocompression deleteafterinstall; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
Source: ..\Scripts\Output\Support\Jet40SP8_WXP.exe; DestDir: {tmp}; Flags: ignoreversion nocompression deleteafterinstall; MinVersion: 0,5.01; OnlyBelowVersion: 0,6.0; Tasks: DatabaseSupport
Source: ..\Scripts\Output\Support\JetComp.exe; DestDir: {sys}; Flags: sharedfile nocompression; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
;
; Download MDAC and JET files from the Download menu of InnoScript or https://randemsystems.com/os-updater-support (https://randemsystems.com/os-updater-support)
;
;
; Download MDAC and JET files from the Download menu of InnoScript or https://randemsystems.com/os-updater-support (https://randemsystems.com/os-updater-support)
;
[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: {tmp}\mdac_typ_20.exe; Parameters: /Q /C:setup /QNT; WorkingDir: {tmp}; Flags: skipifdoesntexist; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
Filename: {tmp}\mdac_typ_281.exe; Parameters: /Q /C:setup /QNT; WorkingDir: {tmp}; Flags: skipifdoesntexist; MinVersion: 4.0,4.0; OnlyBelowVersion: 0,5.1; Tasks: DatabaseSupport
Filename: {tmp}\Jet35sp3.exe; Parameters: /Q; WorkingDir: {tmp}; Flags: skipifdoesntexist; MinVersion: 4.0,4.0; Tasks: DatabaseSupport;
Filename: {tmp}\Jet40SP8_WXP.exe; Parameters: /Q; WorkingDir: {tmp}; Flags: skipifdoesntexist; MinVersion: 0,5.01; OnlyBelowVersion: 0,6.0; Tasks: DatabaseSupport
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]
//========================================================================================================================
// 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;
//============================================================================
This is the Run log:
Randem Systems - InnoScript - Version 11.1 Build 19 - 8/30/2012 1:28:59 PM
8/30/2012 1:29:00 PM - Processing VBP Project PrSegerAgroNusantara.vbp File Information...
8/30/2012 1:29:00 PM - Object - stdole2.tlb
8/30/2012 1:29:00 PM - Object - Actbar2.ocx
8/30/2012 1:29:00 PM - Object - msado27.tlb
8/30/2012 1:29:00 PM - Object - actsplash.ocx
8/30/2012 1:29:00 PM - Object - CRViewer.dll
8/30/2012 1:29:00 PM - Object - craxddrt.dll
8/30/2012 1:29:00 PM - Object - craxdui.dll
8/30/2012 1:29:00 PM - Object - MSBIND.DLL
8/30/2012 1:29:00 PM - Object - comdlg32.ocx
8/30/2012 1:29:00 PM - Object - MSCOMCTL.OCX
8/30/2012 1:29:00 PM - Object - todg8.ocx
8/30/2012 1:29:00 PM - Object - todl8.ocx
8/30/2012 1:29:00 PM - Object - tinumb8.ocx
8/30/2012 1:29:00 PM - Object - tidate8.ocx
8/30/2012 1:29:00 PM - Object - timask8.ocx
8/30/2012 1:29:00 PM - Object - findbutton.ocx
8/30/2012 1:29:00 PM - Object - SIB.exe
8/30/2012 1:29:00 PM - Processing VB Runtime Files...
8/30/2012 1:29:00 PM - Processing Special Files...
8/30/2012 1:29:00 PM -
Dependency Information Search...
8/30/2012 1:29:00 PM - Processing Dependency Information for - stdole2.tlb
8/30/2012 1:29:00 PM - Processing Dependency Information for - actbar2.ocx
8/30/2012 1:29:00 PM - Processing Dependency Information for - actsplash.ocx
8/30/2012 1:29:00 PM - Processing Dependency Information for - msbind.dll
8/30/2012 1:29:00 PM - Processing Dependency Information for - comdlg32.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - mscomctl.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - todg8.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - todl8.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - tinumb8.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - tidate8.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - timask8.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - findbutton.ocx
8/30/2012 1:29:01 PM - Processing Dependency Information for - sib.exe
8/30/2012 1:29:01 PM - Processing Dependency Information for - config.lic
8/30/2012 1:29:01 PM - Processing Dependency Information for - sgr.spl
8/30/2012 1:29:01 PM - Processing Dependency Information for - toolbar.tb2
8/30/2012 1:29:01 PM - Processing Dependency Information for - c1regserver.exe
8/30/2012 1:29:04 PM -
Creating Inno Setup Script File...
8/30/2012 1:29:04 PM -
Processed in SAFE file mode
Files included in Script
Version OS Type Machine File
8/30/2012 1:29:04 PM - 2.20.4118.1 NT-Win32 DLL x86 C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\stdole2.tlb
8/30/2012 1:29:04 PM - 2.5.2.121 NT-Win32 DLL x86 C:\Program Files\Common Files\Data Dynamics\ActiveBar2\Actbar2.ocx
8/30/2012 1:29:04 PM - 1.0.2.2 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\actsplash.ocx
8/30/2012 1:29:04 PM - D:\Project VB\SegerAgro\Scripts\Output\Support\CRXI_5_RDC_Redistribution.msi
8/30/2012 1:29:04 PM - 6.1.97.82 NT-Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\MSBIND.DLL
8/30/2012 1:29:04 PM - 6.1.97.82 DOS-Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\comdlg32.ocx
8/30/2012 1:29:04 PM - 6.1.97.82 NT-Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\MSCOMCTL.OCX
8/30/2012 1:29:04 PM - 8.0.20093.364 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\todg8.ocx
8/30/2012 1:29:04 PM - 8.0.20112.360 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\todl8.ocx
8/30/2012 1:29:04 PM - 8.0.20111.30 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\tinumb8.ocx
8/30/2012 1:29:04 PM - 8.0.20111.30 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\tidate8.ocx
8/30/2012 1:29:04 PM - 8.0.20111.30 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\timask8.ocx
8/30/2012 1:29:04 PM - 2.0.0.11 Win32 DLL x86 D:\Project VB\SegerAgro\Scripts\Output\Support\findbutton.ocx
8/30/2012 1:29:04 PM - 1.0.0.0 Win32 App x86 D:\Project VB\SegerAgro\SIB.exe
8/30/2012 1:29:04 PM - Unknown D:\Project VB\SegerAgro\Background.jpg
8/30/2012 1:29:04 PM - Unknown D:\Project VB\SegerAgro\Config.lic
8/30/2012 1:29:04 PM - Unknown D:\Project VB\SegerAgro\sgr.spl
8/30/2012 1:29:04 PM - Unknown D:\Project VB\SegerAgro\toolbar.tb2
8/30/2012 1:29:04 PM - 1.0.0.0 Win32 App x86 D:\Project VB\SegerAgro\Scripts\Output\Support\c1regserver.exe
8/30/2012 1:29:04 PM - 2.20.4118.1 NT-Win32 DLL x86 C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\OLEAUT32.dll
8/30/2012 1:29:04 PM - 5.0.4118.1 Win32 DLL x86 C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\OLEPRO32.DLL
8/30/2012 1:29:04 PM - 6.0.97.82 Win32 DLL x86 C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 6 Redist Files\MSVBVM60.DLL
8/30/2012 1:29:04 PM -
Translating parameters...
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - C:\Users\Admin\AppData\Local\Randem Systems\InnoScript\tempfile.tmp
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\JetWXP.tpl
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\JetWVista.tpl
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Templates\JetWin7.tpl
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - C:\Users\Admin\AppData\Local\Randem Systems\InnoScript\Release\Templates\Crystal Reports.tpl
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - D:\Project VB\SegerAgro\Scripts\Output\Templates\SegerAgro.tpl
8/30/2012 1:29:04 PM - Merging with Template Script File... Please Wait - C:\Users\Admin\AppData\Local\Temp\tmpDummy.tpl
8/30/2012 1:29:04 PM - Saving Inno Setup Script file... Please Wait
8/30/2012 1:29:04 PM -
Script created: D:\Project VB\SegerAgro\Scripts\PrSegerAgroNusantara Release.iss
Files Found: 22
Files Unsafe: 11
Files Unsafe WinSxS: 0
Files Missing: 0
Files Deleted: 3
Files Replaced: 0
Files Not Found: 0 (Shown in Red)
Elapsed Time: 00:00:04 - 08-30-2012
WARNING: If some files are not found they may be in the SYSTEM folders and
are not allowed in the script to prevent OS damage when installing them.
Please find substitute files in another folder to include in the script (Only run in 'UnSafe Mode' to locate files).
Please view the log for more details on your files
8/30/2012 1:29:04 PM -
Files Deleted:
CRViewer.dll
craxddrt.dll
craxdui.dll
Files Missing:
Files Unsafe:
msado27.tlb
KERNEL32.dll
USER32.dll
GDI32.dll
ADVAPI32.dll
SHELL32.dll
ole32.dll
COMCTL32.dll
comdlg32.dll
VERSION.dll
mscoree.dll
Files Unsafe (WinSxS):
Files Replaced:
OK, that is much better. Could you zip and post these files? In the meantime did you attempt an install? What error did you get?
; 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)
Thanks, now the answer to the questions that I asked.
Can you zip and post your installation exe. I want to install it to see exactly the errors you get.
OK, first I remove c1regserver.exe from the script, then I send back to you the EXE.
The ZIP installer file is too large (95MB). I try to capture the error at client comp and send it to you.
This is the errormsg:
(https://randemsystems.support/discus/messages/12/10638.jpg)
After I click Ignore appear this error:
At the last installation:
After I click Ignore appear again this error:
Ok, you can remove Jetcomp.exe from the installation if you want. Here is an FTP location for you to upload your installation.
I am suspecting that all the files that you gave me are not Window 7 ready. They all register under Windows XP but not Windows 7. Check to make sure that you are using the Windows 7 version of these files if installing on Windows 7. I will try your installation on both OS's when you upload it.
Where is the FTP location?
I already try create script in WinXP and Win7 but the error is the same, can't register those components. I have post this topic last year in this forum
Check your email for the FTP site.
That is why I want to see your installation because the files register here on Window XP but not on Windows 7.
I have try the FTP, login incorrect
sorry put in the 98 in the password.
I got error.... 530 Login incorrect
I can login using Firefox but where can I upload my files?
If I use SSHSecureShell, I can't login to FTP
OK thanks I'm now uploading the installer using IE and Windows Explorer, it takes 2 hours 30 minutes just wait
Okie Dokie...
Your solution is that you need to deploy all the ocx/dll files in the source folder for ComponenOne.
Example: For tidate8.ocx, you must also deploy tibase8.dll and tishare8.dll. the ocx calls these dll's dynamically and so that there is no evidence that the ocx needs them. You have to deploy them to the same folder as the ocx. This same procedure goes for all the components of ComponentOne. All the named files are in the .cab files of which you need to extract. This should solve your problem. Use the Add Files tab to add the missing files into the script. You may need to use the Add Folders tab to copy all the folder with all files first before attempting to register any of them.
OK, so I don't need to add any Visual C Runtimes?
Can you tell me step by step how to do it?
Cause in the script already have .ocx and destination to {sys}, do I need to Add Files again to those .ocx and .dll and I set to {sys}?
If I Add Files to all componentone OCX and DLL, what attribute Flags do I need?
The VC Runtime files that you need are already installed with the OS. I cannot give you step by step, that would amount to training. Which is a paid service. What I can give you are the ideas that can get you moving in the correct direction.
1 - Use Add Folder to add the Folder that has all the files for ComponentOne as I detailed in a prior post. The destination for these folders will be your installation folder.
2 - Use Add Files to add each file that is in the folder so that they can be registered. The destination MUST be the same as where the Add Folders file end up. InnoScript should automatically add the proper flags.
This process will make sure that you register the files in the same folder where the other support files for it are located. That will allow the files to be registered correctly.
OK I understand what you mean, so the component and DLL is placed to {app} not {sys} right?
In Folders in {app}.
Example:
C:\Temp\Studio_for_ActiveX-10631\True DBList Pro 8.0\cabs\todl8
goes to
{app}\Studio_for_ActiveX-10631\True DBList Pro 8.0\cabs\todl8
C:\Temp\Studio_for_ActiveX-10631\True DBGrid Pro 8.0\cabs\todg8
Goes to
{app}\Studio_for_ActiveX-10631\True DBGrid Pro 8.0\cabs\todg8
But it will be more like:
In Folders in {app}.
Example:
C:\Temp\Studio_for_ActiveX-10631\True DBList Pro 8.0\cabs\todl8
goes to
{app}\todl8
C:\Temp\Studio_for_ActiveX-10631\True DBGrid Pro 8.0\cabs\todg8
Goes to
{app}\todg8
Yupe... thanks for the explanation... I collect the ocx and dll in the same directory {app}SIB not {app}SIBtodg or {app}SIBtodl, is it OK?
Yes, that is OK as long as they are registered in the same directory also. After the first run and you find out what flags are placed on the files, you can remove them from the script then place the lines in a template that you can use later after you remove the files from the Add Files tab.
Thanks Randem.... I'll inform u the result in client comp
Hi randem, componentone is success no error register, but I have another problem, stdole.tlb failed to register, and my EXE application doesn't work.
If I double click my application, appear this error message Class does not support Automation or does not support expected interface, is this occur because stdole.tlb failed to register?
Thanks.
No that error occurs because there is something in your application that is not deployed or registered (but not stdole.tlb). Your application could be dynamically calling a dll that is not included. You will need to place messages in your application exe to display to show you where in your application the error is generated.
Yes, I already have an ErrorHandling, that error come from procedure ConnectionErr(), in that form there is CommonDialog (already have in script COMDLG32.OCX, MSCOMCTL.OCX), and this code:
Dim A, fs
Set fs = CreateObject(Scripting.FileSystemObject)
Set A = fs.CreateTextFile(App.Path & Config.lic, True)
Yes, you never deployed Microsoft Scripting Library. You are counting on the client machine to have it installed already. The only way it would have been installed if another application installed it prior to your install. You should not count on that. Using the reference for the library would make sure that it was deployed.
Ohh... what do you mean? I don't understand
I already have scrrun.dll in windowssystem32, but it still error... What it may cause?
It is probably not registered... Actually Scripting Runtime is a complete installation not just one file. If it were in your project the installation would have been added by InnoScript.
OK... so what I must do?
I want to ask why InnoScript added VB5, meanwhile I'm using VB6 SP6. Is this cause my trouble?
Source: C:Program FilesRandem SystemsInnoScriptInnoScript 11VB 5 Redist Filesstdole2.tlb; DestDir: {sys}; Flags: regtypelib restartreplace uninsneveruninstall;
Source: C:Program FilesRandem SystemsInnoScriptInnoScript 11VB 5 Redist FilesOLEAUT32.dll; DestDir: {sys}; Flags: restartreplace sharedfile;
Source: C:Program FilesRandem SystemsInnoScriptInnoScript 11VB 5 Redist FilesOLEPRO32.DLL; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Add the reference to Scripting Runtime in your project, then re-run InnoScript. You probably selected VB5 instead of VB6. Check your options... Also check your search folder, you may have VB5 in there.
I always enable Scripting Runtime to all my project.
; InnoScript Version 11.1 Build 19
; Randem Systems, Inc.
; Copyright (c) 2002 - 2011, Randem Systems, Inc.
; Website: https://randemsystems.com (https://randemsystems.com)
; Support: https://randemsystems.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: September 06, 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\Asen\PrSIB.vbp
; Inno Setup Script Output File (.iss): D:\Project VB\Asen\Scripts\PrSIB Release.iss
;: D:\Project VB\Asen\Scripts\Templates\Apple East Coast.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
;: C:\Users\Admin\AppData\Local\Randem Systems\InnoScript\Release\Templates\VCRuntime.tpl
; ------------------------
; References
; ------------------------
; OLE Automation - (stdole2.tlb)
; Microsoft ActiveX Data Objects 2.7 Library - (msado27.tlb)
; Microsoft Data Binding Collection VB 6.0 (SP4) - (MSBIND.DLL)
; Crystal Reports ActiveX Designer Design and Runtime Library 11.5 - (craxddrt.dll)
; --------------------------
; Components
; --------------------------
; ComponentOne True DBDate 8.0 - (tidate8.ocx)
; Crystal ActiveX Report Viewer Library 11.5 - (CRViewer.dll)
; Microsoft Windows Common Controls 6.0 (SP6) - (MSCOMCTL.OCX)
; ComponentOne True DBGrid Pro 8.0 (OLEDB) - (todg8.ocx)
; Microsoft Common Dialog Control 6.0 (SP6) - (comdlg32.ocx)
; ComponentOne True DBList Pro 8.0 (OLEDB) - (todl8.ocx)
; ctNEdit (5.0) Numeric Edit Control - (ctNEdit.ocx)
; ActiveSkin 4.0 Type Library - (actskin4.ocx)
; ActiveSplash 1.0 Type Library - (actsplash.ocx)
; ctBanner (3.0) Animated Banner Control - (ctBanner.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=Apple East Coast
;------------------------------------------------------------------------------------------------------------------------
AppVersion=1.0.0
VersionInfoVersion=1.0.0
AllowNoIcons=yes
DefaultGroupName=Sistem Informasi Bisnis
DefaultDirName={pf}\Sistem Informasi Bisnis\
AppCopyright=2012
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: VCRuntime6; Description: Install VC 6.0 Runtimes; GroupDescription: VC Runtimes:
Name: ScriptingRuntime; Description: Install Microsoft's Scripting Runtime; GroupDescription: Install Scripting Runtime:
Name: CRInstallation; Description: Install Crystal Reports Runtime Files; GroupDescription: Install CR Runtime Files:
[Files]
Source: D:\Project VB\Asen\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\Asen\Scripts\Output\Support\vcredist.exe; DestDir: {tmp}; Flags: deleteafterinstall ignoreversion nocompression; AfterInstall: InstallVCRuntime('{tmp}\vcredist.exe','/Q /T:{tmp}'); Tasks: VCRuntime6;
Source: D:\Project VB\Asen\Report\*.*; DestDir: {app}\Report\; Flags:
Source: D:\Project VB\Asen\Skins\*.*; DestDir: {app}\Skins\; Flags:
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 5 Redist Files\stdole2.tlb; DestDir: {sys}; Flags: regtypelib restartreplace uninsneveruninstall;
Source: D:\Project VB\Asen\Scripts\Output\Support\tidate8.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\MSBIND.DLL; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\CRXI_5_RDC_Redistribution.msi; DestDir: {tmp}; Flags: deleteafterinstall ignoreversion nocompression; Tasks: CRInstallation
Source: D:\Project VB\Asen\Scripts\Output\Support\MSCOMCTL.OCX; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\todg8.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\comdlg32.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\todl8.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: C:\DBITech\Studio Controls R3\COM Controls\ctNEdit.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\actskin4.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\actsplash.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: C:\DBITech\Studio Controls R3\COM Controls\ctBanner.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\SIB.exe; DestDir: {app}; Flags: ignoreversion restartreplace;
Source: D:\Project VB\Asen\Scripts\Output\Support\scripten.exe; DestDir: {tmp}; Flags: deleteafterinstall ignoreversion nocompression; MinVersion: 0,5.0; OnlyBelowVersion: 0,5.02; Tasks: ScriptingRuntime
Source: D:\Project VB\Asen\apple.spl; DestDir: {app}; Flags: ignoreversion;
Source: D:\Project VB\Asen\Config.lic; DestDir: {app}; Flags: ignoreversion;
Source: D:\Project VB\Asen\Scripts\Output\Support\tdbgpp8.dll; DestDir: {app}; Flags: ignoreversion;
Source: D:\Project VB\Asen\Scripts\Output\Support\tibase8.dll; DestDir: {app}; Flags: ignoreversion;
Source: D:\Project VB\Asen\Scripts\Output\Support\timask8.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\tinumb8.ocx; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\tishare8.dll; DestDir: {app}; Flags: regserver restartreplace sharedfile;
Source: D:\Project VB\Asen\Scripts\Output\Support\todgub8.dll; DestDir: {app}; Flags: regserver 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: D:\Project VB\Asen\Scripts\Output\Support\MSVBVM60.DLL; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
[INI]
[Icons]
Name: {group}\PrSIB ; Filename : {app}\SIB.exe; WorkingDir: {app};
Name: {group}{cm:UninstallProgram, PrSIB }; Filename: {uninstallexe};
Name: {commondesktop}\PrSIB ; Filename: {app}\SIB.exe; Tasks: Desktopicon ; WorkingDir: {app};
[Run]
Filename: {tmp}\scripten.exe; Parameters: /quiet /passive; MinVersion: 0,5.0; OnlyBelowVersion: 0,5.02; WorkingDir: {tmp}; Flags: skipifdoesntexist runascurrentuser; Tasks: ScriptingRuntime; StatusMsg: Installing Scripting Runtime;
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: {app}\SIB.exe; Description: {cm:LaunchProgram, PrSIB }; 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;
//===================================================================
// Install VC Runtime files
//===================================================================
Procedure InstallVCRuntime(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;
//============================================================================
Then are you sure that line of code is where the error is? And did you select the check mark for the Scripting runtime to be installed on installation
Why did you put VB_VC_DCOM_MDAC_JET_AutoSetup.exe back in?
Yes, when it installed, the default is all checked
What OS are you installing your application on? The scripting runtime selected will only install on XP. If you are installing on another OS it will not be installed.
Owww... I put AutoOSUpdater just to try what the problem is ... Looks like that's not the problem
I'm using Win7 Ultimate and Win7 Pro, I also compiled it on Win7 Pro
You also have an error in this line
Set A = fs.CreateTextFile(App.Path & Config.lic, True)
You have the issue of a possible c:\Config.lic
That could be an invalid path...
Are you installing on your development machine again? If so you will have all sorts of issues...
Did you make sure scrrun.dll was registered?
I'm not running on developer machine, but on a fresh install Win7 Ultimate. I have manually register scrrun.dll using regsvr32 and run success but myprogram still error.
OK, then are you sure that the error is on that line of code?
I'm not sure too.... I'm now installing VB6 and all component needed in target comp, cause I have no idea to deploy in Win7. It's very difficult to deploy in Win7 rather than WinXP. My suggestion maybe in stdole2.tlb but not really sure cause after I install VB6 in target comp and I try to run again, it still error
How are you sure what line the error is on? What does your error code look like?
Do you mean that I have to give check manually Microsoft Scripting Runtime in my References project?
(https://randemsystems.support/discus/messages/12/10646.jpg)
I never do this before in VB6 cause I always enable Scripting Runtime in InnoScript. My problem was difficult in registering ComponentOne and already solved (not error when install) but appear another problem stdole2.tlb. I also don't know the main problem.
The error message when I run my software is:
- Error message box in ErrorEventHandler ConnectionErr(), Class does not support Automation or does not support expected interface
No, you do not need the reference if you manually add the scripting runtimes. You haven't clarified EXACTLY which line the error happens?????
Does your application work on XP but not on Windows 7?
Please answer ALL questions...
Yes, my application works on WinXP, but not in Win7.
Please ANSWER ALL questions... Which line does the application error on?
Did you check to see if scripting runtime is installed on the Windows 7 computer? You can check using the component and the reference checker in InnoScript
The installer error on:
Source: C:Program FilesRandem SystemsInnoScriptInnoScript 11VB 5 Redist Filesstdole2.tlb; DestDir: {sys}; Flags: regtypelib restartreplace uninsneveruninstall;
The error message is the same error as ComponentOne was (can't register). I'm not really sure is the problem was stdole2.tlb.
I meant the line in your program where the error is... And you are still deploying from the VB5 folder...
As far as stdole.tlb try: regtlib -q stdole2.tlb
My program EXE not error, but when I double click, appear error Class blablabla (on my previous message).
Maybe I send you the result via FTP, cause I don't know the error and how to fix it.
Then that is an error in your exe. We keep going over the same exact things but you do not give the answers, how can I help without all the information?
You have to debug your exe to find out the exact line the error is given on to be able to fix it. I gave very easy instructions on how to determine what the problem is but you ignore them.
I also don't know why InnoScript still deploying from the VB5 folder. If I run my code on VB6 or just directly double click EXE at my comp run well, but if I deploy to target comp (Win 7) appear that error message. I'll try to deploy at WinXP.
As I remember, since I using InnoScript 10, it still using VB5 Runtime Folder eventough the script at top line already correct
;VB Runtime Files Folder: C:Program FilesRandem SystemsInnoScriptInnoScript 11VB 6 Redist Files
but at the [Files] section always using folder VB5.
> You have to debug your exe to find
> out the exact line the error
> is given on to be able to fix it.
I'm sorry, cause my EXE is working fine if I run directly from sourcecode in VB6, or if I double click at EXE at my comp.
> I gave very easy instructions
> on how to determine what
> the problem is but you ignore them.
Yes I'm sorry if I bother you. I also confused with this error only appear when installing my application. But if I run using VB6 is working fine.
No, there is no problem and you are not bothering me. It is just we are going in circles... I ask you to do something to help me help you and you do not do it. I cannot help you very well if I do not have the information I ask for.
I know your exe is working on your development machine but that is not where you need it to run so that will not help. You need to allow your exe to display messages on the target machine that will tell you in what line the error is in. You can use line numbers and report the exact line number the error happens on. When we find that we can narrow down the exact problem instead of constantly guessing to no avail.
I also asked you to make sure that the VB5 folder is not in your search folder... Place the VB5 folder in the Exclude Folder tab so that it will not be searched again.
If you follow my instructions directly even if you do not know why, we will have this error resolved very quickly.
Hmmm.... I think that I already answered the question.
I already have an ErrorHandling, that error come from procedure ConnectionErr() Class does not support Automation or does not support expected interface. I don't know which line but maybe I just send you my sourcecode :
Public Function SetConnection() As Boolean
On Error GoTo ConnectionErr
Set cn = New ADODB.Connection
cn.CommandTimeout = 50
cn.CursorLocation = adUseClient
10: cn.Open Provider=SQLOLEDB.1;Password= & PassCn & _
;User ID= & UserCn & _
;Initial Catalog= & dbName & _
;Data Source= & ServerName
SetConnection = True
Exit Function
ConnectionErr:
If (Erl = 10) Then
frmDBCon.Show vbModal
frmDBCon.ZOrder 0
Else
MsgBox Err.Description, , ConnectionErr()
End If
End Function
That is why I suggested using line number in your VB6 code and reporting the line number in your error handling routine... This will give you the exact line number where the error is without guessing. You thought the error was scrrun.dll before so we were just spinning our wheels if the error is in the code you just posted. This is why we need the exact line...
Do a search on the internet for MZTools, it's a VB Add-In that can add line numbers and remove them later. Use that to add the line numbers to your app then add line number reporting to your error routine... IE Err.Number, Err.Description, Err.LineNo
BTW: if the error is in the code you posted it is most likely that you need the SQLServer Client deployed. It looks like you are using SQL Server as your database.
Yes, I'm using SQL Server 2005 as my database, usually I use SQL Server 2000 and I never get this kind of trouble. I have try install on WinXP where there is already installed SQL 2000 and the problem still the same... Wheww I get more confused... Why is this happening? If I compile and run it on developer comp no error found and my program run well.
If I install all (VB6 ComponentOne SQL Server) in target machine then I don't found this kind of error. I'll try to install MZ-Tools as you recommend.
Of course you wont have a problem if you install all the components. That is what your deployment is supposed to do install all the missing components it needs. If you need SQLServer you have to install it otherwise how will it get there? Unless everything you need already exists on the target machine you have to deploy it. If you are using ODBC you have to create the connection also...
I already delete Search Folder (VB 5 Redist Files and I replace with VB 6 Redist Files) and when I click Create Script, it is back again to VB 5 Redist Files
Maybe can be corected in the next version of InnoScript: my Search Folder in InnoScript is added automatically C:Program FilesRandem SystemsInnoScriptInnoScript 11VB 5 Redist Files, not VB 6 Redist Files
Hmmm... Is it OK if I compile using SQL2000 and deploy to target comp which already have SQL2005 installed? Cause what I'm doing is deploying my installer to target comp where SQL Server 2005 is installed but I'm using SQL 2000. Is this because of that? Or maybe I should add module SQL Server 2000 and 20005 in InnoScript?
I thought that there would be no problem cause I'm using ADODB 2.7 and already installed using InnoScript.
> As far as stdole.tlb try: regtlib -q stdole2.tlb
I already try that on Win7 but Win7 doesn't have regtlib.exe, so I can't execute that command.
Right now, when I update my application and want to replace old EXE with new EXE in my client comp, appear that error message whereas I using SQL2000 and my client also SQL2000.
So Deploy Regtlib.exe on Windows 7 then use it. As far as your other issue; you need to get a better understanding of what a deployment does, what is needed and how it gets there. It's like taking your car to a mechanic and expecting him to fix your car and test drive it with the keys... How much do you really expect if you do not provide all that is needed, No magic happens... ADODB is not SQL Server... It is just a way to connect to different databases if they are present. If SQL Server is not present how do you expect to connect to it?
Did you check see if you have VB5 selected instead of VB6? That is what the behavior you speak of suggests. Select VB5 then Select VB6 to make sure.
I have try installing in WinXP, and the result is still the same, error on registering stdole2.tlb. A few years ago, I never get this kind of error
You are going to get errors as long as you do not follow the directions that we give. You do not understand the process, We do... So if you keep doing it your way problems will persist. We do offer a service to do it for you. That is why we have this service.
It's like me fixing my car, I probably can fix it but the knowledge and experience that I would need to gain in order to do it is not worth my time so I pay someone else to do it for me. That is what they do...
OK then, I ZIP my source code to you and send it via FTP, I remove CRXI redistribution in this file to free some space. Thanks