Discussion :

[sofiane_bfm007]

bonsoir, j ai une application et mon probleme est :
j ai une table users et leurs attributs compte_user , pwd_user , type_user.
Donc j ai des utilisateurs qui possèdent un compte, mot de passe et son type.
j arrive pas a acceder a des pages qui correspond a chaque type d'utilisateur, et l interface que j ai utiliser possède tois champs pour introduire ces donnée et le code que j ai utiliser pour le bouton "connexion" est :

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
declare
	compte users.compte_user%type;
	pwd    users.pwd_user%type;
	type_u users.type_user%type;
  	n    number;
  	t number := 0;
 
begin
		select compte_user, pwd_user , type_user into compte, pwd, type_u
		from users
		where ((compte_user=:compte) and (pwd_user=:pwd) and (type_user=:type_u));
	--**************           appel                     **************************
		declare
 
     the_list PARAMLIST:= Get_Parameter_List('default'); 
   begin
 
        case type_u
        when 'CHEF DE STATION' then   
      	 New_Form('D:\application NAFTGD\ACCUEIL CHEF STATION',FULL_ROLLBACK, NO_QUERY_ONLY ,SHARE_LIBRARY_DATA,'default');  
        when 'CADRE D"ETUDES' then   
      	 New_Form('D:\application NAFTGD\CADRE DETUDES',FULL_ROLLBACK, NO_QUERY_ONLY ,SHARE_LIBRARY_DATA,'default');         
        when 'ADMINISTRATEUUR' then   
      	 New_Form('D:\application NAFTGD\ADMINISTRATEUR',FULL_ROLLBACK, NO_QUERY_ONLY ,SHARE_LIBRARY_DATA,'default');          
        else
   	          null; 
                -- appel_fonction; 
      end case ;
 
end;
 
	exception
 
		when no_data_found or too_many_rows then
	begin
		t:=t+1;
		if t<4 and t>1 then
		set_alert_property('message',alert_message_text,'compte utilisateur ou mot de passe incorrect !');
		n:=show_alert('message');
	  go_item('pwd');
		clear_item;
		go_item('compte');
		clear_item;
		end if;
			if t=4 then
		  set_alert_property('message1',alert_message_text,'Windows doit fermer l''application!');
		  n:=show_alert('message1');
			exit_form;
			end if;
	end;
 
	end;

il se passe rien et aucun message d'erreur, et pourtant j ai crée les interfaces qui correspant a chaque type, pour koi l appel a ces pages ne ce fais pas, aider moi je suis coinsé pour mon projet de fin d'études

[Invité]

Ça fait longtemps que j'ai fait du forms mais tu ne dois pas indiquer le chemin complet lors de l'appel, juste le nom de la forms qui doit être dans le bon répertoire - j'imagine qu'il faut le paramétrer quelque part.
Je te laisse voir là-bas :
http://sheikyerbouti.developpez.com/...g/?page=Chap37

[sofiane_bfm007]

j ai règlé le code et j ai indiquer que le nom de la page a appelé mais c le meme probleme, je vais parametré koi et comment???

[SheikYerbouti]

Les modules doivent être compilés (*.fmb) et placés dans l'un des répertoires pointé par votre variable FORMS_PATH du fichier /forms/server/default.env
Attention, avec les systèmes Unix, les noms de fichiers sont sensibles à la casse.

[sofiane_bfm007]

je vais esseyer et j'espère que je vais règler mon probleme, mais le fichier default.env je vais l'ouvrir avec quoi, et comment je vais inserer les module dedans?
donc si j ai bien compris, que touts les modules compilés deveront etre placer dedans

[Garuda]

Pas les modules !!!
mais Les chemins d'accés aux modules !!!!!

[SheikYerbouti]

La variable FORMS_PATH contient un certain nombre de directories.
Soit vous copiez vos modules exécutables dans l'une de ces directories, soit vous en ajoutez une à cette variable et copiez vos modules dans cette nouvelle directory.