Zum Inhalt springen
View in the app

A better way to browse. Learn more.

Fachinformatiker.de

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Datenbankabfrage mit VB6

Empfohlene Antworten

Veröffentlicht

Hallo,

in einer Tabelle einer Datenbank sind 30.000 Einträge nacheinander gelistet.

Wenn ich die VB6 Anwendung starte, soll in einem Text1.Text der allererste Eintrag aus der Tabelle angezeigt werden

Jetzt möchte ich über eine Schaltfläche mit jedem Mausklick immer den nächsten Eintrag im Text1 anzeigen.

Mit einer zweiten Schaltfläche möchte ich wieder an den Anfang springen.

Ich habe mal in der Vergangenheit, irgendwas mit dem ODBC Steuerelement gemacht.

Auch schon mal was mit dem Jet Datenbankmodul (So hieß das glaube ich)

Ich bin was Datenbankabfragen angeht lange raus und könnte etwas Unterstützung gebrauchen.

Habe leider nicht die Zeit da lange rumzuprobieren.

Wie muss der Quellcode für die erste und zweite Schaltfläche aussehen ?

Welches Steuerelement für die Datenbankanbindung soll ich nehmen,

und wie muss ich es konfigurieren ?

Den Datenbanktyp weiß ich leider noch nicht.:confused:

Kann Oracle, Access oder sonst was sein.

Kann mir einer Tipps geben ?

Gruß

Eleu

  • Autor

Hallo ich nochmal,

ich habe mir jetzt eine Exceldatei erstellt und in Tabelle 1

nacheinander irgendwelche Werte eingegeben.

In VB6 habe ich ein Data Contol erstellt und dieses mit der Excel Tabelle verbunden.

Wenn ich das Data Control über die Maus bediene, werden in Text1.Text

nacheinander die Daten angezeigt.

Jetzt möchte ich diesen Vorgang eigentlich nur noch über eine separate Schaltfläche ausführen.

Ich weiß aber nicht, welche Eigenschaft des Data Control ich wie bedienen muss ?

Oder anders gesagt, wie muss der Quellcode für die Schaltfläche aussehen.

(Siehe Bild)

Gruß

Eleu

post-58959-1443044883023_thumb.jpg

  • Autor

Mittlerweile habe ich es selber herausbekommen.

Für alle die es vielleicht interessiert:


Private Sub Command1_Click()

Data1.Recordset.MoveNext

If Data1.Recordset.EOF Then

Data1.Recordset.MoveFirst

End If

End Sub

Danke schön...

Archiv

Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.