How to print a listview's or datagrid's content as a report??

[Yok]

?

[John McKernan]

This code works for printing MS Flexgrids, never tried it on ListViews or Datagrids though.

Private Sub PrintGrid(MyGrid As MSFlexGrid)
 
Dim OldWidth As Integer
 
OldWidth = MyGrid.Width
MyGrid.Width = Printer.Width
Printer.PaintPicture MyGrid.Picture, 0, 0
Printer.EndDoc
MyGrid.Width = OldWidth
 
End Sub

You will have to change the references to MSFlexGrid to the control you are using.

Hope it helps.

[Hack]

Try the code on this link...

http://www.vb2themax.com/HtmlDoc.asp...s&ID=50&Page=2