Discussion :

[K_WOLF]

Bonjour, j'aimerai que lors de l'execution de mon .exe on demande un login et un password.

1)
Pour ce qui du password, j'ai vu qu'elle parametre utilisé : Password dans la section [setup], par contre il faut mettre "en dur" le password.
Mais il faudrai que ca soit en dynamique, donc je suppose qu'il faut passer par la section [code] (par exemple, Password={code:ma_fonction}) pour essayer de transmettre les passwords valide "en dynamique" (qui vont avec chacun un login), et c'est a ce niveau la que je coince (Pascal et moi ).

Code :

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

1
2
3
4
 
[Setup]
Password=xxx
Encryption=yes

1.2)
Autre probleme pour le password, dans le code il faudrai peut-être faire une ouverture de fichier pour recuperer les passwords par exemple, est-ce qu'il y a des instructions en pascal pour ca ? (je connais un peu Java, C, mais pas Pascal )



2)
Pour le login, je n'ai rien trouver qui correspond a ce que je veux (j'ai cherché avec "UserInfoPage", mais ca ce passe dans une autre fenêtre où il y a un autre champs société (champs qui ne sont pas contrôler).

Il me faudrai idéalement avoir un champ au dessus du password qui ai le même comportement que Password "dans la même fenêtre" que le Password, et ca je ne sais pas si c'est fesable .

3) Troisièmement, en supposant qu'on a les étapes 1)1.2)2) qui sont ok, peut-on recuperer le login et le password entrer dans leur champs respectifs (et par quel moyen ? registre? variable ?) ?

4) Dernièrement, en supposant encore que l'étape 3) est ok, peut-on appeller un .java ou .class (Java) comme on peut appeller un .exe dans la section [Run] durant l'installation (apres avoir recuperer le login et le password par un moyen x).

Si par hasard quelqu'un a un script qui fait une de ces opérations que j'ai cités ou qui s'en approche, je suis prenneur (j'apprend plus vite avec des exemples).

merci de votre aide précieuse pour m'éclairer

[K_WOLF]

J'ai resolu le problème du login/password (cette page qui faut customiser soit même) en partie, ca donne ca :

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
54
55
56
57
58
59
60
61
62
63
// dans la section code du script
var
  UserPage: TInputQueryWizardPage;
  KeyPage: TInputQueryWizardPage;
  ProgressPage: TOutputProgressWizardPage;
  DataDirPage: TInputDirWizardPage;

procedure InitializeWizard;
begin
  { Create the pages }

  UserPage := CreateInputQueryPage(wpWelcome,
    'Personal Information', 'Who are you?',
    'Entrer votre login et mot de passe, puis cliquer sur suivant');
  UserPage.Add('Login:', False);
  UserPage.Add('Mot de passe:', True);
end;

function NextButtonClick(CurPageID: Integer): Boolean;
begin
	if CurPageID = UserPage.ID then begin
		if UserPage.Values[0] = '' then begin
		  MsgBox('Vous devez entrez votre login.', mbError, MB_OK);
		  Result := False;
		end else begin
			if UserPage.Values[1] = 'optic' then begin
				Result := True;
			end else begin
				MsgBox('Votre mot de pass est incorrect.', mbError, MB_OK);
				Result := False;
			end;
		end;
	end else if CurPageID = wpUserInfo then begin
		Result := True;
	end else if CurPageID = wpSelectDir then begin
		Result := True;
	end else if CurPageID = wpPassword then begin
		Result := True;
	end else if CurPageID = wpWelcome then begin
		Result := True;
	end else if CurPageID = wpInstalling then begin
		Result := True;
	end else if CurPageID = wpFinished then begin
		Result := True;
	end else if CurPageID = wpInfoBefore then begin
		Result := True;
	end else if CurPageID = wpInfoAfter then begin
		Result := True;
	end else if CurPageID = wpSelectComponents then begin
		Result := True;
	end else if CurPageID = wpSelectTasks then begin
		Result := True;
	end else if CurPageID = wpSelectProgramGroup then begin
		Result := True;
	end else if CurPageID = wpReady then begin
		Result := True;
	end else if CurPageID = wpSelectDir then begin
		Result := True;
	end else if CurPageID = wpPreparing then begin
		Result := True;
	end;
end;

En gros, quand je lance l'exe, la 2eme page est mon login/setup (page qui est creer avec InializeWizard).

Apres y'a une function NextButtonClick qui produit les réponse approprier dans certaine fenêtre (retourne faux : veut dire qu'on ne passe pas a la page suivante quand on clique sur suivant, retourne vrai : on passe a la page suivante quand on clique sur suivant.

Remarque : je crois qu'on doit dire tout les "comportements" des boutons "suivant" de toutes les fenêtres quand on utilise la fonction NextButtonClick (ca doit écraser les "nextbouttonclick" de base).


Ce qui me reste à faire

Alors ce qui me manque à faire c'est appeller un java.exe (avec des parametre comme args[0], args[1], args[2] par exemple) en spécifiant la "classpath" du java.exe et de preference quand la fenêtre du login renvoi true(vrai) (apres cela appelle le java qui verifie si le loginet le password est correct en théorie)
Voila ce que j'ai essayer de faire (et qui marche po ):

