[求助]无法点击生成的表 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]无法点击生成的表

共有2076人关注过本帖树形打印复制链接主题：[求助]无法点击生成的表

1538000

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

加好友

发短信

等级：婴狐帖子：56 积分：421 威望：0 精华：0 注册：2017/7/27 15:11:00

[求助]无法点击生成的表 发帖心情

Post By：2017/12/8 9:36:00 [只看该作者]

为什么这样生成的表在手机界面上显示的无法点击，无法点击我就不能调出菜单来，以下是部分代码：

Dim cmd As new SQLCommand

cmd.C

cmd.CommandText= "s elect spbm as 商品编码,录入时间,sl as 数量,创建人,mdbm as 门店编码 From 商品盘点"

If flt > "" Then

cmd.CommandText = cmd.CommandText & " where " & flt & " order by 录入时间 desc,_Identify desc "

End If

Dim Count As Integer = cmd.ExecuteScalar() '获取总的行数

With wb.AddTable("","Table1")

.CreateFromDataTable(cmd.ExecuteReader)

End With

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/12/8 9:53:00 [只看该作者]

用这个实例，又没问题？

http://www.foxtable.com/mobilehelp/scr/0147.htm

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/12/8 9:56:00 [只看该作者]

我这样测试，没，问，题。

Select Case e.Path
    Case "test.htm",""
        Dim wb As New WeUI
        With wb.AddTable("","table1")
            Dim cmd As new SQLCommand
            cmd.CommandText = "Select * from {表A}"
            Dim dt = cmd.ExecuteReader
            .CreateFromDataTable(dt)

            .ActiveSheet = "menu" '指定菜单
        End With
        With wb.AddActionSheet("","menu") '设计菜单
            .Add("menu1", "菜单项目1")
            .Add("menu2", "菜单项目2")
            .Add("menu3", "菜单项目3")
            .Add("menu4","取消","",True)
        End With
        e.WriteString(wb.Build)
End Select