以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何让导出为excel文件时不出现选项?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=37858)

--  作者:comnets
--  发布时间:2013/7/13 10:38:00
--  如何让导出为excel文件时不出现选项?
客户端不希望用户能选择导出该用户不可见的列。
--  作者:Bin
--  发布时间:2013/7/13 10:40:00
--  
自己写个按钮可以避免这个问题 http://www.foxtable.com/help/topics/0683.htm
--  作者:comnets
--  发布时间:2013/7/13 16:21:00
--  
Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter= 
"Access文件|*.mdb" \'设置筛选器
If 
dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim 
ex As New Exporter
    
ex.SourceTableName = "订单" \'指定导出表
    
ex.filepath = dlg.FileName  \'指定目标文件
    
ex.Export() \'开始导出
End If

    ex.SourceTableName = "订单" \'指定导出表 
这行如何更改为导出当前表?

--  作者:Bin
--  发布时间:2013/7/13 16:29:00
--  
ex.SourceTableName= currenttable.name
--  作者:comnets
--  发布时间:2013/7/13 19:14:00
--  
ex.Filter = "[A] = \'A\'" \'指定导出条件

怎样指定只导出A列值为当前登录的用户组名称的行?

--  作者:comnets
--  发布时间:2013/7/13 19:19:00
--  
或者只导出可见行?(已经设置为某用户组只能看到A表中自己创建的行)
--  作者:e-png
--  发布时间:2013/7/13 21:33:00
--  
表A增加一列:录入者(默认为:User.Name),导出的时候筛选一下即可。
--  作者:有点甜
--  发布时间:2013/7/14 8:04:00
--  
以下是引用comnets在2013-7-13 19:14:00的发言:
ex.Filter = "[A] = \'A\'" \'指定导出条件

怎样指定只导出A列值为当前登录的用户组名称的行?

 

 

ex.Filter = "[A] = \'" & User.Name & "\'"


--  作者:comnets
--  发布时间:2013/7/14 11:16:00
--  
至少一个参数没有被指定值。。。。。

ex.Filter = "[A] = \'" & User.Name & "\'"
没问题

我把它改成User.Group就会出现“至少一个参数没有被指定值
[此贴子已经被作者于2013-7-14 11:32:17编辑过]