[ تمت الإجابة ]شاشة الدخول

النرجسي كتب:

السلام عليكم ورحمة الله وبركاته

تحية طيبة للجميع

وبعد

فأنا مبتدء في البرمجة بلغة الفيجوال وكنت أريد عمل شاشة دخول للبرنامج والحمدلله من خلال قرأتي ومتابعتي لما يطرح هنا وهناك بدأت أولى الخطوات ولكن واجهتني مشكلتين الا وهي:

الأولى

تم الإتصال بقاعدة البيانات بشكل صحيح ولكن عندما ادخل اسم المستخدم وكلمة المرور تظهر رسالة تفيد أنه يوجد خطا في أحدهما !!!!

الثانيه

يوجد حقل نص ثالث خاص بالرقم الوظيفي للمستخدم وأريد أن يقوم المستخدم بإدخال رقمه الوظيفي فقط دون كتابة اسمه حيث أن اسم المستخدم سيظهر تلقائياً بعد كتابة الرقم الوظيفي

أرجوا من الله ثم منكم إرشادي إلى الطريقة الصحيحة مع الشرح إن أمكن

وأسال الله أن يثيبكم على ذلك

يوجد ملف بالمرفقات يوضح ذلك

User.rar

مرحبا اخي الكريم

انا شخصيا لم اقم بتحميل المرفقات لان عندي مشكلة بالمتصفح :lol: لكن استطيع ارشادك الي عدة طرق تستطيع استخدامها فيما بعد

اولا وهذا الافضل عند استخدامك لمكتبة اكتف اكس Activex وهذه الافضل لطريقة ربط القواعد ومرنة بصورة عالية جدا

اذا استخدمة هذه المكتبة تستطيع كتابة الكود التالي لتحقق من كلمة المرور واسم المستخدم (مع توفير اداتين textbox)

Sql="select*from  TableName where user ='"& text_user &"' and pass ='"& text_pass&"'"

بهذه الطريقة لن تستطيع العبور الي بعد عمل مقارنة وتطابق لاسم المستخدم وكلمة المرور

طبعا بعد التأكد من كل الحقول غير خالية

اما بالنسبة للمشكلة الثانية يمكنك حلها عن طريق توفير اداة textBox وكتابة كود التحقق من رقم الهوية للموظف داخل الحدث Changtext للاداة

وتوفير اداة Label لعرض اسم المستخدم عن طريق الكود التالي

SQL="select*from TableName where id='"&Text_ID&"'"
Label=record.filelds!id

هذا والله اعلم B)

مع تحياتي

تـفضل مثالك بعد التعديل

تحياتي

User.rar

al7re4 كتب:

مرحبا اخي الكريم

انا شخصيا لم اقم بتحميل المرفقات لان عندي مشكلة بالمتصفح :lol: لكن استطيع ارشادك الي عدة طرق تستطيع استخدامها فيما بعد

اولا وهذا الافضل عند استخدامك لمكتبة اكتف اكس Activex وهذه الافضل لطريقة ربط القواعد ومرنة بصورة عالية جدا

اذا استخدمة هذه المكتبة تستطيع كتابة الكود التالي لتحقق من كلمة المرور واسم المستخدم (مع توفير اداتين textbox)

Sql="select*from  TableName where user ='"& text_user &"' and pass ='"& text_pass&"'"

بهذه الطريقة لن تستطيع العبور الي بعد عمل مقارنة وتطابق لاسم المستخدم وكلمة المرور

طبعا بعد التأكد من كل الحقول غير خالية

اما بالنسبة للمشكلة الثانية يمكنك حلها عن طريق توفير اداة textBox وكتابة كود التحقق من رقم الهوية للموظف داخل الحدث Changtext للاداة

وتوفير اداة Label لعرض اسم المستخدم عن طريق الكود التالي

SQL="select*from TableName where id='"&Text_ID&"'"
Label=record.filelds!id

هذا والله اعلم B)

مع تحياتي

