如何在B/S结构的中实现打印(200分)

现要学习websoap，但不知如何在B/S结构的中实现打印，请教？

如果单纯用asp做将会非常困难,用delphi的activeform做成ocx控件(比较简单)或编写
一active libray的asp组件,调试和格式都非常方便.

to songyu:
您好，能详细说说怎么实现吗？急需。我调过几次，没有成功。

做一个com,在客户端掉用，和acitvex一样，需打开安全设置

在delphi下点new|activex|activexform|做好后，在IE里调用[8D]

开始，我以为不能实现，让你们点了一下有点感觉了。在此谢过。[]

对不起，因网络通讯不稳定，回复可能晚一点。在delphi下通过向导建立一activexform框架,
将生成一主form和接口文件,接口文件可用type library编辑和添加方法属性，
form窗体可象普通delphi应用程序一样编程即可，但要注意资源和指针类一定要释放好，否则将会出错。
建立时最好选允许调试型，可象普通程序一样调试。

to songyu:
您好，可不可以提供一段关键代码，如果需要分，我可以另开一贴200分。付出总要有回
报的嘛。：）
我只是希望能搞清楚WEB打印的方法，希望能不吝赐教。
mail:zy@suzhou.cngb.com

procedure Tbutton.ActiveFormCreate(Sender: TObject);
begin
ReportForm:=TQRreportForm.Create(self);
ReportForm.ADOConnection1.Connected:=false;
ReportForm.ADOConnection1.ConnectionString:=LServer;
ReportForm.ADOConnection1.Connected:=true;
ReportForm.ADODataSet1.CommandText :=LSele;
ReportForm.ADODataSet1.Active :=true;
end;

procedure Tbutton.PrintbuttonClick(Sender: TObject);

begin

if not ReportForm.ADODataSet1.IsEmpty then
ReportForm.QuickRep1.Preview;
end;

end;

其中lserver为传入连接数据源字符串，LSele为要执行的SQL语句，前两者应定义为属性
TQRreportForm为建立的报表窗体，PrintbuttonClick为网页中看见的按钮的按钮事件，
往事别忘了释放资源，框加用DELPHI引导吧！