Foxtable(狐表)用户栏目专家坐堂 → EXCEL打印问题


  共有6525人关注过本帖平板打印复制链接

主题:EXCEL打印问题

帅哥哟,离线,有人找我吗?
rjh4078
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3355 积分:24732 威望:0 精华:0 注册:2012/3/26 21:47:00
EXCEL打印问题  发帖心情 Post By:2013/3/12 14:20:00 [只看该作者]

使用webBrower可以预览报表 但是用户却能更改预览的数据 如何禁止用户修改webBrower中的数据呢

 

用下面的代码

       Dim Book As New XLS.Book(ProjectPath & "Attachments\销售订单.xls")
        Dim fl As String = ProjectPath & "Reports\销售订单.xls"
        Book.Build()
        Book.Save(fl)
        Dim App As New MSExcel.Application
        Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
        Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
        App.Visible = True
        Ws.PrintPreview
        App.Quit
可以生成预览  但是打开的程序却不是在最顶层 有什么方法改进?


 回到顶部