انا عامل مشروع عن التسجيل الاكاديمى و ناقص شويه تظبيطات فى الفورم و فى تريجر مش عارف اعملوا
من ناحيه الفورم الفورم الى فى البدايه ان اليوزر يدخل اسموا و باص ورد بيدخل اى حد كتب اى حاجه بيخش على الفورم الى بعديها و داه غلط مش عارف اصلحوا

و ماده المشروع لو سجلت فى ترم ب عدد ساعات زيروا تتسجل فى التم التانى اجبارى ب 3 ساعات

ارجوا المساعه الميل الخاص بى [email protected]

اخر معاد للمناقشه كمان 10 ايام

بسم الله الرحمن الرحيم
قم بكتابه الكود التالى مع تغير الاسماء لديك

IF :USER = ('USER_NAME') THEN 
CALL_FORM('FORM_NAME');
ELSIF :USER <> ('USER_NAME') THEN 
MESSAGE('USER NAME WRONG');
MESSAGE('USER NAME WRONG');
RAISE FORM_TRIGGER_FAILURE
END IF;
IF :PASS = ('USER_PASSWORD') THEN 
CALL_FORM('FORM_NAME');
ELSIF :PASS <> ('USER_PASSWORD') THEN 
MESSAGE('PASSWORD WRONG');
MESSAGE('PASSWORD WRONG');
RAISE FORM_TRIGGER_FAILURE
END IF; 

بسم الله الرحمن الرحيم
قم بكتابه الكود التالى مع تغير الاسماء لديك
IF :USER = ('USER_NAME') THEN
CALL_FORM('FORM_NAME');
ELSIF :USER <> ('USER_NAME') THEN
MESSAGE('USER NAME WRONG');
MESSAGE('USER NAME WRONG');
RAISE FORM_TRIGGER_FAILURE
END IF;
IF :PASS = ('USER_PASSWORD') THEN
CALL_FORM('FORM_NAME');
ELSIF :PASS <> ('USER_PASSWORD') THEN
MESSAGE('PASSWORD WRONG');
MESSAGE('PASSWORD WRONG');
RAISE FORM_TRIGGER_FAILURE
END IF;

شكرا يا بشمهندس بس للاسف مشتغلتش فى فى الفورم تريجر بتعمل compile without error

بس فى الفورم نفسها بيكتبلك handling error

شكرا يا بشمهندس اسلام و لله بعد عده محاولات و تعديلات على الكود الرائع الى ادتهونى




--:global.v_student_id := :passwords.user_id;

--call_form('E:\IMPORTANT\starter.fmx');

IF :USER_id = ('2005107') and :passwd = ('wwww')
or :USER_id = ('2003203') and :passwd = ('eeee')

or :USER_id = ('2000304') and :passwd = ('qqqq')

or :USER_id = ('2004112') and :passwd = ('tttt')

or :USER_id = ('2006120') and :passwd = ('aaaa')

or :USER_id = ('2006222') and :passwd = ('ssss')

or :USER_id = ('2005211') and :passwd = ('dddd')

or :USER_id = ('2001200') and :passwd = ('cccc')

or :USER_id = ('2001305') and :passwd = ('mmmm')

or :USER_id = ('2003444') and :passwd = ('bbbb')

THEN
CALL_FORM('E:\IMPORTANT\starter.fmx');
ELSIF :USER_id <> ('2005107') or :passwd = ('wwww')
THEN
MESSAGE('WRONG enter');
MESSAGE('WRONG enter');
RAISE
FORM_TRIGGER_FAILURE;
END IF;
-- IF :passwd = ('wwww')
-- THEN
-- CALL_FORM('E:\IMPORTANT\starter.fmx');
-- ELSIF :passwd <> ('wwww')
-- THEN
-- MESSAGE('PASSWORD WRONG');
-- MESSAGE('PASSWORD WRONG');
-- RAISE
-- FORM_TRIGGER_FAILURE;
-- END IF;

اطريت انى اكرر المسئله 10 مرات على عدد اليوز الىهناقش المشروع بيهم انا عارف انوا حل مش كويس بس حل المشكله بردوا

لو ممكن يا بشمهندس عندى سوال تانى الفورم دى بتنادى على فورم تانيه فيها اتنين بوتم ولاحد student_result و التانى reg

كنت عاوز كود ياخد user_id الى داخل من اول فورم و هو داه الى يعمل عاليه كويرى يجيب نتيجه الطالب و يعرضها يا رب تكون المشكله وضحت مستنى الحل
و اشكر جدا على مساعداتك

تم تعديل 7 يونيو 201015 سنة بواسطة shalata

فى مشكله تانيه فى الترجر لو ممكن حد يساعدنى فيها

تم تعديل 7 يونيو 201015 سنة بواسطة shalata

يا اخي او لمشكلة عندك في المستخدمين انت ممكن تعمل جدول مثلا يكون اسمه " user "
بعدين تكتب هذا الكود في التريجر

declare
n number(2);

begin


select 1
into y
from user
where USeR_NAME=:BLOCK7.uer_name and USeR_ID =:BLOCK7.user_id;

:global.UNAME:=:BLOCK7.user_id;
exception
when no_data_found then
message('خطا في ادخال كلمة السر والمستخدم');
end;

وانك تريد استخدام اليوز في الالكويري في الشاشه التانية باستخدام ان تضع اسم المستخدم في global variable مثل
:global.User_NAME:=:BLOCK7.user_id;

وفي الكويري الذي تريد استخدامه يمكنك استخدامه وفي جمله where
يمكن استخدام global.User_NAME

تم تعديل 8 يونيو 201015 سنة بواسطة معتز السيد

انا مو فاهمة شو القصد من هالكودات ؟

انا بعد عندي مشروع
وعندي نفس المشكلة في اليوزر وبالباسورد

علشان تعملي شاشه دخول
الاول اعملي جدول اسمه employees
فيه حقول مثلا اسم الموظف ورقمه كلمه السر والصلاحيه و الراتب ورقم الهاتف والايميل وكدا
اعملي فورمه للجدول دا تدخلي بيها البيانات

بعد كدا اعملي فورمه شاشه الدخول فيها 2 ايتم داتا بيز نو
الاول اسم الموظف والتاني كلمه السر وزرار مكتب عليه دخول وحطي التريجر دا فيه

declare
user_tru number;
begin
select count(*) into user_tru from employees
where password=:password and name=:name;

if user_tru =1 then
select privilege into :global.prv from employees 
where password=:password;
call_form();
else
message('wrong password or user name');
message('wrong password or user name');
raise form_trigger_failure;
end if;
end

;