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

  Case "table.htm"
  With wb.AddTable("","Table1")
            .CreateFromTable(Tables("表名"),True)
        End With

加个查询条件什么加

这个电脑上有显示才可以在手机上显示吗

[此贴子已经被作者于2021/8/6 11:11:55编辑过]

先筛选table，再生成。或者改为使用CreateFromDataTable：http://www.foxtable.com/mobilehelp/topics/0074.htm

电脑上不显示不可以生成吗

Col1, Col2, Col3

字符型，用于指定要显示的列，例如：

.CreateFromTable(Tables("订单"),True,"产品","客户","日期","数量")

如果说这个列都没有加载，或者不存在，肯定是用不了的

[此贴子已经被作者于2021/8/6 11:33:44编辑过]

数据电脑上要有，手机上才有，是不是

可以直接取数据库表：http://www.foxtable.com/mobilehelp/topics/0128.htm

'获取该页数据
Dim cmd As New SQLCommand
cmd.ConnectionName = "orders" '记得设置数据源名称
cmd.CommandText = "Select Count(*) From {订单}"
Dim Count As Integer = cmd.ExecuteScalar() '获取总的行数
Dim Pages As Integer = Math.Ceiling(Count/PageRows) '计算出总页数
cmd.CommandText = "Select * From (Select Row_Number() Over(Order by 订单.订单编号 desc ) As RowNum,订单.订单编号,日期,客户,Sum(数量) As 数量,sum(数量*单价) As 金额"
cmd.CommandText = cmd.CommandText & " From 订单 Left JOIN 订单明细 ON 订单明细.订单编号 = 订单.订单编号 Group By {订单}.订单编号,日期,客户) As a "
cmd.CommandText = cmd.CommandText & " Where RowNum >= " & StartRow & " And RowNum <= " & EndRow
Dim dt As DataTable = cmd.ExecuteReader
'根据此页数据生成表格
Dim wb As New WeUI
With wb.AddTable("","Table1")
    .PageNumber = page '设置页码
    .ActiveSheet = "menu" '指定菜单
    .Primarykey = "订单编号" '指定主键,只要是能唯一区分行的列即可,并非一定要表的实际主键.
    .CreateFromDataTable(dt, False,"","","订单编号","客户","日期","数量","金额")
End With

这个可以显示表达式的列吗

不能。如果已经有表达式列，肯定是已经加载了，使用之前的用法即可

主题：看不到表达式