Code :

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

1
2
3
4
5
6
7
[Run]
;Filename: {app}\soft\acrobatReader\1_AdbeRdr705_fra_full.exe; StatusMsg: Installing acrobatReader...; Parameters: "/verysilent /group=""{groupname}\oemboutique\soft\acrobatReader"""
;Filename: {app}\soft\tomcat\5 jakarta-tomcat-4.1.30.exe; StatusMsg: Installing tomcat...; Parameters: "/verysilent /group=""{groupname}\oemboutique\soft\tomcat"""
;Test pour executer un java.exe
Filename: E:\soft\j2sdk1.4.1_01\bin\java.exe com.sellside.web.bean.InnoSetup.Opticalsoftdb; StatusMsg: Installing tomcat...; Parameters: "com.sellside.web.bean.InnoSetup.Opticalsoftdb"

J'ai essayer de mettre un path "com.sellside.web.bean.InnoSetup.Opticalsoftdb" apres "java.exe", et ca gueule quand je l'execute (apres l'avoir compiler (qui passe) )

Apres j'ai essaye desesperement de mettre ca dans Parameters, mais ca marche pas on dirai

Si quelqu'un peu m'aider, merci.

[K_WOLF]

Bon ceux que ca interresse, j'ai executer mon java avec un .bat avec la fonction Exec (on peut aussi utiliser ShellExec) d'InnoSetup et j'ai passé des parametres au .bat avec "ExpandConstant(UserPage.Values[0]+' '+UserPage.Values[1]...)".

Et dans le bat le args[0] correspond à %1, puis args[1] à %2, etc....

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
54
55
56
57
58
59
60
61
62
63
64
65
66
67
 
procedure InitializeWizard;
begin
  { Create the pages }
 
  UserPage := CreateInputQueryPage(wpInstalling,
    'Personal Information', 'Who are you?',
    'Entrer votre login et mot de passe, puis cliquer sur suivant');
  UserPage.Add('Login:', False);
  UserPage.Add('Mot de passe:', True);
end;
 
function NextButtonClick(CurPageID: Integer): Boolean;
begin
	if CurPageID = UserPage.ID then begin
		if UserPage.Values[0] = '' then begin
		  MsgBox('Vous devez entrez votre login.', mbError, MB_OK);
		  Result := False;
		end else begin
			YesInsert := 'no';
			if not ShellExec('open',ExpandConstant('E:\testjava.bat'), ExpandConstant(UserPage.Values[0]+' '+UserPage.Values[1]+' '+YesInsert), '', SW_HIDE, ewWaitUntilTerminated, ResultCode) then begin
				Result := False;
				// handle failure if necessary
				MsgBox('DeinitializeSetup:' #13#13 'Execution of ''' + ''' failed. ' + SysErrorMessage(ResultCode) + '.', mbError, MB_OK);
			end else begin
				if not Result = False then begin
					MsgBox('MAUVAIS login ou mot de pass:'+SysErrorMessage(ResultCode)+ #13#13 'Ok, bye bye.', mbInformation, MB_OK);
					Result := False;
				end else begin
					Result := True;
					MsgBox('BON login ou mot de pass:'+SysErrorMessage(ResultCode)+ #13#13 'Ok, bye bye.', mbInformation, MB_OK);
					User :=UserPage.Values[0];
					Pwd :=UserPage.Values[1];
					MsgBox(UserPage.Values[0]+' '+UserPage.Values[1]+' '+YesInsert, mbError, mb_Ok);
				end;
			end;
		end;
	end else if CurPageID = wpUserInfo then begin
		Result := True;
	end else if CurPageID = wpSelectDir then begin
		Result := True;
	end else if CurPageID = wpPassword then begin
		Result := True;
	end else if CurPageID = wpWelcome then begin
		Result := True;
	end else if CurPageID = wpInstalling then begin
		Result := True;
	end else if CurPageID = wpFinished then begin
		Result := True;
	end else if CurPageID = wpInfoBefore then begin
		Result := True;
	end else if CurPageID = wpInfoAfter then begin
		Result := True;
	end else if CurPageID = wpSelectComponents then begin
		Result := True;
	end else if CurPageID = wpSelectTasks then begin
		Result := True;
	end else if CurPageID = wpSelectProgramGroup then begin
		Result := True;
	end else if CurPageID = wpReady then begin
		Result := True;
	end else if CurPageID = wpSelectDir then begin
		Result := True;
	end else if CurPageID = wpPreparing then begin
		Result := True;
	end;
end;

Le testjava.bat :

Code :

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

1
2
3
4
5
 
java -classpath "tout vos .jar" "la class à compiler" %1 %2 %3
if %errorlevel% == 0 echo login ou mot de pass correcte
echo %errorlevel%
exit /B %errorlevel%

Remarque : monjava renvoie 0 ou 1 et ainsi avec le errorlevel, java.bat renvoie ce resultat à InnoSetup pour le traite dans InnoSeup...