Error VB6 Runtime Folder doesn't exist and error statusmsgon

Started by Randem, August 04, 2011, 09:14:57 PM

Previous topic - Next topic

Randem

InnoScript 11.0 Build 3 has been officially released. You should download and update your installation.

bibin98

I already download build 3 and YES it's work fine eventhough there is an exclude folder. Thanks


bibin98



Randem

Working on it. Do you have any folders in the exclude folders list?

bibin98

I have download the new update build 2 and I have this error (on the same script in this thread)
 

Randem


bibin98

Thanks for the guide .... I have change project info in project options. It run well now

Randem

Well here is a hint right here in your script...
 
; VB Runtime Files Folder: C:\Program Files\Randem Systems\InnoScript\InnoScript 10\VB 6 Redist Files\
 
Aren't you supposed to be looking here:
 
C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 6 Redist Files\  
 
Change your settings in Project Options
 
Also you are not supposed to place other files in the InnoScript folder in Program Files, unless you are attempting to cause assorted problems down the line...

bibin98

I save all my runtime in C:\Program Files\Randem Systems\InnoScript\InnoScript 11, there is no problem about VB6 Runtime Folder in the previous version of InnoScript.
 
 
; InnoScript Version 11.0  Build 1
; Randem Systems, Inc.
; Copyright (c) 2002 - 2011, Randem Systems, Inc.
; Website:  https://randemsystems.com
; Support:  https://randemsystems.support
; OS: Windows XP 5.1 build 2600 (Service Pack 3)
 
; Derived from VB VBP Project File
 
; Designed for Inno Setup Version: 5.4.2 (a)
; Installed Inno Setup Version: 5.4.2 (a)
 
; Date: August 05, 2011
 
; Local Machine Settings. Use these settings as a template for your installation folders
 
; {app}           : C:\Program Files\Randem Systems\InnoScript
; {appdata}       : C:\Documents and Settings\Administrator\Application Data\Randem Systems\InnoScript\
; {localappdata}  : C:\Documents and Settings\Administrator\Local Settings\Application Data\Randem Systems\InnoScript\
; {cf}            : C:\Program Files\Common Files\Randem Systems
; {tmp}           : C:\Documents and Settings\Administrator\Local Settings\Temp\
; {commonappdata} : C:\Documents and Settings\All Users\Application Data\Randem Systems\InnoScript\Release\
; {pf}            : C:\Program Files\
 
;              VB Runtime Files Folder:   C:\Program Files\Randem Systems\InnoScript\InnoScript 10\VB 6 Redist Files\
;     Visual Basic Project File (.vbp):   D:\Project VB\Silvia Cell\PrSilviaCell.vbp
; Inno Setup Script Output File (.iss):   D:\Project VB\Silvia Cell\Scripts\PrSilviaCell 1.0.0 Release.iss
;:   C:\Documents and Settings\Administrator\Local Settings\Application Data\Randem Systems\InnoScript\Release\Templates\Release.tpl
;:   D:\Project VB\Silvia Cell\installer\Templates\SilviaCell.tpl
;:   C:\Documents and Settings\Administrator\Local Settings\Application Data\Randem Systems\InnoScript\Release\Templates\VCRuntime.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:\Documents and Settings\Administrator\Local Settings\Application Data\Randem Systems\InnoScript\Release\Templates\Crystal Reports.tpl
;:   C:\Documents and Settings\Administrator\Local Settings\Application Data\Randem Systems\InnoScript\Release\Templates\Sqldmo.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)
; Microsoft SQLDMO Object Library - (sqldmo.dll)
; Microsoft Data Formatting Object Library 6.0 (SP6) - (MSSTDFMT.DLL)
; Crystal Reports ActiveX Designer Design and Runtime Library 11.5 - (craxddrt.dll)
; Microsoft Scripting Runtime - (scrrun.dll)
 
 
; --------------------------
;        Components
; --------------------------
 
; ComponentOne True DBDate 8.0 - (tidate8.ocx)
; Data Dynamics ActiveBar 2.0 - (Actbar2.ocx)
; ActiveSplash 1.0 Type Library - (actsplash.ocx)
; ComponentOne True DBNumber 8.0 - (tinumb8.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)
; FindButton by Bibin - (FindButton.ocx)
 
 
[Setup]
SetupLogging=Yes
AppId=Silvia Cell 2011  
 
;------------------------------------------------------------------------------------------------------------------------
; Taken from VBP/VBG Project File Parameters AppName, AppName AppVersion and Company
;------------------------------------------------------------------------------------------------------------------------
 
AppName=Silvia Cell 2011 1.0.0
AppVerName=Silvia Cell 2011  
AppPublisher=Performance Edition Dec 2009
 
;------------------------------------------------------------------------------------------------------------------------
 
AppVersion=1.0.0
VersionInfoVersion=1.0.0
AllowNoIcons=yes
DefaultGroupName=SilviaCell  
DefaultDirName={pf}\SilviaCell  
PrivilegesRequired=None
MinVersion=0,5.01
OnlyBelowVersion=0,6.0
Compression=lzma
OutputBaseFilename=SilviaCellRelease
 
[Tasks]
Name: Desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: SQLDMOInstallation; Description: Install SQLDMO for SQL Server; GroupDescription: Database Support:; Check: IsSQLDMOInstalled;
Name: VCRuntime2008; Description: Install VC   2008 Runtimes SP1; 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:
Name: DatabaseSupport; Description: Install Database Support; GroupDescription: Install Database Support:
 
