Office: Recordset Listenfeld füllen

Helfe beim Thema Recordset Listenfeld füllen in Microsoft Access Hilfe um das Problem gemeinsam zu lösen; Hallo *Smilie Ich möchte gern mein Listenfeld füllen.. ______________ 1) Bei dieser Methode kommt es (willkürlich) zu einem Absturz: Set... Dieses Thema im Forum "Microsoft Access Hilfe" wurde erstellt von Martin2411, 27. Mai 2020.

  1. Recordset Listenfeld füllen


    Hallo *Smilie

    Ich möchte gern mein Listenfeld füllen..
    ______________
    1)
    Bei dieser Methode kommt es (willkürlich) zu einem Absturz:
    Set Forms("Freigabetool").Controls(liste0).Recordset = rs
    __________
    2)
    Habe nun eine zweite Methode versucht: Fehlermeldung: Objekt erforderlich
    Muss ich vielleicht einen Verweis aktivieren?

    Code:
    ________
    3) Gibt es eine bessere Alternative ?

    LG

    :)
     
    Martin2411, 27. Mai 2020
    #1
  2. Moin,
    warum nimmst du nicht einfach eine Abfrage?
    Entweder eine vorhandene per Namen
    Code:
    oder eine zur Laufzeit zusammengesetzte nach diesem Muster
    Code:
    maike
     
    maikek, 28. Mai 2020
    #2
  3. weil ich direkt auf die tabellen am sql server zugreife...
     
    Martin2411, 28. Mai 2020
    #3
  4. Recordset Listenfeld füllen

    Aha, hatte das ADO übersehen. Mit SQL-Server hab ich keine Erfahrung.
    Aber ein Listenfeld wird auch da eine RowSource haben, kein Recordset.
    maike
     
    maikek, 28. Mai 2020
    #4
  5. Dann weißt du vielleicht wie ich das listenfeld lösche?

    Datensatzherkunft ist aber Tabelle/Abfrage

    LG *Smilie
     
    Martin2411, 28. Mai 2020
    #5
  6. Der erste Code sollte passen.
    Beim Zweiten und dem Rest den du bisher gepostet hast frage ich mich,
    ob du schon weißt was du machst.

    Hast du dir die generellen Grundlagen von Access & VBA erarbeitet,
    oder ist das mehr so ein copy & paste Geschichte?
     
    Zuletzt von einem Moderator bearbeitet: 7. Januar 2021
    markusxy, 28. Mai 2020
    #6
  7. Ja ich lern gerade... das war jetzt copy / paste weil es bei meinem code leider immer zum absturz kommt..

    Code:
    Das macht mir Probleme: arbeitet sehr unsicher, manchmal gehts ne halbe stunde gut und dann stürzt es wieder ab....
    Set Forms("Freigabetool").Controls(liste0).Recordset = rs

    Kurzfassung:
    Code:
     
    Martin2411, 28. Mai 2020
    #7
  8. Recordset Listenfeld füllen

    Code:
    Wie ist sichergestellt, dass
    - das Formular geöffnet ist?
    - die Spaltenanzahlen von Listenfeld und Recordset harmonisieren?

    Code:
    Ist überprüft, welche Auswirkung das auf das Listenfeld hat?
    Mit welcher Datenherkunft kommt das Listenfeld vor der Neuzuweisung daher?

    Welche Bedeutung haben cnn-Spielereien, wenn Du dann mit conn arbeitest?
     
    ebs17, 29. Mai 2020
    #8
  9. Ja der Code funktioniert EIGENTLICH einwandfrei... Listbox wird mit den richtigen Daten gefüllt...das geht 6 bis 10 mal gut... dann stürzt Access nach MsgBox "5" ab

    cnn - Kann ich rauslöschen, ich wollte nur prüfen, wann Access abstürzt.
    Datensatzherkunft = Tabelle/Abfrage
    LG

    Code:
     
    Martin2411, 29. Mai 2020
    #9
  10. Das gezeigte?

    If ohne End If - ich würde stets und ständig einen Laufzeitfehler erwarten.
     
    ebs17, 29. Mai 2020
    #10
  11. Ich bin auf der Suche nach einer alterntiven Methode die listbox zu füllen.


    statt
    Set Forms("Freigabetool").Controls(liste0).Recordset = rs
     
    Martin2411, 29. Mai 2020
    #11
  12. Man könnte meinen, dass Hinweise an Dich nicht nur kostenlos, sondern umsonst und schon Gedanken dazu vergeblich sind. Das "umfassende" Feedback lässt wohl kaum andere Schlussfolgerungen zu.
     
    ebs17, 29. Mai 2020
    #12
  13. Recordset Listenfeld füllen

    Hallo Martin,
    Warum prüfst du auf ein leeres RS, wenn du es dann, so oder so der Listbox übergibst?
    gruss ekkehard
     
    Beaker s.a., 29. Mai 2020
    #13
  14. Hallo Ekkehard...

    Weil ich die letzten Listboxeinträge löschen will und die Prüfung ist dafür da, dass ich sehe wann es abstürzt... Das ist natürlich umsonst, wenn man es so betrachtet.

    Ich möchte einfach nur wissen, wie ich diesen

    Code: Set Forms("Freigabetool").Controls(liste0).Recordset = rs

    anders darstellen kann.

    LG an dich *Smilie
     
    Martin2411, 1. Juni 2020
    #14
  15. Ich habs gelöst. Danke für die Mithilfe. LG



    Set conn = ConnectSQL()

    Dim rs As New ADODB.Recordset

    With rs
    .ActiveConnection = conn
    .CursorLocation = adUseClient
    .CursorType = adOpenForwardOnly
    .LockType = adLockReadOnly
    .Open sql
    End With

    Set Forms("Freigabetool").Controls("liste0").Recordset = rs

    rs.Close
    Set rs = Nothing
     
    Martin2411, 1. Juni 2020
    #15
