title: IDENT_CURRENT returns NULL
body: <p>Here in my code <code>DR.HasRows()</code> returns <code>True</code>, but <code>DR("LastID")</code> returns <code>DBNUll</code> while <code>SELECT IDENT_CURRENT ('SiteSection') AS 'LastID'</code> works in SQL Management Studio.</p>
  
  <pre><code>__SQLString= "SELECT IDENT_CURRENT ('SiteSection') AS 'LastID'"
  Dim DR As SqlDataReader
  ddConnect() 'It's my custom class that opens a connection to db, it works
  DR = ddExecuteReader()
  DR.Read()
  If DR.HasRows() Then
      GetLastID = DR("LastID")
  End If
  </code></pre>