Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Access 2010 VBA - mehrspaltiges Listenfeld über Recordset füllen

Frage Entwicklung Datenbanken

Mitglied: AndyAh

AndyAh (Level 2) - Jetzt verbinden

31.01.2014, aktualisiert 15:10 Uhr, 7733 Aufrufe, 2 Kommentare

Hi NG,

ich bin's schon wieder ;). Wie kann ich ein Listenfeld mit Recordsets mehrspaltig füllen?

Folgenden Code habe ich:

01.
Dim connstr As String 
02.
   Dim sql As String 
03.
   Dim conn As New ADODB.Connection 
04.
   Dim rs As New ADODB.Recordset 
05.
 
06.
   'user und passwort kommen aus einem Anmeldefenster 
07.
   connstr = "DRIVER={MySQL ODBC 5.2 ANSI Driver};SERVER=127.0.0.1;DATABASE=adressen;" & "USER=" & user & ";" & "PASSWORD=" & passwort & "; OPTION=3" 
08.
    
09.
   conn.ConnectionString = connstr 
10.
    
11.
   On Error GoTo LogonError 
12.
     
13.
   conn.Open 
14.
 
15.
   On Error Resume Next 
16.
 
17.
   sql = "SELECT * FROM zugang" 
18.
   rs.Open sql, conn, adOpenDynamic, adLockOptimistic 
19.
   'rs.MoveFirst 
20.
    
21.
 
22.
   rs.Open sql, conn, adOpenDynamic, adLockOptimistic 
23.
   rs.MoveFirst 
24.
    
25.
   With mitglieder 
26.
     While Not rs.EOF 
27.
        .ColumnCount = 4 
28.
        .AddItem rs.Fields("ID").Value 
29.
        .AddItem rs.Fields("EMail").Value 
30.
        .AddItem rs.Fields("Passwort").Value 
31.
        rs.MoveNext 
32.
      Wend 
33.
   End With
Leider weis ich nicht weiter.

Gruß
Andy
Mitglied: colinardo
31.01.2014, aktualisiert um 16:05 Uhr
ich bin's schon wieder ;)
Ich auch
Einfach die Werte jeweils mit einem Semikolon voneinander trennen
01.
With mitglieder 
02.
     While Not rs.EOF 
03.
        .ColumnCount = 4 
04.
        .AddItem rs.Fields("ID").Value & ";" & rs.Fields("EMail").Value & ";" & rs.Fields("Passwort").Value 
05.
        rs.MoveNext 
06.
      Wend 
07.
   End With
Grüße Uwe
Bitte warten ..
Mitglied: AndyAh
01.02.2014 um 09:29 Uhr
Hi Uwe,

danke für deinen Vorschag. Jetzt funktioniert es.

Gruß
Andy
Bitte warten ..
Ähnliche Inhalte
VB for Applications
Access 2010 vba Recordset
gelöst Frage von EUuserVB for Applications3 Kommentare

Hallo zusammen, ich arbeite seit langem mal wieder mit Access und vba: Ich habe eine Datenbank, zwei Tabellen (identisch ...

Datenbanken
Access 2010 - Listenfeld an ADO-Recordset knüpfen
gelöst Frage von AndyAhDatenbanken9 Kommentare

Hi NG, wie kann ich ein Listenfeld an ein ADO-Recordset knüpfen. Die zugrundeliegende Datenquelle ist keine mit Access verknüpfte ...

VB for Applications
Excel 2010 vba mehrspaltige listbox
Frage von AsciWhiteVB for Applications11 Kommentare

Hallo, ich versuche Daten aus einer Access-Datei in eine ListBox auf einer Userform einzulesen. Dazu habe ich die ListBox ...

VB for Applications
VBA Access: Synchronisation zwischen Recordset und Access Tabelle
Frage von qwertz1VB for Applications2 Kommentare

Hallo, Ich habe in Access ein VBA-Skript programmiert. Das Skript holt sich Daten von einer MySQL Server. Das geht ...

Neue Wissensbeiträge
Windows 10

Systemdienste behalten nach Win10 inplace-Upgrade nicht die ggf. modifizierte Startart bei

Tipp von DerWoWusste vor 2 MinutenWindows 10

Stellt Euch vor, Ihr habt ein Win10 System und modifiziert dort die Startart von Systemdiensten. Zum Beispiel wollt Ihr ...

Microsoft Office

Deaktivieren von Startbildschirm und Backstage-Ansicht in Office 2016 per Batch-Datei

Anleitung von SarekHL vor 3 StundenMicrosoft Office13 Kommentare

Guten Morgen zusammen! Ich habe mir gestern (auch mit Hilfe dieses Boards) ein Script gebastelt, um in Office 2016 ...

Erkennung und -Abwehr

Sicherheitslücke Spectre und Meltdown: Status prüfen

Anleitung von Frank vor 9 StundenErkennung und -Abwehr2 Kommentare

Nach all den Updates der letzten Woche sollte man unbedingt auch den Status prüfen, ob die Sicherheitslücken Spectre, Meltdown ...

Microsoft Office

Office 2010 Starter erneut auf einer frischen Windows-Version installieren

Tipp von Lochkartenstanzer vor 1 TagMicrosoft Office10 Kommentare

Moin, vor ein paar Tagen schlug bei mir ein Kunde auf, der sein Widnows 7 geschrottet und es inklusive ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

iOS
Einladung vom iphone kalender
Frage von jensgebkeniOS15 Kommentare

Hallo Gemeinschaft, folgendes Problem - immer wenn ich von meinem Iphone einen Termin einztrage und diesem Termin Teilnehmer zuweise, ...

Drucker und Scanner
Gesucht DIN A3 Drucker
Frage von NebellichtDrucker und Scanner15 Kommentare

Hallo, ich möchte einen neuen DIN A3 Drucker kaufen. Um ab und zu, ca. 1 mal die Woche Farbausdrucke ...

Batch & Shell
Dateien verschieben mit batch
gelöst Frage von michi-ffmBatch & Shell13 Kommentare

Hallo Zusammen hat jemand evtl eine Idee? Zunächst hier das Skript: Leider werden keine UNC-Pfade unterstüzt, kann mir jemand ...