Foxtable(狐表)用户栏目专家坐堂 → 网页直接生成下载excel


  共有3988人关注过本帖树形打印复制链接

主题:网页直接生成下载excel

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


加好友 发短信
等级:五尾狐 帖子:1068 积分:7624 威望:0 精华:0 注册:2009/6/24 9:44:00
网页直接生成下载excel  发帖心情 Post By:2023/6/10 11:44:00 [只看该作者]

Dim e As RequestEventArgs = args(0) 
Dim wb As New WeUI
Dim flt As String

If e.PostValues.Count > 0 Then 
    If e.PostValues.ContainsKey("startdate") Then
        If flt > "" Then
            flt = flt & " and "
        End If
        flt = flt & "入境时间 >= '" & e.PostValues("startdate") & "'"
    End If
    If e.PostValues.ContainsKey("enddate") Then
        If flt > "" Then
            flt = flt & " and "
        End If
        flt = flt & "入境时间 <= '" & e.PostValues("enddate") & "'" 
    End If
    If flt > "" Then 
    wb.AppendCookie("fzfilter", flt) 
    Dim Book As New XLS.Book(ProjectPath & "Attachments\船舶统计表.xls")
    book.AddDataTable("员工", "chuanbojianguan", "Sel ect * from {检疫资料} where " & flt)
    e.WriteBook(book, "emp.xls", False)
End If
Else
    flt = e.Cookies("fzfilter")
End If


这样写报错:.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.8.18.1
错误所在事件:自定义函数,tongji
详细错误信息:
调用的目标发生了异常。
打开存储文件失败。

问题在哪呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/6/10 11:51:00 [只看该作者]

下面路径的文件不存在,或者处于打开状态

ProjectPath & "Attachments\船舶统计表.xls"

 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1068 积分:7624 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2023/6/10 11:55:00 [只看该作者]

添加了一个空表在这个目录,现在打开之后表里没有任何 内容,这个不是应该自动生成带内容的excel吗?还需要自己做报表吗?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/6/10 11:59:00 [只看该作者]

要设计好模板。不是空表:http://www.foxtable.com/webhelp/topics/2877.htm

另外WriteBook会直接发送到前端,不会在Attachments保留文件

 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1068 积分:7624 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2023/6/10 12:43:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20230610124126.png
图片点击可在新窗口打开查看

这些为什么都是空的呢?

 回到顶部
帅哥哟,离线,有人找我吗?
ycs5801
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1068 积分:7624 威望:0 精华:0 注册:2009/6/24 9:44:00
  发帖心情 Post By:2023/6/10 13:08:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20230610130701.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/6/10 14:04:00 [只看该作者]

1、没有符合条件的数据
2、列名不正确
3、表名对不上:http://www.foxtable.com/mobilehelp/topics/0149.htm
book.AddDataTable("检疫资料", "chuanbojianguan", "Sel ect * from {检疫资料} where " & flt)

 回到顶部