[Files]
Source: D:\Project VB\Silvia Cell\Report\*.*; DestDir: {app}\Report\; Flags: ignoreversion recursesubdirs
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\vcredist_x86_2008_SP1.exe; DestDir: {tmp}; Flags:  deleteafterinstall ignoreversion nocompression; AfterInstall: InstallVCRuntime('{tmp}\vcredist_x86_2008_SP1.exe','/q /l {sd}\vcredist_x86_2008_SP1.exe.txt'); Tasks: VCRuntime2008;
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\scripten.exe; DestDir: {tmp}; Flags:  deleteafterinstall ignoreversion nocompression; MinVersion: 0,5.0; OnlyBelowVersion: 0,5.02; Tasks: ScriptingRuntime
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\CRXI_5_RDC_Redistribution.msi; DestDir: {tmp}; Flags:  deleteafterinstall ignoreversion nocompression; Tasks: CRInstallation
Source: D:\Project VB\Silvia Cell\toolbar.tb2; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\Silvia Cell\1.jpg; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\Silvia Cell\2.jpg; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\Silvia Cell\3.jpg; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\Silvia Cell\Background.jpg; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\Silvia Cell\Config.lic; DestDir: {app}; Flags:  ignoreversion;  
Source: D:\Project VB\Silvia Cell\scell.spl; DestDir: {app}; Flags:  ignoreversion;  
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\Silvia Cell\Scripts\tidate8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\msbind.dll; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: C:\Program Files\Common Files\Data Dynamics\ActiveBar2\Actbar2.ocx; DestDir: {cf}\Data Dynamics\ActiveBar2\; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\actsplash.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\tinumb8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\MSSTDFMT.DLL; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\MSCOMCTL.OCX; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\todg8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\Comdlg32.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\todl8.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\Scripts\FindButton.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: D:\Project VB\Silvia Cell\SilviaCell.exe; DestDir: {app}; Flags:  ignoreversion restartreplace;  
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\VB 6 Redist Files\MSVBVM60.DLL; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\mdac_typ_281.exe; DestDir: {tmp}; Flags: ignoreversion; MinVersion: 4.0,4.0; OnlyBelowVersion: 0,6.0; Tasks: DatabaseSupport
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\mdac_typ_20.exe; DestDir: {tmp}; Flags: ignoreversion; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Jet35sp3.exe; DestDir: {tmp}; Flags: ignoreversion; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\Jet40SP8_WXP.exe; DestDir: {tmp}; Flags: ignoreversion; MinVersion: 0,5.01; OnlyBelowVersion: 0,5.01sp1; Tasks: DatabaseSupport
Source: C:\Program Files\Randem Systems\InnoScript\InnoScript 11\JetComp.exe; DestDir: {sys}; Flags: sharedfile; MinVersion: 4.0,4.0; Tasks: DatabaseSupport
;
; Source locations may need to be modified to your SQL Server installation location in order to find the SQL Server files below.
; These files should not be deployed if the SQL Server Client has already been installed on the target system.
;
Source: C:\Program Files\Microsoft SQL Server\80\Tools\Binn\SQLDMO.DLL; DestDir: {cf}\SqlServer\Binn\; Flags:  regserver restartreplace sharedfile; Tasks: SQLDMOInstallation;  
Source: C:\Program Files\Microsoft SQL Server\80\Tools\*.*; DestDir: {cf}\SqlServer\; Flags: ignoreversion recursesubdirs; Tasks: SQLDMOInstallation;  
 
[INI]
 
[Icons]
Name: {group}\PrSilviaCell ; Filename : {app}\SilviaCell.exe; WorkingDir: {app};
Name: {group}{cm:UninstallProgram, PrSilviaCell }; Filename: {uninstallexe};
Name: {commondesktop}\PrSilviaCell ; Filename: {app}\SilviaCell.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
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
; 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}\; StatusMsgOn: 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}\; StatusMsgOn: Registering Crystal Reports ActiveX Designer Design and Runtime 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,6.0; 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,5.01sp1; Tasks: DatabaseSupport
Filename: {app}\SilviaCell.exe; Description: {cm:LaunchProgram, PrSilviaCell }; Flags: nowait postinstall skipifsilent runascurrentuser; WorkingDir: {app}
 
[UninstallDelete]
Type: dirifempty; Name: {app}
 
 
 
[InstallDelete]
Type: files; Name: {app}\Install.log;
 
[Comments]
 
 
//    Template Processing first character indicators usage.
//
//            No Indicator      Attempt replacement if cannot replace then add the line
//             Plus Sign      Force addition of template line into script (no attempted replacement).
//     ;      Semi-colon      Add line as a comment only. (No attempted replacement).
//     -      Minus Sign      Delete the line. (No attempted replacement).
//     &      Ampersand      Comment the line. (No attempted replacement).
//
 
[Code]
Procedure InstallVCRuntime(Filename: String; Param: String);
var
  ErrorCode: Integer;
  begin
     ShellExec('', ExpandConstant(Filename), ExpandConstant(Param), '', SW_SHOW, ewWaitUntilTerminated, ErrorCode);
  end;
function IsSQLDMOInstalled(): boolean;
var
OK: variant;
  begin
       Result := False;
       try
            OK := CreateOleObject('SQLDMO.SQLServer');
       except
            Result := True;
       end;
   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;
 
//============================================================================


Randem

Ok, found the StatusMsgOn It should be just StatusMsg. The change will be in the next update.

Randem

It would help if there was a question in there some where. What is the whole line with the StatusMsgOn parameter, I can't see it in the picture.
 
As far as the VBRuntime folder does not exist... If it is not there then it does not exist. I can't tell where InnoScript to look for it at... More Information is needed Please. Look in Project Options for the location.