Visualizzazione dei risultati da 1 a 3 su 3
  1. #1
    Utente di HTML.it L'avatar di abellos
    Registrato dal
    Feb 2002
    Messaggi
    429

    [vb .net] ciclare dataset o datarow?

    Ciao come faccio a visualizzare tutti i dati in un dataset o datarow con un ciclo while?

    io ho questo codice

    codice:
    Dim sql As String = "SELECT * FROM utenti"
    
            Dim condati As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; " & "Data Source=Z:\testDB\testDB\testaccess.mdb")
    
            Try
    
                If condati.State <> ConnectionState.Open Then
                    condati.Open()
                End If
    
                Dim adapterDati As OleDbDataAdapter = New OleDbDataAdapter(sql, condati)
                Dim cmdBuilder As OleDbCommandBuilder = New OleDbCommandBuilder(adapterDati)
                Dim dtsDati As New DataSet()
    
                adapterDati.MissingSchemaAction = MissingSchemaAction.AddWithKey
    
                'Carico il dataset 
                adapterDati.Fill(dtsDati, "utenti")
                    
    while
                MsgBox(dtsDati.Tables("utenti").Rows(0).Item("nome"))
    end while
    
            Catch ex As Exception
    
                MessageBox.Show("Errore: " & ex.Message)
    
            Finally
    
                'Chiudo la connessione 
                If Not condati Is Nothing Then
                    If condati.State = ConnectionState.Open Then
                        condati.Close()
                    End If
                    condati.Dispose()
                End If
    
            End Try
    come faccio a dire al while che deve ciclare tutto il dataset fino alla fine come facevo in vb6 con i recorset RS.eof
    grazie
    ciao
    Da un grande potere derivano grandi responsabilità

  2. #2
    Utente di HTML.it
    Registrato dal
    May 2011
    Messaggi
    119
    Un dataset contiene una collection di oggetti "table" (datatatable)
    A sua volta un datatatable contiene una collection di datarows che puoi interrogare con:
    Dim tb As DataTable = myDataSet.Tables("tabella")
    codice:
    For Each dr As DataRow In tb.Rows
      'Ciascun dr contiene una collection di items che puoi interrogare 
      dr.Item("campo") 'attento alle conversioni e al data - type del campo.
    Next
    Con un ciclo While è più complesso perchè devi incrementare .. meglio un ciclo For
    codice:
    For i As Integer = 0 To tb.Rows.Count - 1
      dim dr As DataRow = tb.Rows(i)
    ...
    Next

  3. #3
    Utente di HTML.it L'avatar di abellos
    Registrato dal
    Feb 2002
    Messaggi
    429
    ottimo!! grazie mille
    Da un grande potere derivano grandi responsabilità

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.