回 帖 发 新 帖 刷新版面

主题:请问,如何将水晶报表导出到word文档?

请问,如何将水晶报表导出到word文档?

回复列表 (共1个回复)

沙发

水晶报表的自带功能就有。
string   Conn=   ConfigurationSettings.AppSettings.Get("Con");   
  SqlConnection   myconn=new   SqlConnection(Conn);   
  string   sql="select   *   from   PartNumber";   
    
  DataSet   ds=new   DataSet();   
  SqlDataAdapter   SDA=new   SqlDataAdapter(sql,myconn);   
  try   
  {   
  SDA.Fill(ds,"PartNumber");//将表写入DataSet   
  }   
  catch   
  {   
  Response.Write("<script>history.back();alert('查询数据过多或数据问题!');</script>");   
  Response.End();   
    
  }   
  if   (ds.Tables[0].Rows.Count>0)   
  {   
  rptyi.SetDataSource(ds.Tables[0]);   
  //   声明变量并获取导出选项。   
  ExportOptions   exportOpts   =   new   ExportOptions();   
  DiskFileDestinationOptions   diskOpts   =   new   DiskFileDestinationOptions();   
  exportOpts   =   rptyi.ExportOptions;   
  //   设置导出格式。   
  exportOpts.ExportFormatType   =   ExportFormatType.PortableDocFormat;   
  exportOpts.ExportDestinationType   =   ExportDestinationType.DiskFile;   
    
  //   设置磁盘文件选项。   
  string   pdfname="cha"+DateTime.Now.ToShortDateString()+"_"+DateTime.Now.ToLongTimeString().Replace(":","-")+"_"+DateTime.Now.Millisecond.ToString()+".pdf";   
  diskOpts.DiskFileName   =   Server.MapPath("PDF/"+pdfname);   
  exportOpts.DestinationOptions   =   diskOpts;   
  rptyi.Export();   
  rptyi.Dispose();   
    
  Response.Write("<script>window.open('pdf/"+pdfname+"');history.go(-1);</script>");   
    
  }   
  else     
  {   
  Response.Write("<script>history.back();alert('没有满足您查询条件的数据,请重新输入查询条件!');</script>");   
  Response.End();   
  } 

我来回复

您尚未登录,请登录后再回复。点此登录或注册