omani كتب:

تـفضل مثالك بعد التعديل

تحياتي

أسال الله أن يجزاكم الجنة جميعاً

اخوي omani شاكر لك صنيعك فلاحرمك الله الأجر

لو تتفضل علي بارك الله فيك وتكمل معروفك في إفهام أخيك الجاهل بهذا الأمر ما هو خطأي السابق في الإتصال بقاعدة البيانات

والسؤال الأخر هل نفس جملة الإتصال التي كتبتها تنفع لو استخدمت مع SQL server 2000 ?

بارك الله في علمك وعملك;

النرجسي كتب:

أسال الله أن يجزاكم الجنة جميعاً

اخوي omani شاكر لك صنيعك فلاحرمك الله الأجر

لو تتفضل علي بارك الله فيك وتكمل معروفك في إفهام أخيك الجاهل بهذا الأمر ما هو خطأي السابق في الإتصال بقاعدة البيانات

والسؤال الأخر هل نفس جملة الإتصال التي كتبتها تنفع لو استخدمت مع SQL server 2000 ?

بارك الله في علمك وعملك;

خطأك هو وضع مسافات بين الفواصل ..

نعم تعمل مع كل انواع قواعد البيانات .. فقط الذي يختلف هو كود الاتصال بقاعدة البيانات ..

تحياتي

omani كتب:

خطأك هو وضع مسافات بين الفواصل ..

نعم تعمل مع كل انواع قواعد البيانات .. فقط الذي يختلف هو كود الاتصال بقاعدة البيانات ..

تحياتي

لو سألتك اخي العزيز عن كود إتصال قاعدة بيانات SQL Server 2008 كيف يكون شكلها ؟؟

وماذا يعني هذا الخطأ ؟؟

جزاك الله خير على صبرك وتعليمك لنا

النرجسي كتب:

لو سألتك اخي العزيز عن كود إتصال قاعدة بيانات SQL Server 2008 كيف يكون شكلها ؟؟

وماذا يعني هذا الخطأ ؟؟

جزاك الله خير على صبرك وتعليمك لنا

بالنسبة للسؤال الاول .. راجع هذا الرابط

/index.php?showtopic=236910

بالنسبة للسؤال الثاني .. يقول ان هناك خطأ في القيم المرسلة الى المتغير .. او جملة الاسكيوال .

تحياتي

omani كتب:

بالنسبة للسؤال الاول .. راجع هذا الرابط

/index.php?showtopic=236910

بالنسبة للسؤال الثاني .. يقول ان هناك خطأ في القيم المرسلة الى المتغير .. او جملة الاسكيوال .

تحياتي

جزاك الله خير ياغالي ووفقك الله على صبرك ومتابعتك فلك كل الشكر

أخي العزيز الحقيقة أنني حاولت في جلب اسم المستخدم بدلالة الرقم الوظيفي ولكن فشلت كل محاولاتي

فقمت بإرفاق مثال على ما اريد عمله على قاعدة بيانات SQL 2000 حتى أستطيع أن أقارن بين الملفين لرؤية مكان الخطأ الذي وقعت فيه فلاحرمك الله الأجر وجزاك الله كل خير

تحياتي

Project.rar

النرجسي كتب:

جزاك الله خير ياغالي ووفقك الله على صبرك ومتابعتك فلك كل الشكر

أخي العزيز الحقيقة أنني حاولت في جلب اسم المستخدم بدلالة الرقم الوظيفي ولكن فشلت كل محاولاتي

فقمت بإرفاق مثال على ما اريد عمله على قاعدة بيانات SQL 2000 حتى أستطيع أن أقارن بين الملفين لرؤية مكان الخطأ الذي وقعت فيه فلاحرمك الله الأجر وجزاك الله كل خير

تحياتي

أخي لم استطع الاتصال بقاعدة البيانات المرفقة .. ارجو ان تقوم بارفاق نسخه 2008 .

تحياتي

omani كتب:

