#=> Win32::ODBC
    while( $db->FetchRow() ){

        my %data = $db->DataHash();
        push @daten, \%data;

    }