Foxtable(狐表)用户栏目专家坐堂 → 请教WeUI的表格属性使用问题


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

主题:请教WeUI的表格属性使用问题

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


加好友 发短信
等级:一尾狐 帖子:433 积分:4351 威望:0 精华:0 注册:2017/3/20 21:08:00
请教WeUI的表格属性使用问题  发帖心情 Post By:2020/2/6 17:13:00 [只看该作者]

各位专家新年好!
-------------以下是一段实例代码开始
  '根据此页数据生成网页
    With wb.Add Table("form1","Table1")
        If Vars("table_model") = "浏览模式" Then    '如果是看图模式,就启动看图函数
            .Attri bute= "onc lick='table_img1()'"        调用这个函数是让用户在点击此行时,直接显示这行的刀具图片
        Else
            .Active Sheet="menu1"                         这是调用表格操作菜单
        End If
        .PageNumber=page
        .Colwidth="12px"
        .Highlight= 1
        .Alternate = 3 
        Dim nms() As String={"NO","名称","规格","数量","单位","编号"} '"单价",
        .head.AddRow(nms)
        For Each r As Data Row In dt.DataRows 'Data Tables("item99").Select("isl01 >= 5 and ibh01='刀'","imc01")
            With .body.addrow(r("NO."),r("imc01"),r("igg01"))
                If r("isl01") = 0 Then
                    .addcell(Format(r("isl01")),"class='mark'")  'style='color:blue;
                Else
                    .addcell(r("isl01"),"class='alignC'")
                End If
                .addcell(r("idw01"),"class='alignC'")
                '                .addcell(Format(r("idj01"),"#0.00"),"class='markR'")
                .addcell(r("ishelf01"),"class='alignC'")
                .PrimaryKey=r("_Identify")    
            End With
        Next
    End With
-------------实例代码结束
            .Attri bute= "onc lick='table_img1()'"        调用这个函数是让用户在点击此行时,直接显示这行的刀具图片
            .Active Sheet="menu1"                         这是调用表格操作菜单
上面这2个属性,现在让用户在操作之前先要选择 “操作模式” 或 “浏览模式” 进来,
然后才的浏览图片 或 操作菜单, 当我把2个属性放在一起,操作的时候,总是会产生点击“冲突",

请问:我应该如何布局这2个属性,才能让它们在一个表里共存,
        就是用户不需要先选择操作模式、进入应用 后点击任意行时,在表底部显示出产品图片;
        当用户连续点击行时,弹出菜单;
谢谢专家!
祝各位专家新年快乐!

[此贴子已经被作者于2020/2/6 17:18:07编辑过]

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/6 18:09:00 [只看该作者]

首先服务端不应该使用全局变量

其次,完整代码放到txt'文件发上来看看

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


加好友 发短信
等级:一尾狐 帖子:433 积分:4351 威望:0 精华:0 注册:2017/3/20 21:08:00
请专家针对楼上问题,帮忙指点一下,谢谢!  发帖心情 Post By:2020/2/6 18:55:00 [只看该作者]


请专家针对楼上问题,帮忙指点一下,
谢谢!
[此贴子已经被作者于2020/2/7 11:50:57编辑过]

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/7 9:23:00 [只看该作者]

setProgressValue这个函数在哪里,没看到,另外如果调用了js处理,一般按钮不予使用submit

.Add("btn1", "开始查询", "button") ' .Attribute= """  '.kind=2

其次不要使用全局变量Vars("table_model"),改为普通变量。

然后点击“冲突"具体指什么?

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


加好友 发短信
等级:一尾狐 帖子:433 积分:4351 威望:0 精华:0 注册:2017/3/20 21:08:00
冲突主要体现在以下  发帖心情 Post By:2020/2/7 11:50:00 [只看该作者]

            .Attri bute= "onc lick='table_img1()'"        调用这个函数是让用户在点击此行时,直接显示这行的刀具图片
            .Active Sheet="menu1"                         这是调用表格操作菜单
如果以上2个属性放在一起:
当用户点一次某一行,在表格底部显示出产品的图片,
当用户点2次某一行时,表格还是首先在底部显示出产品的图片,同时再弹出表格菜单
        但在显示产品图片的时候,就把显示出来的菜单给解放掉了;导致无法继续操作菜单;

谢谢专家指教的以上几点,但还是无法达到我希望的目的。

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


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/2/7 12:17:00 [只看该作者]

这种代码肯定不能放到一起使用,像一楼代码,不是区分开的吗?怎么会在一起?

        If Vars("table_model") = "浏览模式" Then    '如果是看图模式,就启动看图函数
            .Attri bute= "onc lick='table_img1()'"        调用这个函数是让用户在点击此行时,直接显示这行的刀具图片
        Else
            .Active Sheet="menu1"                         这是调用表格操作菜单
        End If

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


加好友 发短信
等级:一尾狐 帖子:433 积分:4351 威望:0 精华:0 注册:2017/3/20 21:08:00
终于专家的答复:  发帖心情 Post By:2020/2/7 13:29:00 [只看该作者]

这种代码肯定不能放到一起使用,像一楼代码,不是区分开的吗?怎么会在一起?
谢谢你!

 回到顶部