Discussion :

[scubaland]

Bonjour à tous,

J'ai créé une base Access pour un ami plombier. Celui-ci détestant l'informatique, j'ai créé un script d'installation avec Inno Setup.

J'ai cependant un problème, car les programmes nécessaires (le runtime Access, GhostScript et CutePDF) se lancent tous en même temps.

Comment faire en sorte qu'ils se lancent l'un après l'autre ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{C9746D1C-E020-4102-8620-E88BAA187793}
AppName=Devis et Factures
AppVersion=1.0
;AppVerName=Devis et Factures 1.0
AppPublisher=AB Plomberie 2000
DefaultDirName={pf}\Devis et Factures
DefaultGroupName=Devis et Factures
AllowNoIcons=yes
OutputDir=C:\Users\GREG\Desktop
OutputBaseFilename=setup
SetupIconFile=D:\Mes documents\Codage VBA Access\Projets\Plomberie\icone.ico
Compression=lzma
SolidCompression=yes

[Languages]
Name: "french"; MessagesFile: "compiler:Languages\French.isl"

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
Name: "quicklaunchicon"; Description: "{cm:CreateQuickLaunchIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked; OnlyBelowVersion: 0,6.1

[Files]
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\Devis & Factures.mdb"; DestDir: "{app}"; Flags: ignoreversion
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\Police\*"; DestDir: "{app}\Police"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\Registre\*"; DestDir: "{app}\Registre"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\Runtime\*"; DestDir: "{app}\Runtime"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\Sauvegardes\*"; DestDir: "{app}\Sauvegardes"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\PDF\*"; DestDir: "{app}\PDF"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "D:\Mes documents\Codage VBA Access\Projets\Plomberie\Police\c39hrp24dhtt.TTF"; DestDir: "{fonts}"; FontInstall: "c39hrp24dhtt"; Flags: onlyifdoesntexist uninsneveruninstall 
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{group}\Devis et Factures"; Filename: "{app}\Plomberie.mdb"
Name: "{group}\Dossier des Sauvegardes"; Filename: "{app}\Sauvegardes\"
Name: "{group}\{cm:UninstallProgram,Devis et Factures}"; Filename: "{uninstallexe}"
Name: "{commondesktop}\Devis et Factures"; Filename: "{app}\Devis & Factures.mdb"; Tasks: desktopicon
Name: "{userappdata}\Microsoft\Internet Explorer\Quick Launch\Devis et Factures"; Filename: "{app}\Devis & Factures.mdb"; Tasks: quicklaunchicon

[Registry]
root: HKCU; subkey: Software\Microsoft\Office\11.0\Access\Security; valuetype: dword; valuename: Level; valuedata: 1
root: HKLM; subkey: SOFTWARE\Microsoft\Jet\4.0\Access\Engines; valuetype: dword; valuename: SandBoxMode; valuedata: 1

[Run]
Filename: "{app}\Runtime\ACCESSRT.MSI"; Description: "{cm:LaunchProgram,Microsoft Access Runtime}"; Flags: shellexec postinstall skipifsilent
Filename: "{app}\PDF\GhostScript.exe"; Description: "{cm:LaunchProgram,Générateur de PDF}"; Flags: shellexec postinstall skipifsilent
Filename: "{app}\PDF\CutePDF.exe"; Description: "{cm:LaunchProgram,Imprimante virtuelle PDF}"; Flags: shellexec postinstall skipifsilent

Merci pour vos bons conseils

[stigma]

Dommage que tu n'aie pas eu de réponse, ça m’intéresse.