Printable View
hello friend,
can any one helm me to find the solution of below prob??
-- i have a write a project in VB 6.0 there is a DB (MS Access 97).
made the package by Inno Setup, script is preapared by Inno Script.
when i tried to install the program in a PC it runs but The DB can run in
Win 2000.
thnz
Don't know about Inno Setup, try the package and deployment that come with VB6, it works fine for me. But, it will not automatically add the DB to the installation package unless you manually tell it to.
but using the package and deployment that come with VB6 u can run the setup file on Win XP or Win 98, not in Win2000!!!
I have installed on Win2000 many times, unless my memory is shot.
Have you added the AutoOSUpdater in your script? It will handle the installation of the MDAC/JET/DCOM 's for every OS that you want to install it on.
PDW will only add the current MDAC that you have on your machine and it does not deploy the JET engines that Access 97 needs. That is not sufficient for deployement to every OS. Especially for Access 97. Don't count on luck for application deployment.
this time i have integrated "current MDAC" in Inno Script, but still giving an error. the Error is :
Class is not registered
Looking for object with CLSID: {00000010-0000-0010-8000-00AA006D2EA4}
is it a problem in my code or making the Package??
plz help me to find out the prob.
thnz
You only need to read... I made it perfectly clear.
Manual of Inno Script?? if u give me any hint , it will be helpful for me.
The manual is on the website and in the application Help->Instructions
i have tried in different ways to solve the The Error: "The Class Not Found"
i have added "VB_DCOM_MDAC_JET_AutoSetup" in Inno Script. given the Runtime files. But still its giving the error. plz find me a solution . the script is given below.
Thnz
[CODE]
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: AutoOSUpdater; Description: Install MDAC's for Database Operations; GroupDescription: Install MDAC's:
[Files]
Source: vb_dcom_mdac_jet_autosetup.exe; DestDir: {tmp}; Flags: deleteafterinstall ignoreversion nocompression;
Source: c:\documents and settings\babu\desktop\rony\23082007\data.rar; DestDir: {app}; Flags: ignoreversion;
Source: c:\documents and settings\babu\desktop\rony\23082007\r00tmatt; DestDir: {app}; Flags: ignoreversion;
Source: msflxgrd.ocx; DestDir: {sys}; Flags: regserver sharedfile;
Source: c:\documents and settings\babu\desktop\rony\23082007\marco search.exe; DestDir: {app}; Flags: ignoreversion;
[INI]
Filename: {app}\MARCO Search.url; Section: InternetShortcut; Key: URL; String:
[Icons]
Name: {group}\MARCOSearch; Filename: {app}\MARCO Search.exe; WorkingDir: {app}
Name: {group}\{cm:ProgramOnTheWeb, MARCOSearch}; Filename: {app}\MARCO Search.url
Name: {group}\{cm:UninstallProgram, MARCOSearch}; Filename: {uninstallexe}
Name: {commondesktop}\MARCOSearch; Filename: {app}\MARCO Search.exe; Tasks: desktopicon; WorkingDir: {app}
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\MARCOSearch; Filename: {app}\MARCO Search.exe; Tasks: quicklaunchicon; WorkingDir: {app};
[Run]
Filename: {tmp}\VB_DCOM_MDAC_JET_AutoSetup.exe; Parameters: /NORESTART /VERYSILENT; WorkingDir: {tmp}; Flags: skipifdoesntexist; Tasks: AutoOSUpdater
Filename: {app}\MARCO Search.exe; Description: {cm:LaunchProgram, MARCOSearch}; Flags: nowait postinstall skipifsilent; WorkingDir: {app}
[UninstallDelete]
Type: files; Name: {app}\MARCO Search.url
Code:
function GetAppFolder(Param: String): String;
begin
if InstallOnThisVersion('0,6', '0,0') = irInstall then
Result := 'C:\Users\Public\' + ExpandConstant('{username}')
else
Result := ExpandConstant('{pf}');
end;
It would help when you post a script to post the whole thing unless you know what we don't need...
i have tried in different ways to solve the The Error: "The Class Not Found"
i have added "VB_DCOM_MDAC_JET_AutoSetup" in Inno Script. given the Runtime files. But still its giving the error. plz find me a solution . the script is given below.
Thnz
[CODE]
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: AutoOSUpdater; Description: Install MDAC's for Database Operations; GroupDescription: Install MDAC's:
[Files]
Source: vb_dcom_mdac_jet_autosetup.exe; DestDir: {tmp}; Flags: deleteafterinstall ignoreversion nocompression;
Source: c:\documents and settings\babu\desktop\rony\23082007\data.rar; DestDir: {app}; Flags: ignoreversion;
Source: c:\documents and settings\babu\desktop\rony\23082007\r00tmatt; DestDir: {app}; Flags: ignoreversion;
Source: msflxgrd.ocx; DestDir: {sys}; Flags: regserver sharedfile;
Source: c:\documents and settings\babu\desktop\rony\23082007\marco search.exe; DestDir: {app}; Flags: ignoreversion;
[INI]
Filename: {app}\MARCO Search.url; Section: InternetShortcut; Key: URL; String:
[Icons]
Name: {group}\MARCOSearch; Filename: {app}\MARCO Search.exe; WorkingDir: {app}
Name: {group}\{cm:ProgramOnTheWeb, MARCOSearch}; Filename: {app}\MARCO Search.url
Name: {group}\{cm:UninstallProgram, MARCOSearch}; Filename: {uninstallexe}
Name: {commondesktop}\MARCOSearch; Filename: {app}\MARCO Search.exe; Tasks: desktopicon; WorkingDir: {app}
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\MARCOSearch; Filename: {app}\MARCO Search.exe; Tasks: quicklaunchicon; WorkingDir: {app};
[Run]
Filename: {tmp}\VB_DCOM_MDAC_JET_AutoSetup.exe; Parameters: /NORESTART /VERYSILENT; WorkingDir: {tmp}; Flags: skipifdoesntexist; Tasks: AutoOSUpdater
Filename: {app}\MARCO Search.exe; Description: {cm:LaunchProgram, MARCOSearch}; Flags: nowait postinstall skipifsilent; WorkingDir: {app}
[UninstallDelete]
Type: files; Name: {app}\MARCO Search.url
Code:
function GetAppFolder(Param: String): String;
begin
if InstallOnThisVersion('0,6', '0,0') = irInstall then
Result := 'C:\Users\Public\' + ExpandConstant('{username}')
else
Result := ExpandConstant('{pf}');
end;
That is not the whole script... This cannot be that difficult...
Hole Script
; Date: September 10, 2007
; VB Runtime Files Folder: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\
; Visual Basic Project File (.vbp): C:\Documents and Settings\BABU\Desktop\Rony\23082007\MARCO Search.vbp
; Inno Setup Script Output File (.iss): C:\Documents and Settings\BABU\Desktop\Rony\Merco Release.iss
; Script Template Files (.tpl): C:\Program Files\Randem Systems\**********\********** 7.0\Templates\Release.tpl
; : C:\Program Files\Randem Systems\**********\********** 7.0\Templates\VBRuntime.tpl
; : C:\Program Files\Randem Systems\**********\********** 7.0\Templates\Vista.tpl
; ------------------------
; References
; ------------------------
; Visual Basic runtime objects and procedures - (MSVBVM60.DLL)
; OLE Automation - (STDOLE2.TLB)
; --------------------------
; Components
; --------------------------
[Setup]
;-----------------------------------------------------------------------------------------------------
; Taken from VBP Project File Parameters AppName, AppName AppVersion and Company
;-----------------------------------------------------------------------------------------------------
AppName=MARCOSearch
AppVerName=MARCOSearch 1.09.09
AppPublisher=ROOT Soft Ware
;-----------------------------------------------------------------------------------------------------
AppVersion=1.0.1
VersionInfoVersion=1.0.1
AllowNoIcons=no
WizardImageFile=C:\Documents and Settings\BABU\Desktop\Rony\copy\Back.bmp
WizardSmallImageFile=C:\Documents and Settings\BABU\Desktop\Rony\copy\Untitled-1 copy.bmp
SetupIconFile=C:\Documents and Settings\BABU\Desktop\Rony\23082007\MARCO.ico
LicenseFile=C:\Documents and Settings\BABU\Desktop\Rony\copy\Read ME.txt
DefaultGroupName=MARCO Search
DefaultDirName={code:GetAppFolder}\MARCO Search
AppCopyright=(c) Shaikh Mahabub-ul Islam
PrivilegesRequired=Admin
MinVersion=4.0,4.0
Compression=lzma
OutputBaseFilename=MARCO Tech Checker
Password=MeRc0
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: AutoOSUpdater; Description: Install MDAC's for Database Operations; GroupDescription: Install MDAC's:
[Files]
Source: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\msvbvm60.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\oleaut32.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\olepro32.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\asycfilt.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile; OnlyBelowVersion: 0,6
Source: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\stdole2.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib; OnlyBelowVersion: 0,6
Source: C:\Documents and Settings\BABU\Desktop\Rony\copy\vbrun60sp6\comcat.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: C:\Documents and Settings\BABU\Desktop\Rony\23082007\data.rar; DestDir: {app}; Flags: ignoreversion;
Source: C:\Documents and Settings\BABU\Desktop\Rony\23082007\r00tmatt; DestDir: {win}; Flags: ignoreversion;
Source: C:\Documents and Settings\BABU\Desktop\Rony\Support\msflxgrd.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: C:\Documents and Settings\BABU\Desktop\Rony\23082007\marco search.exe; DestDir: {app}; Flags: ignoreversion;
Source: vb_dcom_mdac_jet_autosetup.exe; DestDir: {tmp}; Flags: deleteafterinstall ignoreversion nocompression;
Source: c:\documents and settings\babu\desktop\rony\23082007\data.rar; DestDir: {app}; Flags: ignoreversion;
Source: c:\documents and settings\babu\desktop\rony\23082007\r00tmatt; DestDir: {app}; Flags: ignoreversion;
Source: C:\Documents and Settings\BABU\Desktop\Rony\Support\msflxgrd.ocx; DestDir: {sys}; Flags: regserver sharedfile;
Source: c:\documents and settings\babu\desktop\rony\23082007\marco search.exe; DestDir: {app}; Flags: ignoreversion;
[INI]
Filename: {app}\MARCO Search.url; Section: InternetShortcut; Key: URL; String:
[Icons]
Name: {group}\MARCOSearch; Filename: {app}\MARCO Search.exe; WorkingDir: {app}
Name: {group}\{cm:ProgramOnTheWeb, MARCOSearch}; Filename: {app}\MARCO Search.url
Name: {group}\{cm:UninstallProgram, MARCOSearch}; Filename: {uninstallexe}
Name: {commondesktop}\MARCOSearch; Filename: {app}\MARCO Search.exe; Tasks: desktopicon; WorkingDir: {app}
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\MARCOSearch; Filename: {app}\MARCO Search.exe; Tasks: quicklaunchicon; WorkingDir: {app};
[Run]
Filename: {tmp}\VB_DCOM_MDAC_JET_AutoSetup.exe; Parameters: /NORESTART /VERYSILENT; WorkingDir: {tmp}; Flags: skipifdoesntexist; Tasks: AutoOSUpdater
Filename: {app}\MARCO Search.exe; Description: {cm:LaunchProgram, MARCOSearch}; Flags: nowait postinstall skipifsilent; WorkingDir: {app}
[UninstallDelete]
Type: files; Name: {app}\MARCO Search.url
[Code]
function GetAppFolder(Param: String): String;
begin
if InstallOnThisVersion('0,6', '0,0') = irInstall then
Result := 'C:\Users\Public\' + ExpandConstant('{username}')
else
Result := ExpandConstant('{pf}');
end;
This script has been hand edited therefore it is wrong by assumption. You have in the list msflxgrd.ocx and it is nowhere to be found in the components list. Please re-do the script from scratch for the VB runtime files would not be in the script if the AutoOSUpdater is present.
Your app is basically the default run in Inno Script. You have changed that and therefore made it unstable. Things are missing so it cannot work as desired.
I gave you a script a while back from your project. How did you get from there to where you are now?
Code:; ********** Version 7.1 Build 6 Trial
; Randem Systems, Inc.
; Copyright 2003-2007
; Website: http://www.***********
; Support: http://www.**********.com/cgi-bin/discus/discus.cgi
; OS: Windows XP 5.1 build 2600 (Service Pack 2)
; Date: August 10, 2007
; VB Runtime Files Folder: C:\Babu\Support\
; Visual Basic Project File (.vbp): D:\Nola Project\100082007\Search.vbp
; Inno Setup Script Output File (.iss): C:\Babu\Marco Script Release.iss
; ------------------------
; References
; ------------------------
; Visual Basic runtime objects and procedures - (MSVBVM60.DLL)
; OLE Automation - (STDOLE2.TLB)
; Microsoft ActiveX Data Objects 2.0 Library - (msado20.tlb)
; Microsoft DAO 3.51 Object Library - (dao350.dll)
; Microsoft Data Binding Collection - (MSBIND.DLL)
; --------------------------
; Components
; --------------------------
; Microsoft FlexGrid Control 6.0 - (msflxgrd.ocx)
; Microsoft ADO Data Control 6.0 (OLEDB) - (msadodc.ocx)
; Microsoft Data Bound Grid Control 5.0 (SP3) - (DBGRID32.OCX)
; Microsoft DataGrid Control 6.0 (OLEDB) - (msdatgrd.ocx)
[Setup]
;-----------------------------------------------------------------------------------------------------
; Taken from VBP Project File Parameters AppName, AppName AppVersion and Company
;-----------------------------------------------------------------------------------------------------
AppName=MARCOSearch
AppVerName=MARCOSearch 1.0.1
AppPublisher=ROOT Soft
;-----------------------------------------------------------------------------------------------------
AppVersion=1.0.1
VersionInfoVersion=1.0.1
AllowNoIcons=no
WizardImageFile=C:\Documents and Settings\rony\Desktop\untitled.bmp
LicenseFile=C:\Babu\read ME.txt
DefaultGroupName=Marco Search
DefaultDirName={code:GetAppFolder}\Marco Search
AppCopyright=© Sk. Mahabub-ul Islam, e-mail:[email protected]
PrivilegesRequired=Admin
MinVersion=4.0,4.0
Compression=lzma
OutputBaseFilename=DEMO Search101Release
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
[Files]
Source: c:\babu\support\msvbvm60.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: c:\babu\support\oleaut32.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: c:\babu\support\olepro32.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: c:\babu\support\asycfilt.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile; OnlyBelowVersion: 0,6
Source: c:\babu\support\stdole2.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib; OnlyBelowVersion: 0,6
Source: c:\babu\support\comcat.dll; DestDir: {sys}; Flags: uninsneveruninstall regserver restartreplace sharedfile; OnlyBelowVersion: 0,6
Source: d:\nola project\100082007\iamge list.mdb; DestDir: {app}; Flags: ignoreversion;
Source: c:\babu\support\msflxgrd.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: c:\babu\support\msadodc.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: c:\program files\common files\dao350.dll; DestDir: {cf}\; Flags: regserver restartreplace sharedfile;
Source: c:\babu\support\dbgrid32.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: c:\babu\support\msdatgrd.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: c:\babu\support\msbind.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile;
Source: d:\nola project\100082007\demo search.exe; DestDir: {app}; Flags: ignoreversion;
Source: c:\babu\support\vb5db.dll; DestDir: {sys}; Flags: sharedfile;
[INI]
Filename: {app}\DEMO Search.url; Section: InternetShortcut; Key: URL; String:
[Icons]
Name: {group}\MARCOSearch; Filename: {app}\DEMO Search.exe; WorkingDir: {app}
Name: {group}\{cm:ProgramOnTheWeb, MARCOSearch}; Filename: {app}\DEMO Search.url
Name: {group}\{cm:UninstallProgram, MARCOSearch}; Filename: {uninstallexe}
Name: {commondesktop}\MARCOSearch; Filename: {app}\DEMO Search.exe; Tasks: desktopicon; WorkingDir: {app}
[Run]
Filename: {app}\DEMO Search.exe; Description: {cm:LaunchProgram, MARCOSearch}; Flags: nowait postinstall skipifsilent; WorkingDir: {app}
[UninstallDelete]
Type: files; Name: {app}\DEMO Search.url
Found the answer to your problem.
Anytime you are using the Bound Data Controls you need to deploy VB5DB.DLL for your app to work. This file is not normally deployed. All the AutoOSUpdaters and ********** will be updated to deploy this file along with the VB Runtime files.
If you are using Inno Setup add this line to your script:
Source: e:\server data\randem\develop\vb 6 redist files\vb5db.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile
Of course change the source location to match where it is actually located on your system.