ایجاد فرم نام کاربری و رمز عبور

[مهسا رشیدپور]

سلام ، وقت بخیر
یه سوال توی اکسس دارم که امیدوارم کمکم کنید و اون سوال اینه
استفاده ار کد کاربری و رمز عبور در ابتدای ورود برنامه ؟
قسمت شرط رو نمیدونم باید چه جوری و کجا بنویسم ؟
لطفا اگه میشه روی یه فایل access مراحل رو نشونم بدین ؟

[AbbasSediqi]

منظورتون استفاده از رمز ورود و پسورد خود اکسس هستش یا ایجاد برنامه ای برای ورود؟

[AbbasSediqi]

یه نمونه گذاشتم
البته ببخشید از روی یه برنامه که برای شرکت مخابرات نوشتم جداش کردم
برای دیدن سورس کلید Shift رو موقع اجرای فایل نگه دار تا به سورس دسترسی پیدا کنی

[مهسا رشیدپور]

با تشکر از اینکه پاسخ سوال من رو دادین
اگر ممکن هست میشه روی دکمه ورود یه کم توضیح بدین ؟ اینکه آیا دکمه هست ، label هست یا چیز دیگری ؟
تا حدودی می فهمم که کد چه کار می کنه ولی تنطیمات دکمه ورود رو اگر برام توضیح بدین ممنون می شم

[مهسا رشیدپور]

مرسی مشکلم توی اون قسمت حل شد ، خودم درستش کردم

[ATA_TABRIZ]

با سلام
اگه زحمتي نيست اين برنامه را با 2003 بذارين منم به اين برنامه نياز دارم
با تشكر

[AbbasSediqi]

ببخشید بابت تاخیر دوسه روزه
بفرمائید اینم فایل تحت اکسس 2003

[rohamsport2]

سلام دوست عزیز
ممنون از فایل خوبت
خیلی کاربردی بود
فقط میشه در مورد دکمه ورود و اینکه بعد از اینکه نام کاربری درست وارد کرده شد و فرم اصلی برنامه باز بشه چطوریه
هر کاری کردم نشد
تو کدها هم هرچی گشتم نتونساتم کاری کنم
ممنون میشم

[rohamsport2]

سلام دوستان کسی نیست ج.واب بده

[Mehr@ban]

سلام دوست عزیز
ممنون از فایل خوبت
خیلی کاربردی بود
فقط میشه در مورد دکمه ورود و اینکه بعد از اینکه نام کاربری درست وارد کرده شد و فرم اصلی برنامه باز بشه چطوریه
هر کاری کردم نشد
تو کدها هم هرچی گشتم نتونساتم کاری کنم
ممنون میشم

سلام
در صورت معتبر بودن هویت کاربر در نام کاربری و رمز عبور، دستور باز شدن فرم اصلی و بستن فرم جاری رو بدین

برای باز کردن فرم اصلی

docmd.openform "frmMain"



و برای بستن هم

docmd.close

[rohamsport2]

سلام
در صورت معتبر بودن هویت کاربر در نام کاربری و رمز عبور، دستور باز شدن فرم اصلی و بستن فرم جاری رو بدین

برای باز کردن فرم اصلی

docmd.openform "frmMain"



و برای بستن هم

docmd.close

ممنون دوست عزیز
کجای این کد باید بذارمش.؟
Private Sub cmdLogin_Click()
Dim USNM As String
Dim ADN As Integer
If IsNull(Me.cmbUserName) Then
USNM = ""
Else
USNM = Me.cmbUserName
End If
If Me.Admin = True Then
ADN = 1
Else
ADN = 0
End If
TempVars.Add "ADN", ADN
TempVars.Add "KRBR", USNM
If Me.txtPassword = Me.Password Then
MsgBox "Èå ÓíÓÊã ÎæÔ ÂãÏíÏ", vbInformation + vbMsgBoxRtlReading, "åÔÏÇÑ ÓíÓÊã!"
Else
MsgBox "ÑãÒ æÑæÏ ÇÔÊÈÇå ÇÓÊ", vbMsgBoxRtlReading + vbCritical, "íÇã ÓíÓÊã !"
End If
End Sub

[fffzzzjjj]

سلام
در صورت معتبر بودن هویت کاربر در نام کاربری و رمز عبور، دستور باز شدن فرم اصلی و بستن فرم جاری رو بدین

برای باز کردن فرم اصلی

docmd.openform "frmMain"



و برای بستن هم

docmd.close

سلام دوست عزيز ببخسيد مزاحم ميشم لطفا در صورت امكان راهنمايي كنيد من چطور اين دو دستور را اعمال كنيد . ممنون از راهنماييتون

[Mehr@ban]

سلام

بابت تاخیر عذرخواهی میکنم!
میتونید از نمونه برنامه زیر استفاده کنید
https://barnamenevis.org/showthread.php?554278

یه راهنمایی کلی هم مینویسم تا با کلیات عملکرد فرم ورود آشنا بشید

روال کار به این صورت هست که
1. کنترل کنید که در فیلدهای نام کاربری و گذرواژه داده ای وارد شده باشه و خالی نباشه!
2. نام کاربری در جدول کاربران موجود باشه اگر نبود پیام یا عملکرد مناسبی انجام بشه
3. گذرواژه وارد شده با رمز مربوط به نام کاربری یکسان باشه اگر نبود پیام یا عملکرد مناسبی انجام بشه
4. در انتها اگر همه موارد معتبر بود و تمامی شرایط مثبت بود، فرم مورد نظر بعدی باز بشه و فرم ورود بسته بشه