在数据环境中加一个command1
dataenvironment.rscommand1.close
dataenvironment.rscommands(1).commandtext = "SQL语句"
dataenvironment.rscommand1.open
打印
报表名.PRINT()
dataenvironment.rscommand1.close
dataenvironment.rscommands(1).commandtext = "SQL语句"
dataenvironment.rscommand1.open
打印
报表名.PRINT()
有空讨论我的email是[email protected]
cmd.CommandText = "select * from oil order by 发油时间"
Set DataReport1.DataSource = cmd.Execute