Thema:

Recordset Listenfeld füllen

Die Seite wird geladen...
  1. Recordset Listenfeld füllen - Similar Threads - Recordset Listenfeld füllen

  2. Apostroph in sql Recordset

    in Microsoft Access Hilfe
    Apostroph in sql Recordset: Hallo Gemeinde, einen hätte ich noch: sqlTitel = "SELECT * FROM tbl_Files_Edited WHERE Titel='" & strTitel & "'" Set rs1 = db.OpenRecordset(sqlTitel) Enthält strTitel einen...
  3. Recordset auf einmal nicht mehr aktualisierbar

    in Microsoft Access Hilfe
    Recordset auf einmal nicht mehr aktualisierbar: Hallo, ich bin bei der Weiterentwicklung einer seit Jahren funktionierenden Prozedur, bei der u.a. per SQL Datensätze nach einem bestimmten Feld sortiert aus einer Tabelle in ein Recordset...
  4. Recordset

    in Microsoft Excel Hilfe
    Recordset: Hallo Zusammen, ich möchte gern aus einer Excel-Tabelle Werte über ein Recordset in eine Access Tabelle einlesen. In der Anlage die vereinfachte Struktur der Daten. Im Bsp 1 werden die Daten...
  5. Recordset wird nicht erfasst

    in Microsoft Access Hilfe
    Recordset wird nicht erfasst: Liebe Access-Profis, wieder bin ich am Ende der Weisheit; dieses Mal geht es um einen VBA-Code, der einen Recordset nicht identifiziert. Das Vorhaben: Im Formular 'Aktuelles Schuljahr' steht in...
  6. Recordset-Feldname mit Variable verbinden

    in Microsoft Access Hilfe
    Recordset-Feldname mit Variable verbinden: Hallo, hat jemand einen Tipp für mich, wie ich einen Recordset-Feldnamen mit einer Variablen kombinieren kann. Ein Pivot-Recordset stellt mir Feldnamen zur Verfügung, die etwa so aussehen:...
  7. Recordset-Eigenschaft

    in Microsoft Access Tutorials
    Recordset-Eigenschaft: Recordset-Eigenschaft Access für Microsoft 365 Access 2019 Access 2016 Access 2013 Access 2010 Access 2007 Mehr... Weniger...
  8. ID aus SQL Recordset ermitteln - Geänderter Treiber?

    in Microsoft Access Hilfe
    ID aus SQL Recordset ermitteln - Geänderter Treiber?: ch habe ein akutes Problem beim Zugriff auf den SQL Server. Seit vielen Jahren nutze ich folgendes Prinzip. Im VBA lege ich einen neuen Datensatz in einem Recordset an. Da der SQL Server die...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden