Hallo zusammen
Aus eurem Forum konnte ich schon unglaublich viel lernen und meine verrosteten, eingeschlafenen Access-Kentnisse auffrischen.
Für den Betrieb habe ich ein Formular erstellt, wo Probleme zu den Fahrzeugen eingetragen werden können.
Nun sollte der aktuell eingegebene Datensatz als PDF, per E-Mail versendet werden.
Dass der Bericht in der Seitenansicht geöffnet und gedruckt wird, habe ich hingekrigt.
Was ich auch geschafft hatte, dass ich eine E-Mail bekomme. Aber leider immer alle Einträge aus der Datenbank.
Was ich bisher als Code habe:
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Report_Probleme_erweiter!ID
DoCmd.PrintOut
DoCmd.SendObject acSendReport, "Probleme_erweiter", acFormatPDF, "blabla@irgendwas.xy", "", "", "Neuer Eintrag in Datenbank Probleme", "", False, ""
Vielen Dank für eure Unterstützung und Hilfe!!!!
black eagle
Hi,
was passiert, wenn du den (überflüssigen) PrintOut-Befehl weglässt?!
Hallo,
ein mit Sendobject angesprochener Bericht wird für sich und nur auf Basis seiner Abfrage exportiert und es greift nur die dort vorhandene Where-Condition..
Insofern müsste der SQL-String der Abfrage (per VBA) editiert oder die Parameters-Liste bemüht werden.
Hallo,
Zitat von: DF6GL am September 01, 2016, 08:57:26
ein mit Sendobject angesprochener Bericht wird für sich und nur auf Basis seiner Abfrage exportiert und es greift nur die dort vorhandene Where-Condition..
das kann ich so nicht bestätigen.
Ein zuvor gefiltert geöffneter Bericht wird anschließend auch in genau dieser Form versendet.
Zitat von: MaggieMay am August 31, 2016, 23:52:34
was passiert, wenn du den (überflüssigen) PrintOut-Befehl weglässt?!
Hy
vielen Dank für deine Nachfrage:
Den brauche ich, da eine Kopie ausgedruckt werden soll. Dies funktioniert problemlos und einwandfrei.
Hallo,
ZitatEin zuvor gefiltert geöffneter Bericht wird anschließend auch in genau dieser Form versendet.
Ja, stimmt allerdings.... ???
Hallo zusammen
Vielen Dank für euere Hilfe.
Sorry, dass ich erst jetzt antworte. Hatte noch etwas Urlaub zu geniessen. ;D
Zitat von: DF6GL am September 03, 2016, 12:06:46
ZitatEin zuvor gefiltert geöffneter Bericht wird anschließend auch in genau dieser Form versendet.
Wie mache ich das?
Vielen Dank und einen schönen Tag
Hallo,
nun, Du hast den Bericht schon in Seiten(Preview)-Ansicht geöffnet. So sollte er dann auch exportiert werden....
ansonsten sollte der Bericht auch mit einem Kriterium geöffnet werden, das in einem Formularfeld ("ID") steht:
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Me!ID
Zitat von: DF6GL am September 13, 2016, 15:12:15
Hallo,
nun, Du hast den Bericht schon in Seiten(Preview)-Ansicht geöffnet. So sollte er dann auch exportiert werden....
Genau das ist ja leider das Problem!
In der Seiten(Preview)-Ansicht öffnen funktioniert tadellos. Ebenso zu drucken!
Aber wie kann ich bewerkstelligen, dass genau die geöffnete Seiten(Preview)-Ansicht nicht nur gedruckt, sondern auch per E-Mail versendet wird?
Vielen Dank für deine Mühe, Hilfe und Unterstützung.
Hallo,
wie hatten ja vorher festgestellt, dass genau die mit dem Bericht aktuell angezeigten DS auch versendet werden...
Welche Access-Version hast Du?
Hallo,
wie hatten ja vorher festgestellt, dass genau die mit dem Bericht aktuell angezeigten DS auch versendet werden...
Zitat von: DF6GL am September 14, 2016, 13:55:19
Welche Access-Version hast Du?
Access 2010, alle aktualisierungen gemacht und vorhanden.
Hallo,
kannst Du die DB hier hochladen? (komprimiert/repariert, (evtl. datenreduziert) und gezippt)
Da du noch nicht weitergekommen bist, möchte ich noch einmal an dieser Stelle ansetzen:
Zitat von: MaggieMay am August 31, 2016, 23:52:34
was passiert, wenn du den (überflüssigen) PrintOut-Befehl weglässt?!
Zitat von: black eagle am September 03, 2016, 10:11:45Den brauche ich, da eine Kopie ausgedruckt werden soll. Dies funktioniert problemlos und einwandfrei.
Lass ihn trotzdem mal weg und berichte ob sich dadurch bzgl. des Emailversands etwas ändert.
Zitat von: MaggieMay am September 14, 2016, 23:18:51
Da du noch nicht weitergekommen bist, möchte ich noch einmal an dieser Stelle ansetzen:
Zitat von: MaggieMay am August 31, 2016, 23:52:34
was passiert, wenn du den (überflüssigen) PrintOut-Befehl weglässt?!
Zitat von: black eagle am September 03, 2016, 10:11:45Den brauche ich, da eine Kopie ausgedruckt werden soll. Dies funktioniert problemlos und einwandfrei.
Lass ihn trotzdem mal weg und berichte ob sich dadurch bzgl. des Emailversands etwas ändert.
Vielen Dank für deine Mühe und Hilfe
Wenn ich den "überflüssigen" PrintOut-Befehl weglasse, macht er mir ein PDF welches versendet wird und zwar mit allen Einträgen aus der Datenbank. Nicht nur wie in der geöffneten Seiten(Preview)-Ansicht.
Dies kann ich aber auch sonst anpassen, dass dieser so gedruckt wird.
Hallo,
lad das Ding doch mal hoch, sonst findet das Rätselraten kein Ende...
Zudem: was erwartest Du von diesem Kriterium:
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Report_Probleme_erweiter!ID
Zitat von: DF6GL am September 15, 2016, 12:48:49
Hallo,
lad das Ding doch mal hoch, sonst findet das Rätselraten kein Ende...
Werde ich gerne schnellstmöglich erledigen.
Leider kann ich vom Geschäft keine Daten auf eine Seite hochladen.
Zitat von: DF6GL am September 15, 2016, 12:48:49
Zudem: was erwartest Du von diesem Kriterium:
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Report_Probleme_erweiter!ID
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Me!ID
öffnet die Seiten(Preview)-Ansicht, des aktuellen und somit neusten Eintrages.
Hallo,
??
Zitat...."ID = " & Report_Probleme_erweiter!ID
(so schreibst Du) und
Zitat"ID = " & Me!ID
als Vorschlag von mir ist doch nicht das Selbe.... außer der Code wird hinter einem Button im Bericht während der Berichtssansicht ausgeführt. In solcher Konstellation bin ich mir nicht sicher, ob mein früherer Einwand bzgl. der Abfragekriterien nicht doch zutrifft...
WO (in welcher Ereignisprozedur ) läuft der Code eigentlich ab?
Zitat von: DF6GL am September 15, 2016, 14:19:47
Zitat...."ID = " & Report_Probleme_erweiter!ID
(so schreibst Du) und
Zitat"ID = " & Me!ID
als Vorschlag von mir ist doch nicht das Selbe.... außer der Code wird hinter einem Button im Bericht während der Berichtssansicht ausgeführt. In solcher Konstellation bin ich mir nicht sicher, ob mein früherer Einwand bzgl. der Abfragekriterien nicht doch zutrifft...
WO (in welcher Ereignisprozedur ) läuft der Code eigentlich ab?
Ich verwende folgender Code:
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Me!ID
Der mit der Endung: ..."ID = " & Report_Probleme_erweiter!ID hatte ich als Test eingebaut. Und zuspät bemerkt, dass ich dieser im Forum veröffentlicht hatte.
Entschuldige vielmals!
Im Formular müssen diverse Felder ausgefüllt werden. Diese werden mit einem Button überprüft. Beim Klicken startet ein VBA – Ereignis.
Sind alle Pflichtfelder ausgefüllt, wird ein zweiter Button freigegeben. Der beim Klicken folgender Code via VBA startet:
DoCmd.OpenReport "Probleme_erweiter", acViewPreview, , "ID = " & Me!ID
DoCmd.PrintOut
DoCmd.SendObject acSendReport, "Probleme_erweiter", acFormatPDF, "blabla@irgendwas.xy", "", "", "Neuer Eintrag in Datenbank Probleme", "", False, ""
Hallo,
ok,
wie lautet die dem Bericht zugrunde liegende Abfrage?
Wie lautet deren SQL-String?
Zitat von: DF6GL am September 15, 2016, 12:48:49
lad das Ding doch mal hoch, sonst findet das Rätselraten kein Ende...
Was lange währt wird entlich gut! ::)
Einen wunderschönen Wochenstart und Grüsse
black eagle
Hallo,
die ZIP-Datei lässt sich bei mir nicht entpacken...
Zitat von: DF6GL am September 19, 2016, 11:21:48
Hallo,
die ZIP-Datei lässt sich bei mir nicht entpacken...
hmmmm....
Nicht nur bei dir!
Und jetzt?
Ach ja: da das Formular in Follbild geöffnet wird, bitte mit gedrückter Shift-Taste öffnen!
Hallo,
habe ein paar überflüssige Codezeilen in Sub Bericht_Drucken_Click() entfernt und den Bericht bezgl. Seitenränder und Kopf/Fußzeilen verkleinert.
Das Formular ist auf Einzelnes Formular eingestellt.
Es wird beim Klick auf den Druck-Button nur der akt. angezeigte DS ausgedruckt und als PDF versendet.
Zitat von: DF6GL am September 19, 2016, 12:25:15
Hallo,
habe ein paar überflüssige Codezeilen in Sub Bericht_Drucken_Click() entfernt und den Bericht bezgl. Seitenränder und Kopf/Fußzeilen verkleinert.
Das Formular ist auf Einzelnes Formular eingestellt.
Es wird beim Klick auf den Druck-Button nur der akt. angezeigte DS ausgedruckt und als PDF versendet.
Hallo DF6GL
Vielen Dank für deine unglaubliche Hilfe.
Leider gibt es noch zwei Probleme:
1. Es wird zwar nur eine Seite ausgedruckt und per PDF versendet, dies genau so wie es sollte, ABER leider ist der Ausdruck und die versendete leer.
2. wird von anfang an, der Button Drucken angezeigt, was nicht sein darf.
Was hattest du alles entfernt?
Bei mir war der Bericht so eingestellt, dass er auf einer Seite platz hatte (Felder sollten eigentlich als variabel programmiert sein).
Grüsse und bis dahin danke vielmals!
black eagle
Hallo,
1) Der Ausdruck (und die PDF) beinhaltet natürlich auch die Daten.. Anfänglich wurden 2 Seiten gedruckt, die aber der Höhe (Kopf/Fußzeile) des Berichtes geschuldet sind. Wenn eine leere" 2. Seite gedruckt werden soll, dann vergrößere eben die o. g. Bereiche.
2) Die Eigenschaft " Aktiviert" des Buttons habe ich auf "Ja" (vorher "Nein") gestellt.
Entfernt habe ich die Alloweditions-Einstellungen, das 2. Öffnen des Berichtes als "Hidden" und das Docmd.Close (Schließt die Db) am Ende der Prozedur.
(Das kannst Du aber leicht selber vergleichen......)
PS:
anbei die PDF-Datei, wie sie mir per Email zugestellt wird. (DS 1 von 2)
1) hm... mir werden keine Daten ausgedruckt und auch ein leerer Bericht versendet.
------------------------------------Hinzugefügt am 19.09.2016 um 13:59------------------------------------
Habe deine "angepasste" Datenbank erneut geladen. Nochmals repariert und nun druckt es.
leider werden aber alle Daten aus gedruckt und NICHT nur die aktuel erfasste und in der Seitenansicht geöffnete!
Hallo,
dann kann ich das nicht nachvollziehen und es muss irgendein Problem an Deinem Rechner geben.
Installiere, bzw. repariere das Office-Paket (nochmal neu).
Zitat von: DF6GL am September 19, 2016, 22:26:34
Hallo,
dann kann ich das nicht nachvollziehen und es muss irgendein Problem an Deinem Rechner geben.
Installiere, bzw. repariere das Office-Paket (nochmal neu).
Hallo DF6GL
Habe es inzwischen an diversen PC's versucht und getestet. Egal mit welcher Office-Version oder ob neu installiert, es werden keine Daten ausgedruckt. Habe es an Geschäfts-PC's und an Privaten PC's getestet.
Hast du noch eine andere Idee? Oder hast du irgend eine Einstellung verändert?
Hallo,
hast Du die Sicherheitsoptionen korrekt eingestellt?
Ansonsten kann ich keinen weiteren Hinweis geben..
Zitat von: DF6GL am Oktober 21, 2016, 12:24:20
Hallo,
hast Du die Sicherheitsoptionen korrekt eingestellt?
.......
Hy DF6GL
Was müsste da wie sein?
Vielen Dank für deine tollen Bemühungen und Antworten!!!!!
Schönes Wochenende
Grüsse black eagle
Hallo,
unter Datei/Optionen/Sicherheitscenter/Einstellungen für...../Vertrauenswürdige Speicherorte
.../ActiveX-Einstellungen
../Einstellungen für Makros
entspr. einstellen.