Error on running the program

Started by mattal, September 17, 2007, 07:26:31 PM

Previous topic - Next topic

admin


mattal

in my project there is a DB in MS access 97. i have made a setup file with the help of Inno Script & Inno Setup. but giving an error when i run it in other PC. the error is ::
 
Class is not registered
Looking for object with CLSID: {00000010-0000-0010-8000-00AA006D2EA4
}
 
the script is ::
 
; InnoScript Version 7.1  Build 6  Trial
; Randem Systems, Inc.
; Copyright 2003-2007
; Website:  https://randemsystems.com
; Support:  https://randemsystems.support
; OS: Windows XP 5.1 build 2600 (Service Pack 2)
 
; Date: September 18, 2007
 
;              VB Runtime Files Folder:   C:\Program Files\Randem Systems\InnoScript\InnoScript 7.0\VB 6 Redist Files\
;     Visual Basic Project File (.vbp):   D:\Nola Project\13092007\MARCO Search.vbp
; Inno Setup Script Output File (.iss):   D:\Nola Project\13092007\Merco Release.iss
;         Script Template Files (.tpl):   C:\Program Files\Randem Systems\InnoScript\InnoScript 7.0\Templates\Release.tpl
;                                     :   C:\Program Files\Randem Systems\InnoScript\InnoScript 7.0\Templates\VBRuntime.tpl
;                                     :   C:\Program Files\Randem Systems\InnoScript\InnoScript 7.0\Templates\Vista.tpl
 
; ------------------------
;        References
; ------------------------
 
; Visual Basic runtime objects and procedures - (MSVBVM60.DLL)
; OLE Automation - (STDOLE2.TLB)
 
 
; --------------------------
;        Components
; --------------------------
 
; Microsoft FlexGrid Control 6.0 - (msflxgrd.ocx)
 
 
[Setup]
 
;-----------------------------------------------------------------------------------------------------
; Taken from VBP Project File Parameters AppName, AppName AppVersion and Company
;-----------------------------------------------------------------------------------------------------
 
AppName=MARCOSearch
AppVerName=MARCOSearch 1.0.1
AppPublisher=ROOT Software
 
;-----------------------------------------------------------------------------------------------------
 
AppVersion=1.0.1
VersionInfoVersion=1.0.1
AllowNoIcons=no
WizardImageFile=D:\Nola Project\Setup\Back.bmp
WizardSmallImageFile=D:\Nola Project\Setup\Untitled-1 copy.bmp
LicenseFile=D:\Nola Project\Setup\Read ME.txt
DefaultGroupName=MARCO Search
DefaultDirName={code:GetAppFolder}\MARCO Search
AppCopyright=(c) Sk. Mahabub-ul Islam. Mob:  88-01818373283
PrivilegesRequired=Admin
MinVersion=4.0,4.0
Compression=lzma
OutputBaseFilename=MARCO Search101Release
 
[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: d:\nola project\13092007\data.mdb; DestDir: {app}; Flags:  ignoreversion;  
Source: d:\nola project\13092007\r00tmatt; DestDir: {win}; Flags:  ignoreversion;  
Source: msflxgrd.ocx; DestDir: {sys}; Flags:  regserver restartreplace sharedfile;  
Source: d:\nola project\13092007\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;
 
 
plz help me to find out the solution of it.
thnz