Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Mailadressen aus verschiedenen Datensätzen zusammenfassen
zurück: null wert im formular zur 1 konvertieren weiter: Report: Alle die in diesem Monat zahlen müssen zeigen! Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Bitte Status wählen ! Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Florus
Gast


Verfasst am:
24. Mai 2005, 23:25
Rufname:

Mailadressen aus verschiedenen Datensätzen zusammenfassen - Mailadressen aus verschiedenen Datensätzen zusammenfassen

Nach oben
       

Hello ihr Könner,

also muss gleich mal zum Eingang sagen, ich liebe dieses
Forum, hier findet man fast alles was man braucht, um sich
gut in Access einzuarbeiten.

Folgendes hab ich leider nicht gefunden:

Ich hab eine Tabelle, in der folgende Werte stehen:

User (Primärschlüssel)
Telefon
EMail

Jetzt würd ich gerne eine Mailingliste machen, um diese mit
DoCmd.SendObject zu versenden.

Ich weiß aber leider nicht, wie ich die Mail-Adressen am besten als String
in eine Varible bekomm, damit ich sie einbinden kann.

Hätt mir gedacht, es würd vielleicht über ein Array funktionieren,
nur leider hab ich absolut keinen Plan, wie ich am besten anfangen
sollt.

Hätte vielleicht wär einen Tipp für mich?

Besten Dank im Voraus

Liebe Grüße

Florus
jens05
Moderator


Verfasst am:
25. Mai 2005, 07:17
Rufname:
Wohnort: ~~~~~


AW: Mailadressen aus verschiedenen Datensätzen zusammenfasse - AW: Mailadressen aus verschiedenen Datensätzen zusammenfasse

Nach oben
       

Hallo,
Code:
    Dim rs As DAO.Recordset
    Dim Adressen As String
    Dim strSQL As String
   
    strSQL = "SELECT EMail FROM Tabelle? WHERE EMail Is Not Null"
    Set rs = DBEngine(0)(0).OpenRecordset(strSQL)
    Do While Not rs.EOF
        Adressen = Adressen & "; " & rs!Email
    Loop
    rs.Close
    Set rs = Nothing
    MsgBox Mid(Adressen, 3) 'hier wird die Liste ausgegeben
Ein Verweis auf DAO wird benötigt
_________________
mfg jens05 Wink


Zuletzt bearbeitet von jens05 am 25. Mai 2005, 19:43, insgesamt 2-mal bearbeitet
Florus
Gast


Verfasst am:
25. Mai 2005, 08:43
Rufname:

Danke schonmal.... - Danke schonmal....

Nach oben
       

..... hab alles so gemacht,
wie erklärt, jedoch hängt sich Datenbank jedesmal auf, wenn
ichs ausführ.

Hab den Code jetzt mal testhalber in einem Formular auf einen Button
gelegt, Code sieht wie folgt aus:
Code:
Private Sub Maillist_Click()
    Dim rs As DAO.Recordset
    Dim Adressen As String
    Dim strSQL As String

    strSQL = "SELECT EMail FROM user_tabelle WHERE EMail Is Not Null"
    Set rs = DBEngine(0)(0).OpenRecordset(strSQL)
    Do While Not rs.EOF
        Adressen = Adressen & "; " & rs!Email
    Loop
    rs.Close
    Set rs = Nothing
    MsgBox Mid$(Adressen, 3) 'hier wird die Liste beschnitten und ausgegeben
End Sub
Ich find leider den Fehler nicht, im VBA-Editor unter Verweise hab ich
einen Verweise auf Microsoft DOA 3.6 Object Library.

Danke

Florus
jens05
Moderator


Verfasst am:
25. Mai 2005, 08:49
Rufname:
Wohnort: ~~~~~

AW: Mailadressen aus verschiedenen Datensätzen zusammenfasse - AW: Mailadressen aus verschiedenen Datensätzen zusammenfasse

