Dynamic report (using a template)

[moishy]

I'm creating a db for a realtor.

One table holds all the property information, another, the clients and what they are looking for.

I'm looking for a way to create a dynamic report (using a template) to print a list of the properties that match the criteria of each client.

Any ideas and/or samples are welcome.

Thanks in advance.​

 

[vbaInet]

moishy I'm almost certain you know how to do this for forms already. It's the same principle for reports as well. I'm talking about using the fourth parameter of the WHERE condition:

docmd.OpenReport "ReportName", acViewPreview, , "WHERE condition"

For more:

http://baldyweb.com/wherecondition.htm

 

[moishy]

What I meant to ask is how can I loop thru all the client records printing the proper information.

 

[vbaInet]

We've provided this solution many times. Perform a search for it. You need to loop using a recordset.

 

[moishy]

Is something like this what you're referring to:

[FONT=monospace][/FONT]
  Dim db      As DAO.Database
  Dim rs      As DAO.Recordset
  
  Set db = CurrentDb
  Set rs = db.OpenRecordset(tblContacts, dbOpenDynaset)

  Do While Not rs.EOF
    Docmd.OpenReport "ReportName", acViewPreview, , "WHERE condition"
    rs.MoveNext
  Loop

  Set rs = Nothing
  Set db = Nothing

 

[vbaInet]

Precisely! Are you printing to paper>

 

[moishy]

Printing to paper and or emailing using cdo.

 

[vbaInet]

I'm sure you know the necessary Print command(s) to issue to get it to print. As for e-mailing, you're obviously going to need to save as a pdf before you e-mail.

 

[moishy]

I hope so, we'll see when I get there.

 

[vbaInet]

Let us know how it goes or if you need further clarification.