سرچ یک یوزر و چک پسورد

[saeednews]

سلام.
میخوام داخل یک دیتابیس یک آیدی سرچ شود و در صورت وجود پسورد آن چک شود و اگر هر دوگزینه مثبت بود ادامه برنامه اجرا شده و در غیر این صورت پیغام خطا داده شود.
*** حال قسمت اصلی مشکل را با فرض های زیر بیان میکنم.
1- بانک اطلاعاتی ما اکسس و به نام testbase و دارای یک تیبل به نام testtable
2- فیلد اول userid و فیلد دوم userpass
3- فرم به نام loginform و دارای دو textbox و یک کلید تائید است.

--> حال چه کدی بنویسم که با فشرده کلید تائید ابتدا باکس یوزر در فیلد userid سرچ شود و در صورت وجود داشتن باکس پسورد با فیلد password همان یوزر چک شود اگر مثبت بود ادامه برنامه اجرا شده یا در غیر آن پیغام خطا دهد.


با تشکر از تمام دوستانی که همیشه یاور من بوده اند.

[shahab2025]

سلام
تاپیک شما تکراری است . لطفا آنرا حذف نموده و از تاپیک اصلی پیگیری کنید

[karim orooji]

سلام دوست عزیز ساختار و دستور برنامه مورد نظر شما به این شکل است



Dim con As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=data.mpc;")
Dim com As New OleDbCommand
Private Sub Login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Login.Click
Try
con.Open()
com.Connection = con
com.CommandText = "select * from register where id='" & txt_user.Text & "' and pass='" & txt_pass.Text & "'"
Dim reader As OleDbDataReader = com.ExecuteReader
If reader.HasRows = True Then
Me.Hide()
index.Show()
Else
lbl.Visible = True
End If
con.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try


موفق باشید

[shadi khanum]

فقط مواظب SqlInjection باشین. بهتره به جای نوشتن مستقیم دستور از یه function استفاده کنین و از پارامتر استفاده کنین

[saeednews]

مرسی ار راهنمایی دوستان عزیز نمونه سورس نوشته شده را جهت استفاده دیگر دوستان در ضمیمه قرار میدهم