Nach oben
       

Sorry, mein Fehler.
Der Code würde nächstes Jahr noch laufen.
Code:
Private Sub Maillist_Click()
    Dim rs As DAO.Recordset
    Dim Adressen As String
    Dim strSQL As String

    strSQL = "SELECT EMail FROM user_tabelle WHERE EMail Is Not Null"
    Set rs = DBEngine(0)(0).OpenRecordset(strSQL)
    Do While Not rs.EOF
        Adressen = Adressen & "; " & rs!Email
        rs.MoveNext
    Loop
    rs.Close
    Set rs = Nothing
    MsgBox Mid(Adressen, 3) 'hier wird die Liste ausgegeben
End Sub

_________________
mfg jens05 Wink


Zuletzt bearbeitet von jens05 am 25. Mai 2005, 19:42, insgesamt 2-mal bearbeitet
Florus
Gast


Verfasst am:
25. Mai 2005, 09:51
Rufname:


Super - Super

Nach oben
       

Danke, funktioniert wunderbar.

Und wieder was gelernt ;)

Liebe Grüße

Florus
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Texte zusammenfassen 3 sdaub 3038 27. März 2006, 17:37
herbii Texte zusammenfassen
Keine neuen Beiträge Access Tabellen & Abfragen: Zeit zwischen bestimmten Datensätzen ausrechnen lassen... 0 softeislutscher 681 03. März 2006, 12:23
softeislutscher Zeit zwischen bestimmten Datensätzen ausrechnen lassen...
Keine neuen Beiträge Access Tabellen & Abfragen: Suchefeld von verschiedenen Formularen 0 Supernetsurfer3 505 03. Nov 2005, 14:12
Supernetsurfer3 Suchefeld von verschiedenen Formularen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage: zwei Tabellen zusammenfassen 1 Simo 795 24. Aug 2005, 09:28
stpimi Abfrage: zwei Tabellen zusammenfassen
Keine neuen Beiträge Access Tabellen & Abfragen: Filtern nach den letzten xy Datensätzen 1 BML77 508 25. Jun 2005, 20:03
jens05 Filtern nach den letzten xy Datensätzen
Keine neuen Beiträge Access Tabellen & Abfragen: Datensätze zusammenfassen 1 Tatanka 1121 29. Apr 2005, 14:52
jens05 Datensätze zusammenfassen
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Tabellen & Abfragen: Fehler beim Filtern von unterschiedlich langen Datensätzen! 1 SteffenL 515 20. Apr 2005, 15:15
Willi Wipp Fehler beim Filtern von unterschiedlich langen Datensätzen!
Keine neuen Beiträge Access Tabellen & Abfragen: Öffnen von verschiedenen Tabellen aus einer Liste 8 Gast 493 05. Jan 2005, 10:35
Gast Öffnen von verschiedenen Tabellen aus einer Liste
Keine neuen Beiträge Access Tabellen & Abfragen: Feld aus n Records in n Feldern eines Records zusammenfassen 0 frank58 588 31. Dez 2004, 12:05
frank58 Feld aus n Records in n Feldern eines Records zusammenfassen
Keine neuen Beiträge Access Tabellen & Abfragen: Felder aus verschiedenen Tabellen in Haupttabelle summieren 4 Maviee 1018 20. Dez 2004, 17:27
mapet Felder aus verschiedenen Tabellen in Haupttabelle summieren
Keine neuen Beiträge Access Tabellen & Abfragen: Selektierten Datensätzen den selben Wert zuweisen 3 studio 712 14. Okt 2004, 14:40
Willi Wipp Selektierten Datensätzen den selben Wert zuweisen
Keine neuen Beiträge Access Tabellen & Abfragen: Probleme mit Datensätzen in Tabellen 0 Jörg O 403 14. Sep 2004, 12:20
Jörg O Probleme mit Datensätzen in Tabellen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Expression Web