Imports System.Data
Imports ADODB
Imports System.Data.Odbc
Imports System.Data.OleDb
Public Class Form2
Dim loginerror As String 'This will tell the user what is going wrong with his/her Login.
Public Function Login() 'Name the Login section whatever you want, it doesn't really matter.
Dim User As New ADODB.Recordset 'We pass our arguments through our recordset.
Dim Sql As String
Dim loginflag As Boolean
'Lets our open our connections.
Try
DBConn.Open("Provider=Microsoft.Ace.OLEDB.12.0;Data Source=L:\111553ZFYPPROJECT\TimeTable_grp_A.mdb;")
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
'The inverted comas in the data source statement are important as it keeps the location of your file as one string.
Sql = "Select * from userInfo" 'where Username = '" & txtUser.Text & "' AND Password = ...
Go to the complete details ...