近我想自已做一个web打印的程序。
想在服务器端用asp组件将fastreport的frf文件生成frp文件,然后在客户端用activexform
预览并打印。在弄asp组件时,通不过去了,请各位大侠帮一下,谢谢了。
我的代码如下:
procedure engeer.adddataset(dataname:widestring;mydata:IUnknown);
   var
     myfrreport:Tfrreport;
     myfrdb:Tfrdbdataset;
     mydb:Tadoquery;
    myrecord:_recordset;
  begin
     myfrreport:=Tfrreport.create(nil);
     myfrreport.showprograss:=false;  //不显示进度条。
     myfrdb:=Tfrrdbdataset.create(nil);
     myfrdb.name:='frdbdataset1';  //这里应和设计时用的frdbdataset控件名一样;
     myfrreport.dataset:=myfrdb;
     mydb:=Tadoquery.create(nil);
     mydb.name:=dataname;   //这里和设计时用的数据集控件名相同;
     myfrdb.dataset:=mydb;
     myrecord:=mydata as _recordset;
     mydb.recordset:=myrecord;  
     myfrreport.loadfromfile('xxxxx.frf');  //调用模板文件。
     myfrreport.praperReport;
     myfrreport.savepraperreport('xxxx.frb');  //保存生成的数据文件。
     myrecord.free;
     mydb.free;
     myfrdb.free;
     myfrreport.free;
 end;
 
运行ASP时,报错:Missing FrDBdataset1;各位,以上我在应用程序中已实现。在应用程序中只是将 create(nil) 改为 create(self);