vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Zeilenzahl in Datentyp variant ermittel 
Autor: Blackbox
Datum: 23.08.16 10:17
Hallo,

natürlich funktioniert das Beispiel von Rippler. Mich wundert es, warum das Beispiel von Microsoft bei Dir nicht funktioniert und habe es mit einer Northwind-DB (Office 2013) geprüft. Ich habe aus der Northwind die Tabelle Customer List in ein altes Excel-Format exportiert und das mit DAO in einen Recordset geladen. Die Excel-Tabelle habe ich vorher in MyTable umbenannt. (Das Datenbankformat
meiner NorthWind-DB ist für DAO nicht bekannt). 

   Dim db As DAO.Database
   Dim rs As DAO.Recordset
   Dim ar As Variant
 
   Set db = DBEngine.OpenDatabase("C:\Users\Blacky\Desktop\Customer_List.xls", _
     False, False, "Excel 8.0")
   Set rs = db.OpenRecordset("MyTable$")
 
   ar = rs.GetRows(200) '200 = Maximum angenommener Zeilen
   Debug.Print UBound(ar, 2) + 1
Ergebnis ist 29 Zeilen; das ist korrekt. Der Unterschied im Beispiel von Rippler ist die
durch Rs.MoveLast/RS.MoveFirst verbrauchte Zeit. 

            TB.MoveLast 
            Anzahl = TB.RecordCount
 
            TB.MoveFirst
 
            wert = TB.GetRows(Anzahl)
Mein Irrtum war, dass der zweite Parameter nicht die
Anzahl der Spalten bedeutet, sondern tatsächlich 2 sein muss, wie es MS vorgibt.

Bei ein paar Datensätzen merkt man den Unterschied der beiden Versionen nicht.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Zeilenzahl in Datentyp variant ermittel1.869NMueller22.08.16 09:19
Re: Zeilenzahl in Datentyp variant ermittel1.104Blackbox22.08.16 09:57
Re: Zeilenzahl in Datentyp variant ermittel1.162NMueller22.08.16 10:52
Re: Zeilenzahl in Datentyp variant ermittel1.174Rippler22.08.16 14:18
Re: Zeilenzahl in Datentyp variant ermittel1.151NMueller23.08.16 08:03
Re: Zeilenzahl in Datentyp variant ermittel1.091Blackbox23.08.16 10:17
Re: Zeilenzahl in Datentyp variant ermittel1.186Blackbox22.08.16 18:46

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel