有关VB6自带的dataReport设置纸张大小的问题.

[SeeSunSet]

以前是在win98下用,发现在打印的时候报表大小取决系统默认打印机设置的纸张大小,打印机是Epson LQ-570+由于在win98下可以自定义纸张大小(用的是自动走纸),就非常方便,可是现在到了win2000下面.该死的打印机里面却没有了默认打印机的自定义纸张大小的设置.真是害死人...不知道DataReport在打印时如何设置纸张大小...
我试过printer.scalemode=7 '设成CM
printer.width=19 '19CM
printer.height=14
这样设置了却没有用.打印报表代码如下:
On Error Resume Next
If DataEnv.Connection1.state = 0 Then DataEnv.Connection1.Open cnstr
DataEnv.Commands.Item("Goods").CommandText = Adodc1.RecordSource
DataEnv.Commands.Item("Goods").Execute
If DataEnv.rsGoods.state = 0 Then
'DataEnv.Connection1.ConnectionString = cnstr

DataEnv.rsGoods.Open
End If
DataEnv.rsGoods.Requery
rptGoods.Refresh
rptGoods.Show

[tangxiaosan001]

晕。

[SeeSunSet]

如果是水晶报表的话就不存在这个问题,但是水晶报表必须打包装进去.麻烦点儿.由于是朋友的小系统,所以我就直接用DATAREPORT做了.但是现在在WIN2000上用.结果死东西又没有自定义打印机纸张.害死人了...

[ryuginka]

up