منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

بسم الله الرحمن الرحيم

السلام عليكم ،

عندي برنامج بلغة الفيجوال دوت نت البرنامج عبارة عن قاعدة بيانات لموظفين بلغة الدوت نت كما في الصورة الواجهة الرئيسة للبرنامج مربوطة ومتصلة بقاعدة بيانات اكسس السؤال هو كيف يمكن ان اجعل من القوائم الرئييسية الخاصة بواجهة البرنامج او الفورم الاساسي ممنوع فيها التعديل مثل الحذف او الحفظ على كل القوائم واجعل من البرنامج فقط للمشاهدة والاستعراض من دون تعديل او تغير وتكون الخيارات مثل الحفظ العام او الحذف وغيرها مجمدة .

وعلى اساس ان تكون الصلاحية با الاضافة او التعديل اوالمسح من القاعدة نفسها الاكسيس وشكراً.

اتمنى المساعدة في اقرب وقت متاح.

(29-10-14, 07:25 PM)محمد مسافر كتب : [ -> ]بسم الله الرحمن الرحيم

السلام عليكم ،

عندي برنامج بلغة الفيجوال دوت نت البرنامج عبارة عن قاعدة بيانات لموظفين بلغة الدوت نت كما في الصورة الواجهة الرئيسة للبرنامج مربوطة ومتصلة بقاعدة بيانات اكسس السؤال هو كيف يمكن ان اجعل من القوائم الرئييسية الخاصة بواجهة البرنامج او الفورم الاساسي ممنوع فيها التعديل مثل الحذف او الحفظ على كل القوائم واجعل من البرنامج فقط للمشاهدة والاستعراض من دون تعديل او تغير وتكون الخيارات مثل الحفظ العام او الحذف وغيرها مجمدة .

وعلى اساس ان تكون الصلاحية با الاضافة او التعديل اوالمسح من القاعدة نفسها الاكسيس وشكراً.

اتمنى المساعدة في اقرب وقت متاح.

الحين انت حاط زر التعديل وتقول ما ابغه احد يغير في المعلومات ؟؟؟؟؟؟؟؟

اخي الكريم المطلوب بسيط لو هو على ظاهره وهو ان تقوم بتعطيل الازرار

كود :

for each ctrl in me.controls

if typeof ctrl is button then

ctrl.enabled=false

end if

next

شكراً ابو سعود وجدت الحل Enable False تكون مجمدة في عندي سوال وهو كيف يمكن يكون الخط ملون على بعض الاسماء مثلآً رقم التلفون بالاحمر .

كود :

TextBox1.ForeColor = Color.Red

        TextBox2.ForeColor = Color.YellowGreen

شكراُ ابو سعود قصدي عندي 200 موظف عندي في في بوتون في مشروعي اسمة state والتاكس بوكس بيكون ثلاة خيارات Normal ,Unpaid ,Sick اريد لكل موظف في التاكي بوكس اذا طلعت الكتابة Sick او Unpaid تطلع بالاحمر لكل موظف يطلع في بيانتة كذة تلقائياً اما Normal يكون اسود طبيعي اتمنى تكون الفكرة وصلت.

اكتب شرط لـ state

كود :

if state ="exm1"

then

textbox1.forecolor=red

else

.....

end if

كتبت الكود بشكل سريع واعتذر لو فيه خطا املائي