أخي لم استطع الاتصال بقاعدة البيانات المرفقة .. ارجو ان تقوم بارفاق نسخه 2008 .

تحياتي

السلام عليكم ورحمة الله وبركاته

أولا جزاك الله كل خير على صبرك ومتابعتك فإن دل ذلك على شي فإنما يدل على حسن أخلاقك فلا حرمك الله الأجر

ثانياً أعتذر منك لأنني لم أوضح لك بأن هناك ملف Text مرفق مع المجلد باسم C.Text وهذا الملف وظيفته تحديد اسم قاعدة البيانات واسم السيرفر فيبدو أن المشكلة لديك تكمن في هذا الملف لإنك لم تعدل مسمى السيرفر إلى اسم الجهاز الذي مثبت عليه السيرفر لديك وهذا خطأي بارك الله فيك وقد جربت المرفق على سيرفر 2000 وسيرفر 2008 على جهازين مختلفين واشتغل بدون مشاكل

وهذه صورة موضحه للملف

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

تحياتي

بالمرفقات قاعدة بيانات 2008

Project.rar

اخي ليست هنا المشكلة فأنا اعرف هذه .. ولكن يوجد ملف اللوج Log التابع لقاعدة البيانات .. ولن نستطيع الاتصال بقاعدة البيانات بدونه .

ارفق لي الملفين .. الاول يكون من نوع mdf والثاني يكون من نوع ldf وهو يحمل نفس اسم الملف السابقة مع نهاية Log

ارجو ان ترسل الملفات .

تحياتي

السلام عليكم ورحمة الله وبركاته

تحياتي لك أخي عماني وبارك الله فيك على تواصلك ودعمك فلاحرمك الله الأجر وجزاك الله الف الف خير

ارسلت لك ملفين تأتي بأسم قاعدة البيانات من نوع MDF و LDF فإن كان هو المطلوب فقد أرفقتهما في هذه المشاركة باسم

StorageManag1.MDF

StorageManag1_1.LDF

وإن لم يكونا هما المطلوبين فبارك الله فيك أخبرني كيف أجدهما ولك وافر التحية والعطاء والدعاء

تحياتي

Storage Manag.rar

نعم اخي هما الملفان المطلوبان ..

ضع هذا الكود في حدث change الخاص بمربع النص txtEmpNo

 Dim rs As New ADODB.Recordset

 If rs.State = 1 Then rs.Close

 rs.Open " select UserName from UserData Where EmployeeID='" & txtEmpNo.Text & "' ", conn, adOpenStatic, adLockOptimistic

If rs.RecordCount > 0 Then
   txtUser = rs.Fields("UserName")
Else
 txtUser = ""
End If

rs.Close
Set rs = Nothing

على فكرة اخي الكريم .. انت هنا في زر اللوج اون .. تقوم بالبحث من جدول بيانات الموظفين وهو لا يحتوى على حقل باسووورد . . وهو لا علاقة له بجدول اللوج أون UserData المفروض ان تقوم بفتحه والتحقق من قاعدة كلمة المرور .

أتمنى أن يكون الكود المطلوب .

ولاي استفسار فأنا في الخدمة .

omani كتب:

أتمنى أن يكون الكود المطلوب .

ولاي استفسار فأنا في الخدمة .

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

أكرمتني بطيبتك وحسن أخلاقك وتعاملك وأدبك فوالله ما أجد لك عندي إلا دعوه صادقة أرفعها إلى الكريم المنان أن يجازيك ويكافئك برحمته وكرمه وعطائه

نعم اخي الكريم هو المطلوب فجزاك الله كل خير

لله درك فوالله أسرتني بمعروفك فجزاك الله كل خير وفرج عنك كل كربه ومحى عنك كل سيئة ورفعك الله إلى اعلى الجنان

شكرا شكرا شكرا لك أخي عماني

تحياتي

العفو اخي الكريم .

لا اريد اكثر من الدعاء لي ولوالدّي .

تحياتي