Access 97 - Report Printers

[MrNoMotivation]

Hi All,

wondering if one of you can help me.
I've written this piece of code in Access 97 (don't ask ) and it's not working. It should simply display in the debug window the name of the printers for the specified report.
Eventually I want it to loop round to find the printers for all the reports in the database.

Any ideas?

Cheers

--Code--
Function LocatePrinter()

Dim rpt1 As Report

Dim rptToChange As String
rptToChange = "Report1"
DoCmd.OpenReport rptToChange, acViewDesign

Set rpt1 = Reports(rptToChange)

Debug.Print (rpt1.PrtDevNames)

End Function
----------------------------------------------------

--Result

* ???? ????????????????????2

---------------------------------

[MrNoMotivation]

anyone?

[MrNoMotivation]

No one motivated to solve this query?
Is this thread doomed?

[_V_]

No one motivated to solve this query?
Is this thread doomed?

Hang on, is it......?

No, forget it.

The deafening silence is telling you that Access 97 belongs in the dustbin of history.

Upgrade to the latest and greatest MS Access or better still put the data in a proper database and build a proper front end and reporting system.

[MrNoMotivation]

I agree it does belong in the bin.
However, the client's attitude is 'if it works don't touch it'.
The client is always right....... as long as they pay the invoice.
Anyway I've tried the code on later versions of Access and it still produces the same results.

[lilelvis2000]

sigh....

http://support.microsoft.com/kb/129397

and

http://www.pcreview.co.uk/forums/thread-1632295.php

and....

http://www.mvps.org/access/reports/rpt0009.htm

and...

http://msdn.microsoft.com/en-us/libr...ffice.10).aspx


surely you can see that it is not straight text and will need decoding.

Good luck

[MrNoMotivation]

sigh....

http://support.microsoft.com/kb/129397

and

http://www.pcreview.co.uk/forums/thread-1632295.php

and....

http://www.mvps.org/access/reports/rpt0009.htm

and...

http://msdn.microsoft.com/en-us/libr...ffice.10).aspx


surely you can see that it is not straight text and will need decoding.

Good luck

surely it should be straight text. Thanks for all the links. I looked at just about all of these before creating the thread. Can't see them mention decoding anywhere.

[xoggoth]

Did some Access 2004 (? I think) work last year. Not that different to 97 in many areas, upgrade would be fairly easy I would have thought.

[MrNoMotivation]

Did some Access 2004 (? I think) work last year. Not that different to 97 in many areas, upgrade would be fairly easy I would have thought.

still wouldn't solve the problem I've encountered.

[MrNoMotivation]

Right. I've tried the code in a later version of Access and it's still coming up with the same result. Any ideas please?