Shows "could not retrieve schema information for table or view" when retrieving data from table

Sure...

Here it is...

Function LoadUsers(ByVal ConnectionString As String) As System.ComponentModel.BindingList(Of User)
Dim r As New System.ComponentModel.BindingList(Of User)
Dim conn As New SqlConnection(ConnectionString)
conn.Open()
Dim comm As New SqlCommand("SELECT * FROM Users", conn)
Dim reader As SqlDataReader = comm.ExecuteReader
Dim i As Integer = -1
While reader.Read()
Dim PH As Image = My.Resources.User_Default
Try
PH = Image.FromStream(New IO.MemoryStream(CType(reader.Item("Photo"), Byte())))
Catch ex As Exception

End Try
Dim Credentials_ As String = reader.Item("Credentials").ToString
Dim cls As System.ComponentModel.BindingList(Of Credential) = Nothing
If Credentials_ <> "" Then
cls = XMLParsers.Credentials.FromXML(Credentials_)
End If
Dim Permissions_ As String = reader.Item("Permissions").ToString
Dim Per As New List(Of String)
If Permissions_ <> "" Then
Per = XMLParsers.ListOfString.FromXML(Permissions_)
End If
r.Add(New User(reader.Item("ID").ToString, reader.Item("Username").ToString, reader.Item("Password").ToString, reader.Item("Desktop").ToString, reader.Item("Home").ToString, reader.Item("UserType").ToString, reader.Item("Address").ToString, reader.Item("Mobile").ToString, reader.Item("Email").ToString, Per.ToArray, reader.Item("Status").ToString, PH, cls))
End While
conn.Close()
Return r
End Function

and the connection string...

"Server=HP\SQLEXPRESS;Database=OMSDB;User Id=sa;Password=QW741erty;Application Name=Office Management System;Pooling=True;"

"While reader.Read()" in this line i always get "false". even there is data in table (can be viewed using SSMS). and this line is before "conn.close()"

if there is problem in my code... why the same error occurring with Visual Studio....?

@RickZeeland I dont this the problem is in the code as this same code has worked with the same database before...