Berichte einzeln speichern

Computer: Software & Programmierung Microsoft Access
1

Hallo,
was muss ich machen, dass in meiner Datenbank jeder Datensatz einzeln als Bericht gespeichert wird?

Mit dieser Funktion exportiere ich die Daten auf die Festplatte
Es muss nur noch eingegeben werden, dass der Bericht als „Name_Vorname_Datum“ gespeichert wird. Name, Vorname sind in der Tabelle „Vermieter“ und das Datum soll das heutige sein

stDocName = „Verstoß1“
DoCmd.OutputTo acOutputReport, „Verstoß1“, acFormatRTF, „C:\Dokumente und Einstellungen\Administrator\Desktop\Dokumenten- verwaltung Programm\Verstoß1.rtf“

Es ist auch der Drucker „FreePDF“ installiert. Wenn’s geht soll gleich darauf gedruckt werden

Vielen Dank im Voraus

Mit freundlichen Grüßen
Thomas

2

Hallo,

das hatten wir doch schon einmal vor ein paar Tagen…

ganz einfach, gehe zur Internetseite von shbox, das snd die die FreePDF machen, dort gibt es den kompletten VB Code zur Loesung deines Problems

Tschau
Peter

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Hallo Peter,
vielen Dank für deine Bemühungen!
Leider finde ich nichts über das speichern einzelner Datensätze
In der Bescheibung werden komplette Berichte umgewandelt.
Ich will für jeden Datensatz einen einzelnen Bericht!

Bericht1 == Datensatz 1 (Name: Meier; Vorname: Klaus; Datum: 20.10.2007)

Bericht2 == Datensatz 2 (Name: Müller; Vorname: Jan; Datum: 14.10.2007)

usw…

Es sind Mahnschreiben und jeder Ermahnte soll seine eigene Mahnung als PDF haben, also unter seinem eigenem Namen

Schöne Grüße von der Nordsee
Thomas

PS.: habe (leider) Access 97

4

Hallo Thomas,

Leider finde ich nichts über das speichern einzelner
Datensätze

da gibt es auch nichts!

In der Bescheibung werden komplette Berichte umgewandelt.

richtig, ein Bericht ist wie ein Formular, dass du ausfüllst. Einmal mit dem Datensatz 1 einmal mit dem Datensatz 2.
Das Formular kannst du speichern, die Datensätze kommen aus einer Tabelle. Die sind gespeichert und müssen nicht noch mal gespeichert werden!

Ich will für jeden Datensatz einen einzelnen Bericht!

Auch wenn du das zum zweiten mal hier willst, es geht NICHT! Weil es Blödsinn ist.

Bericht1 == Datensatz 1 (Name: Meier; Vorname: Klaus; Datum:
20.10.2007)

nein

Bericht2 == Datensatz 2 (Name: Müller; Vorname: Jan; Datum:
14.10.2007)

nein

usw…

nein, alles ist Bericht1 mit den Daten der Tabelle1 wo der erste Datensatz Name:Müller und der zweite Datensatz Name:Meier ist.

Es sind Mahnschreiben und jeder Ermahnte soll seine eigene
Mahnung als PDF haben, also unter seinem eigenem Namen

dann sage dem Bericht:

  1. zeige mir die Daten von Meier an
  2. drucke diese
  3. zeige mir nun die Daten von Müller an
  4. nun drucke diese
    usw.

PS.: habe (leider) Access 97

ach damit geht das nur so!

BTW:
1 EDV-Jahr = 10 Menschenjahre
d.h. deine Software ist 100 Jahre alt! Würdest du ein so altes Auto fahren wollen? Mit so altem Werkzeug arbeiten wollen?

Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)

5

Hallo Wolfgang

bitte erkläre mir genau wie ich folgendes machen soll:

dann sage dem Bericht:

  1. zeige mir die Daten von Meier an
  2. drucke diese
  3. zeige mir nun die Daten von Müller an
  4. nun drucke diese
    usw.

PS.: habe (leider) Access 97
ach damit geht das nur so!
BTW:
1 EDV-Jahr = 10 Menschenjahre
d.h. deine Software ist 100 Jahre alt! Würdest du ein so altes
Auto fahren wollen? Mit so altem Werkzeug arbeiten wollen?

leider habe ich keine aktuellere Software zur Hand :wink:

Schöne Grüße von der Nordsee
Thomas

6

Hallo Thomas,

bitte erkläre mir genau wie ich folgendes machen soll:

dann sage dem Bericht:

  1. zeige mir die Daten von Meier an
  2. drucke diese
  3. zeige mir nun die Daten von Müller an
  4. nun drucke diese
    usw.

nochmal? ich hatte es dir doch schon geschrieben:
http://www.wer-weiss-was.de/cgi-bin/forum/showarchiv…

Mit ein wenig VBA bekommst du es sehr einfach hin:

‚drucken für Name = Meier
VAR_NAME = „Meier“
DoCmd.OpenReport „Verstoß1“, acViewPreview, "[Name]=‘" & VAR_NAME & „’“

(acViewPreview = Vorschau des Berichts)

‚drucken für Name = Schulze
VAR_NAME = „Schulze“
DoCmd.OpenReport „Verstoß1“, acViewNormal , "[Name]=‘" & VAR_NAME & „’“

(acViewNormal = direkt drucken, ohne Vorschau)

usw.

Die Variablen der Namen können natürlich auch aus einem Formular kommen, wo du mit einer Taste den Ausdruck startest.

Wie du eine Taste (Button) mit Hilfe des Assistenten und der Symbolleiste „Toolbar“ aufs Formular bekommst, weißt du?

Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)

7

Hallo Wolfgang,

vielen vielen Dank für deine Hilfe
Das hat mich ein ganzes Stück weitergeholfen!!!

Meine Formel sieht jetzt so aus:

Private Sub Befehl3_Click()
Liste0 , „Müller“
DoCmd.OpenReport „Verstoß1“, acViewNormal, , „[Name]=’“ & Liste0 & „’“

Es fehlt jetzt nur noch das er sich den Namen selbstständig holt
Also wenn ich auf „Janssen“ klicke das nicht „Müller“ ausgegeben wird
aber das versuch ich selbst herauszufinden

Schöne Grüße von der Nordsee
Thomas