پسورد در فرم

[erfan119]

سلام خدمت تمام مدیران و کاربران عزیز .

چگونه صفحه ورود بنویسم که وقتی پسورد رو درست میزنی وارد Form بشه ؟

[ho3ein.3ven]

سلام خدمت تمام مدیران و کاربران عزیز .

چگونه صفحه ورود بنویسم که وقتی پسورد رو درست میزنی وارد Form بشه ؟

Private Sub Command1_Click()
If Text1.Text = Adodc1.Recordset.Fields("user") And Text2.Text = Adodc1.Recordset.Fields("pass") Then
main.Show
Unload Me
Else
MsgBox "eshtebah ast"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End If
End Sub
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from login"
Adodc1.Refresh
End Sub

[erfan119]

Private Sub Command1_Click()
If Text1.Text = Adodc1.Recordset.Fields("user") And Text2.Text = Adodc1.Recordset.Fields("pass") Then
main.Show
Unload Me
Else
MsgBox "eshtebah ast"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
End If
End Sub
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from login"
Adodc1.Refresh
End Sub

ممنون از پاسخ خوبتون ولی من در قسمت
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from login"
Adodc1.Refresh
مشکل دارم میشه کمی بیشتر راهنمایی کنید ؟ با تشکر

[Veteran]

برای اتصال
از این استفاده کنید

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.path & "\db1.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "Select * From [login]"
Adodc1.Refresh

[ho3ein.3ven]

ممنون از پاسخ خوبتون ولی من در قسمت
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from login"
Adodc1.Refresh
مشکل دارم میشه کمی بیشتر راهنمایی کنید ؟ با تشکر

برای متصل شی ado به بانک است. اگر هم نخواستید از طریق کد نویسی متصل کنید . اشکالی نداره . می تونید این کد ها رو پاک کنید.