终端上不显示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 终端上不显示

共有3275人关注过本帖树形打印复制链接主题：终端上不显示

nxqtxwz

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1492 积分：12149 威望：0 精华：0 注册：2013/3/19 16:41:00

终端上不显示 发帖心情

Post By：2020/3/18 10:54:00 [只看该作者]

生成的excel表在服务器端显示了，但移动端不显示是什么问题呢。

Case "order.xls"
        Dim Book As New XLS.Book(ProjectPath & "Attachments\信息表.xls")
        Dim fl As String = ProjectPath & "Reports\信息表.xls"
        book.AddDataTable("职工信息总表","学校档案","Select * f rom {职工信息总表} where 姓名 = '王忠'")
        Book.Build()
        Book.Save(fl)
        Dim Proc As New Process
        Proc.File = fl
        Proc.Start()
       book.PreBuild = False
        e.WriteBook(book,"信息表.xls",False)

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：106209 积分：540168 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/18 11:07:00 [只看该作者]

参考：http://www.foxtable.com/mobilehelp/topics/0148.htm

Case "order.xls"
        Dim Book As New XLS.Book(ProjectPath & "Attachments\信息表.xls")
        book.AddDataTable("职工信息总表","学校档案","Select * f rom {职工信息总表} where 姓名 = '王忠'")
        e.WriteBook(book,"信息表.xls",False)

[此贴子已经被作者于2020/3/18 11:07:13编辑过]

nxqtxwz

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1492 积分：12149 威望：0 精华：0 注册：2013/3/19 16:41:00

Post By：2020/3/18 11:46:00 [只看该作者]

用下面的代码可以生成excel文件，下载的手机打不开。

Case "order.xls"
Dim Book As New XLS.Book(ProjectPath & "Attachments\信息表.xls")
Dim fl As String = ProjectPath & "Reports\信息表.xls"

        book.AddDataTable("职工信息总表","学校档案","Select * fr om {职工信息总表} where 姓名 = '王忠'")
       ' e.WriteBook(book,"信息表.xls",False)
        Book.Build()
         Book.Save(fl)
          e.WriteFile(fl)

用教师您的这段代码什么也不显示

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：106209 积分：540168 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/18 11:58:00 [只看该作者]

手机打不开提示什么？是不是手机没有安装打开execl的应用

nxqtxwz

小大 5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1492 积分：12149 威望：0 精华：0 注册：2013/3/19 16:41:00

Post By：2020/3/18 12:10:00 [只看该作者]

老师好，手机上安装了excel，但不知版本是不是符合。

在电脑上也打不开，说明不是excel的问题。

[此贴子已经被作者于2020/3/18 12:21:01编辑过]

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：106209 积分：540168 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/3/18 13:39:00 [只看该作者]

帮助这里的代码我测试没有问题：http://www.foxtable.com/mobilehelp/topics/0148.htm

上传实例测试

nxqtxwz

小大 7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：六尾狐帖子：1492 积分：12149 威望：0 精华：0 注册：2013/3/19 16:41:00

Post By：2020/3/18 20:07:00 [只看该作者]

就这么简单的一段代码为什么就不行呢。

Case "order.xls"
        Dim Book As New XLS.Book(ProjectPath & "Attachments\信息表.xls")
        Dim fl As String = ProjectPath & "Reports\信息表.xls"
        book.AddDataTable("职工信息总表","学校档案","Select * fr om {职工信息总表} where 姓名 = 'aaa")
        Book.Build()
        Book.Save(fl)
        Dim Proc As New Process
        Proc.File = fl
        Proc.Start()                  '到一行都是正常的，形成的表都正确，显示在服务器屏幕上。

        e.WriteBook(book,"信息表.xls",True)            '到这就没什么动静了，手机上什么也没显示，啥原因啊。