save data report to .mdi format in a folder

[PinoyDev]

Good day!

I want to save the data report with the .mdi(microsoft document imaging printer viewer) on a specidied folder..

'Print to a Specified nondefault printer

Dim PrintData As Printer
Dim defprinterpos As Integer
Dim currentPrinter As String

For Each PrintData In Printers
    If PrintData.DeviceName = Printer.DeviceName Then
        currentPrinter = Printer.DeviceName
    End If
Next

Dim DefaultPrinter As String
DefaultPrinter = "Microsoft Office Document Image Writer"
SetDefaultPrinter DefaultPrinter
DataReport1.PrintReport 'instead of printing here..I need to save the datareport to a folder instead

SetDefaultPrinter currentPrinter

Thank you!