Supportnet / Forum / Datenbanken

Hallo, wer kann mir bei meiner nachstehenden Problemstellung helfen. Ich habe eine Mitgliederdatenbank in Access erstellt. Nun möchte ich mit einer Befehlsschaltfläche nachstehendes erwirken. a) MS Outlook öffnen b) Empfänger automatisch eintragen welche sich in der Mitgliedertabelle befinden und den selben Wohnort haben Das heisst ich versende ein Mail an alle Mitglieder mit dem selben Wohnort über eine Befehlsschaltfläche in Access. Dies müsste wohl möglich sein. Wer kann mir einen nützlichen Tipp oder den Code dazu geben. Danke jedenfalls im Voraus Dietmar

bau dir in access einen mailto link, und öffne diesen dann, auf die art ist die Funktion unabhängig vom Mailclient:

mailto:duselber@invalid.invalid?BCC=person1@invalid.invalid,person2@invalid.invalid&Subject=Mitglieder%20Info&Body=Anrede,%0DDer%20Text%20den%20du%20versenden%20möchtest.

Dabei sind einige Punkte zu beachten:
1. SPAM = böse
2. Datenschutz! Person1 geht es absolut nix an das Person2 die mail auch bekommt, also nix mit mehrere Personen ins To oder CC schreiben. Du würdest sonst ja die mail adresse an alle anderen Bekantgeben.
3. die Angeschribenen sehen sich nicht selber im To, das kann als anzeichen von SPAM gewertet werden und wirkt billig.
4. bitte nicht zum SPAM versenden nutzen, also solltest du die genehmigung der Mitglieder haben das du mails an sie versendest.

Also vorerst Danke für deinen Tipp.

Gesucht wird jedoch, dass ich über eine Befehlsschaltfläche Outlook öffnen kann und sich die Empfänger aus einer Access Tabelle einfügen. Dabei sollen aber nur alle Empfänger mit dem Wohnort "XXX" eingefügt werden. Das heißt es öffnet sich Outlook und im Empfängerfeld sollten alle Empfänger mit dem Wohnort "XXX" eingetragen sein, damit ich diesen ein Mail mit einem freien Text versenden kann.
Für eine Tipp wie ich dies gestalten könnte wäre ich natürlich sehr verbunden.

Danke im Voraus,


Gruss Dietmar

naja also ein SQL query für die infragekommenden Personen und ihre mailadressen zusammensuchen sollte ja ein nicht sonderlich schwer sein. Kann dir da ja nix genaues angeben da ich den aufbau deiner tabellen und dein system nicht kenne, sollte aber in etwa ein SELECT über die Namenstab sein wo du halt auf den Wohnort filterst, zu den Personen suchst du dann die primäre mailadresse aus der Adresstabelle, wie gesagt das hängt ja von der Struktur ab.

aus den Daten kannst du dir dann den mailto string zusammenbauen. Wie man den dann direkt aufruft musste mal schauen (kann ich grade nicht, schaue aber morgen oder so mal nach wenn ich Zeit hab).
Access hat einen url Datentyp, wenn du den dann in ein Bezeichnungsfeld steckst müsste der klickbar sein, damit kannste ja erstmal testen, outlook (in beliebiger Version) sollte sich dann automatisch öffnen und die mail erstellen, auf senden klicken musste dann natürlich noch per hand, aber das ist ja gewollt oder?

da ichs selbst brauchen kann hab ichs heute direkt mal getestet, ist wirklich nicht schwer, das Schaltflächen, Bilder und Bezeichnungsfelder haben eine Hyperlink Eigenschaft:

Private Sub Command2_Click()
  Debug.Print "start"
  Dim dbs As Database
  Dim rst As Recordset
  Dim strSQL, mailto As String
  Set dbs = CurrentDb
  strSQL = "SELECT [Name],[email] FROM Test WHERE [Ort] = ´xyz´"
  Set rst = dbs.OpenRecordset(strSQL)
  mailto = "mailto:ich@invalid?BCC="
  With rst
    Do While Not .EOF
       mailto = mailto & !Name & " <" & !email & ">;"
      .MoveNext
    Loop
  End With
  Debug.Print mailto
  rst.Close
  Set dbs = Nothing
  Command2.Hyperlink.Address = mailto
End Sub

• Abfragen - Access
• Access schließt sich automatisch
• Access, import Access-Tabellen
• ACCESS - Diagrammerstellung mit VBA Code - dynamische x-y-Achsenskalierung