Start with something like this:
If MyReader.Read() Then
Resource = MyReader("Name").ToString()
'do something with resource
Resource = MyReader("PkProfessional").ToString()
'do something with resource
End If
Reader.Read() will advance you to each row of the reader results, and return False when there's no more rows.
-
Peter