Fun-Soft - Programmierforum

Autor

Thread - Seiten: > 1 <

000
24.01.2003, 13:24 Uhr
mike
Pinguinhüpfer
(Operator)

Hi!
Ich schreibe gerade das Mahnungssystem: eine Abfrage sucht mir die Kunden raus, die Länger als 14 Tagen die Schulden gemacht haben. Das ganze wird auch in einem Bericht angezeigt (pro Bericht ein Kunde). Wenn ich im Access nun auf den Bericht klicke, kommt eine Parameterabfrage "KundeID". KundenID eintippen und es funktioniert auch alles.
Nur muss ich das ganze jetzt mit diesem VBA machen. D.h. ich muss alle Kunden durchschauen und immer den Bericht öffnen. Wie kann ich jetzt beim Öffnen (im VBA) des Berichtes die ID des Kuden mit übergeben? (Das ganze soll einfach automatisiert werden)

Danke im Voraus!

mfg mike

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

001
24.01.2003, 14:19 Uhr
~0xdeadbeef
Gast

Du musst ja nur die Kunden-IDs in ein Recordset kriegen. Ich hab lange kein VBA mehr gemacht (zum Glück), aber sowas in der Art müsste gehen:

Code:

Sub blah()
    dim qdf as QueryDef
    dim rs as RecordSet

    set qdf = CurrentDB.CreateQueryDef("SELECT ID FROM Kunden")
    set rs = qdf.OpenRecordSet()

    rs.MoveFirst
    While Not rs.EOF
         schreibBericht(rs!ID)   'schreibeBericht musst du selbst zusammenschustern
         rs.MoveNext
    Wend
End Sub

Ich bin nicht sicher, ob die Syntax so stimmt, VBA hat da ein paar recht komische Macken, aber so in der Richtung würde ich das machen.

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

002
24.01.2003, 21:25 Uhr
mike
Pinguinhüpfer
(Operator)

Hi!
Danke für deine Antwort!
Ich habs schon so ähnlich gemacht. Mein problem liegt bei "schreibBericht(rs!ID)", da ich nicht weiß, wie man dem Bericht die KundenID übergeben kann. Der Befehl vom Öffnen des Berichtes lässt nur 2 Parameter zu: Name und Typ

Danke im Voraus!
mfg mike

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

003
24.01.2003, 22:03 Uhr
mike
Pinguinhüpfer
(Operator)

Hmmm
Laut M$ sollte es funtzen http://msdn.microsoft.com/library/default.asp?url=/library/en-us/modcore/html/deconworkingwithdocmdobject.asp
Tut es aber nicht. Frage (bin glob i zu blöd dafür

)
Habe die Tabelle tblSurfen. Dort sind alle Internetzeiten der Kunden eingetragen. Die wichtigsten Spalten lauten: ID, KundenID, Dauer, Datum.
Nun hab ich auf diese Tabelle eine Abfrage gemacht (tblSurfen Abfrage). Wichtigste Splaten: ID, KundenID, Dauer, Datum, Zeitspanne (errechnet Differenz zwischen Datum und heute). Jetzt hab ich bei Kriterien der Spalte KundenID [Kunde] reingeschrieben. Wenn ich nun die Abfrage öffne, kommt eine Parametrabfrage "Kunde". Gibt ich z.B. "1" ein, listet er mir alle Surfzeiten des Kunden 1 auf. Anschließend hab ich mit dem Assi einen Bericht auf die "tblSurfen Abfrage" erstellt. Öffne ich den Bericht -> Parameterabfrage "Kunde". Funktioniert ja alles wunderbar.
Aber wie kann ich diesem VBA beibringen, dass der Parameter "1","2","3" usw. sein soll? Wenn ich im dritten Parameter "[Kunde] = 1" reinschreibe, erscheint trotzdem dieses Parameterfeld (*würg meinen Computer*).
Nun zur meiner Frage

Was muss ich in diesen Kriterienparameter rein schreiben?

Danke!!!
mfg mike

Profil || Private Message || Suche

Download || Zitatantwort || Editieren || Löschen || IP

Seiten: > 1 < [ Allgemeines (OffTopic) ]

ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: