以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于WEUI的Panel系列问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=132758)

--  作者:智友软件工作室
--  发布时间:2019/3/29 10:04:00
--  [求助]关于WEUI的Panel系列问题

如何分别设置标题和描述的文字大小(不改变原样式)

后面的onclick=show(\'s1\')  为什么不让显示呢?

 

                    With .Add("pn" & i,dr111("区块") & " " & dr111("客户需求") & " " & dr111("客户姓名"),dr111("客户地址") & "<br/>" & dr111("产品品牌") & " " & dr111("产品种类") & "  " & dr111("反应问题") & "  " & dr111("特殊说明"),"./images/" & i & ".ico")
                        .Attribute ="""
                    End With

 

 


图片点击可在新窗口打开查看此主题相关图片如下:微信图片编辑_20190329100036.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2019/3/29 10:08:24编辑过]

--  作者:智友软件工作室
--  发布时间:2019/3/29 10:26:00
--  
1、2、3、4分别对应4条工单,每个工单都有一个唯一编号,现在已实现单价某一条记录下面弹出AddActionSheet
            With wb.AddActionSheet("","s1")
                .Add("menu1", "工单详情")
                
                .Add("menu4","取消","",True)
            End With
我现在想每添加一个pn的时候插入一个隐藏的工单编号,单价记录的时候传递这个编号,然后我再点击工单详情会打开一个工单详情的网页,打开新网页的时根据这个唯一编号调取这个工单的详细记录并写入到对应输入框中。
请问该怎么传递这个工单编号?

--  作者:有点甜
--  发布时间:2019/3/29 10:26:00
--  

你可以直接加样式的,比如

 

Select Case e.Path
    Case "test.htm", ""
        Dim wb As New WeUI
        Dim txt As String = "由各种物质组成的巨型球状天体,叫做星球.星球有一定的形状,有自己的运行轨道."
        With wb.AddPanelGroup("","pg1","图文组合列表")
            .Add("pn1","标题一<lable style=\'color:red;\'>任意</lable>", txt,"./images/button.png","http://www.foxtable.com") \'超链接
            With .Add("pn2","标题二",txt,"./images/search.png") \'带子链接
                .AddFoot("文字来源")
                .AddFoot("时间")
                .AddFoot("|其他信息","http://www.foxtable.com")
            End With
        End With
        e.WriteString(wb.Build)
End Select


--  作者:智友软件工作室
--  发布时间:2019/3/29 10:59:00
--  
以下是引用智友软件工作室在2019/3/29 10:26:00的发言:
1、2、3、4分别对应4条工单,每个工单都有一个唯一编号,现在已实现单价某一条记录下面弹出AddActionSheet
            With wb.AddActionSheet("","s1")
                .Add("menu1", "工单详情")
                
                .Add("menu4","取消","",True)
            End With
我现在想每添加一个pn的时候插入一个隐藏的工单编号,单价记录的时候传递这个编号,然后我再点击工单详情会打开一个工单详情的网页,打开新网页的时根据这个唯一编号调取这个工单的详细记录并写入到对应输入框中。
请问该怎么传递这个工单编号?

请这个怎么实现呢?
--  作者:有点甜
--  发布时间:2019/3/29 11:09:00
--  

用js变量记录。

 

在你的页面那里,定义一个js变量,如 var test = "abc";

 

点击panel的时候,赋值,如 test = \'123456\'; 然后弹出菜单。

 

点击菜单的时候,根据test的值打开新的网页,如 location=\'/abc.htm?key=\' + test;


--  作者:智友软件工作室
--  发布时间:2019/3/29 12:11:00
--  
                         wb.InsertHTML("<script>var bianhao = ""123"";</script>") \'定义编号变量


      .Attribute = "biaohao = \'123456\'; ""

                .Add("menu1", "工单详情").Attribute = ""

这样对吗?没显示,显示的是123
 
 

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190329122346.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2019/3/29 12:25:07编辑过]

--  作者:智友软件工作室
--  发布时间:2019/3/29 12:14:00
--  
为什么论坛会隐藏onclick后面的代码
--  作者:有点甜
--  发布时间:2019/3/29 12:38:00
--  

 

 onclick="bianhao=\'123456\'; show(\'s1\')"

 

[此贴子已经被作者于2019/3/29 12:38:55编辑过]

--  作者:智友软件工作室
--  发布时间:2019/3/29 13:00:00
--  
以下是引用有点甜在2019/3/29 12:38:00的发言:

 

 onclick="bianhao=\'123456\'; show(\'s1\')"

 

[此贴子已经被作者于2019/3/29 12:38:55编辑过]

谢谢这几个“,弄了我1个多小时
--  作者:智友软件工作室
--  发布时间:2019/3/29 13:12:00
--  

如何每次点击panel的时候之后在弹出的菜单最上面动态增加提示文字呢?


            With wb.AddActionSheet("","s1")

                .Add("menu1", "这里面想显示一个文字提示")

                .Add("menu2", "工单详情").Attribute = ""


                .Add("menu4","取消","",True)

            End With

 


图片点击可在新窗口打开查看此主题相关图片如下:微信图片编辑_20190329130900.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2019/3/29 13:14:52编辑过]