26-12-20, 12:12 AM
26-12-20, 10:29 AM
مهم جدا ان تحذفي user_name المكرر من بيانات الجدول قبل تنفيذ الخطوه التاليه
في نفس الشاشه التي في الصوره اضغطي بالزر الايمن على user_name ثم Indexes/Keys ثم Add ثم اجعلي الخاصيه Type لتكون Unique Key
26-12-20, 05:22 PM
شكرا
اضفت السطر التالى ليظهر اسم المستخدم فى الفورم الاساس للبرنامج
كما فى الصوره
فظهر خطاء
اضفت السطر التالى ليظهر اسم المستخدم فى الفورم الاساس للبرنامج
كود :
Dim userid = (From us In DBcontext.user7s Where us.user_name = Txtuser_name.Text).ToList()(0)
فظهر خطاء
26-12-20, 06:10 PM
المتغير us المستخدم في كود ال linq محجوز سابقا داخل الكود
اختاري اسم متغير جديد لا يكون محجوز مثل myuser
وتحتاجي اضافه اسم المتغير user_id في نهايه هذا السطر
اختاري اسم متغير جديد لا يكون محجوز مثل myuser
وتحتاجي اضافه اسم المتغير user_id في نهايه هذا السطر
كود :
Dim userid = (From myuser In DBcontext.user7s Where myuser.user_name = Txtuser_name.Text).ToList()(0).user_id26-12-20, 08:02 PM
كيف عرفت انها كلمه محجوزه
26-12-20, 08:23 PM
26-12-20, 08:48 PM
enclosing block تعنى كلمه محجوزه اليس كذلك
لقد ارفقت البرنامج للتعديل حيث عدلت الكلمه الى myuser و لم يعمل
[attachment=26184]
لقد ارفقت البرنامج للتعديل حيث عدلت الكلمه الى myuser و لم يعمل
[attachment=26184]
26-12-20, 08:55 PM
هذا السطر قد حجر اسم المتغير us
وكود ال linq عندما اراد ان يحجز نفس الاسم حدثت المشكله
لم انتبه انك عدلت ردك السابق الذي فهمت منه انه لا توجد مشكله اخرى
لم اجد قاعدة البيانات لتجربه البرنامج
كود :
Dim us As New user7وكود ال linq عندما اراد ان يحجز نفس الاسم حدثت المشكله
لم انتبه انك عدلت ردك السابق الذي فهمت منه انه لا توجد مشكله اخرى
كود :
frm.Lbl_user_id.Text = useridلم اجد قاعدة البيانات لتجربه البرنامج
26-12-20, 11:21 PM
ارفقت الداتابيس
14-01-21, 12:53 AM
إقتباس :اقتباس من المشاركة رقم 6طبقت نفس الكلام مع فورم Frm_banks_Checks_comercialpapers لم ينفذ حيث اضفت
السلام عليكم اخي الكريم
عندما تضع اسم المستخدم في فورم تسجيل الدخول ثم تريد اظهار هذا الاسم (اي المستخدم الحالي) في الفورم الرئيسية في label
اكتب التالي :
كود :
كود :
Dim frm As New MDIParentaccounting()
frm.Txtuser_name.Text = Me.Txtuser_name.Text
Me.Hide()
frm.Show()
نعرف نسخة من الفورم الرئيسية frm
ثم نسند القيمة الموجودة في مربع اسم المستخدم من فورم الدخول الى اللايبل الموجود في الفورم الرئيسية
نخفي فورم الدخول
نظهر الفورم الرئيسية
كود :
Dim frm2 As New Frm_banks_Checks_comercialpapers
frm2.Lbluser_name.Text = Me.Txtuser_name.Text