VB.net Wie gehe ich zum letzten Datensatz

Question

Ich habe den folgenden Code. Bitte helfen Sie mir, wie Sie die letzte Aufzeichnung der Aufzeichnungen erhalten können.

Dim DteQry As New OdbcCommand 
DteQry.CommandText = "select distinct trn_date from order_data order by trn_date asc limit 30;" 

Conn.open() 
DteQry.Connection = Conn 

Dim qryRdr As OdbcDataReader 
qryRdr = DteQry.ExecuteReader() 

If qryRdr.HasRows() Then 

    Dim StartDte = qryRdr.GetValue(0) 
    TextBox2.Text = qryRdr.GetValue(0) 
    Exit Sub 
End If 

Answer 1

Wie wäre es damit ...

Sie nicht die Zeile direkt von OdbcDataReader zählen bekommen. Erstellen Sie einfach die dataTable dt und laden Sie das Dataset vom Reader zu dt. Holen Sie sich die Zeilenanzahl aus der Datentabelle, und Sie können den letzten Datensatz wie folgt abrufen.

If qryRdr.HasRows() Then     
      Dim dt As DataTable 
      dt.Load(qryRdr) 
      Dim StartDte = dt.Rows(dt.Rows.Count-1).item(0) 
      TextBox2.Text = dt.Rows(dt.Rows.Count-1).item(0) 
      Exit Sub 
    End If