[boudyonline]

كود :

Dim sql As String = "select * from Database"
       Dim cmd As New OleDbCommand(sql, con)
       Dim dr As OleDbDataReader
       dr = cmd.ExecuteReader()
        .....If dr.Read() = False Then