如何用打印机的"名称"来指定打印机打印?
怎样指定打印机的名称来打印下面查询报表?

sql = "select * from Rec_Flow "
rs.Open sql, cn, 1, 1
DataEnvironment1.rsCommand1.Open sql

If DataEnvironment1.rsCommand1.State = adStateOpen Then
DataEnvironment1.rsCommand1.Close
End If
DataReport1.Show '调出报表打印

[解决办法]
http://forums.devx.com/showthread.php?t=36822
[解决办法]
http://forums.devx.com/showthread.php?t=36822