التأكد من كلمة المرور ثم الانتقال

اخوي vBsQ

بالنسبة للسؤال الاول :

اولا: لازم يكون عندك جدول خاص باسم المستخدم وكلمة المرور

ثانيا: في زر الدخول في فورم تسجيل الدخول تضع الكود التالي مع تغيير اللازم يعني اسم الجدول واسم العامود وغير ذلك

mydataset.Clear()
            Dim Str As String = "SELECT * FROM USERS WHERE UserName='" & txtUserName.Text.Trim & "' AND Password='" & txtPass.Text.Trim & "'", con_str
            MyAdapter = New OleDbDataAdapter(Str, CON)
            MyAdapter.Fill(mydataset, "USER")
            If mydataset.Tables("USER").Rows.Count > 0 Then
USERNAME = mydataset.Tables("USER").Rows(0).Item("UserName")

Else
                'If the user entered invalid user name or password.
                txtUserName.Clear()
                txtPass.Clear()

                MessageBox.Show("Invalid User Name or Password !", "Password", MessageBoxButtons.OK, MessageBoxIcon.Error)

            End If

طبعا لازم يكون المتغير USERNAME متغير عام موجود في Module ..

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

أعتقد ان هذا اللينك سوف يساعدك

/index.ph...=53919&hl=users

وايضا هذا اللينك فقد صادفتني نفس المشكلة ويوجد مثال مرفق موضح لما تريده

/index.ph...68entry435268

اخواني أشكر لكم ردودكم ... ولكن ما اريده ليس بهذه القوة ..

الاسم وكلمة المرور مخزنه في الفورم مسبقا .. كل ما اريده هو مطابقة بما هو مخزن في الفورم ثم الانتقال بدون استخدام قاعدة بيانات

dim myuser as string="A"

dim mypass as string="b"

if txtuser=myuser and txtpass=mypass then

form.show

else

msgbox"المستخدم وكلمه السير ليس صحيح"

end if

اشكرك

ممكن كود التأكد من صحة التاريخ بعد اكتابة الشفرة اللازمة لأستدعاء الاداة datetimepicker عند النقر على القائمة المنسدلة

ممكن توضح

القصد : أريد كود تفحص التاريخ المدخل في التيكس بعد أختيارة من اداة التاريح أو بكتابته في التيكس ثم الانتقال منه

كما أريد كود لكتابة ارقام فقط في التيكس

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

اما السؤال اناني ابحث في المنتدي