Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共19 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:[求助]:如何在DataList中打印选定的行?(用Excel报表)

1楼
cpayinyuan 发表于:2009/3/29 11:42:00

     如题,在DataList中,通过选择框选定一些行,如何调用Excel 模板只打印这些选定行?(用Excel报表)最好谁能做个例子传上来,谢谢!

2楼
yangming 发表于:2009/3/29 13:19:00
我的办法,先筛选,然后在筛选出来的进全部选定,然后再点EXCEL报表管理器,选择相关的EXCEL表预览,你就能看到EXCEL中就是你筛选后的表格了,到了EXCEL中你再操作打印便可了
3楼
cpayinyuan 发表于:2009/3/29 18:17:00
以下是引用yangming在2009-3-29 13:19:00的发言:
我的办法,先筛选,然后在筛选出来的进全部选定,然后再点EXCEL报表管理器,选择相关的EXCEL表预览,你就能看到EXCEL中就是你筛选后的表格了,到了EXCEL中你再操作打印便可了

这种办法不可行。
因为要打印的行是在DataList中临时根据需要选取的,用筛选的办法不方便!
还是希望谁提供一个解决方案,最好提供一个事例!

4楼
czy 发表于:2009/3/29 19:33:00
筛选的为什么会不行呢?
我想不管什么方法能实现要求的都是好方法。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.rar
5楼
yangming 发表于:2009/3/29 20:12:00
我觉得用筛选很好啊,可以参考程序自带的"窗口筛选.table"进行筛选,然后再打印EXCEL表
6楼
czy 发表于:2009/3/29 20:39:00
以下是引用yangming在2009-3-29 20:12:00的发言:
我觉得用筛选很好啊,可以参考程序自带的"窗口筛选.table"进行筛选,然后再打印EXCEL表


模板的筛选和楼主要求有很大区别的。

7楼
smileboy 发表于:2009/3/29 21:26:00
我一直用datalist和表同时筛选打印
8楼
yangming 发表于:2009/3/29 22:27:00
看看这个表
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:窗口筛选.table

9楼
czy 发表于:2009/3/29 23:11:00
4楼的代码改成下面这样操作时看起来好一点。

For Each dr As DataRow In DataTables("员工").DataRows
    dr("打印") = false
Next
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
For Index As Integer = 0 To dst.Count - 1
    If dst.GetChecked(Index) Then
        Dim dr As DataRow = dst.GetDataRow(Index)
        dr("打印") = true
    End If
Next
Dim dr1 As DataRow
dr1 = DataTables("员工").Find("打印 = true")
If dr1 IsNot Nothing Then
    Tables("员工").Filter = "[打印] = true"
    CurrentTable.Select(0,1,CurrentTable.Rows.Count-1,1)
    Dim Book As New XLS.Book(ProjectPath & "Attachments\资料卡.xls")
    Book.Build()
    Book.Save(ProjectPath & "Reports\资料卡.xls")
    Tables("员工").Filter = ""
    CurrentTable.Select(0,1,0,1)
    Dim Proc As New Process '打开工作簿
    Proc.File = ProjectPath & "Reports\资料卡.xls"
    Proc.Start()
Else
    MessageBox.Show("没有要打印的数据!")
End If
10楼
blackzhu 发表于:2009/3/30 7:39:00
以下是引用smileboy在2009-3-29 21:26:00的发言:
我一直用datalist和表同时筛选打印

  我也是表和DATALIST同时筛选打印的.

共19 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03906 s, 4 queries.