Foxtable(狐表)用户栏目专家坐堂 → [求助] 关于使用weui插件的问题


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

主题:[求助] 关于使用weui插件的问题

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


加好友 发短信
等级:小狐 帖子:374 积分:3277 威望:0 精华:0 注册:2018/1/12 10:54:00
[求助] 关于使用weui插件的问题  发帖心情 Post By:2020/6/17 16:03:00 [只看该作者]

  1. Select Case e.Path    
  2.     Case "test.htm"  
  3.         Dim wb As New weui  
  4.         wb.AppendHTML("<link rel='stylesheet' href='./weui/exweui.css'/>",True)  
  5.         wb.AppendHTML("<script src='./weui/exweui.js' ></script>",True)  
  6.         wb.AddForm("","form1","test.htm")  
  7.         With ExWeUI.WebUI.AddInputGroup("","ipg1","动态级联列表")  
  8.             With .AddQuerySelect("xh","型号","|" & DataTables("规格").GetComboListString("型号"))  
  9.                 .A          ibute = "string">"setAjaxQueryOptions('gg_list','getProducts.htm','xh',false)"""  
  10.                 .Placeholder = "请选择型号"  
  11.             End With  
  12.             With .AddQuerySelect("gg","规格","")  
  13.                 .A  ibute = "string">"setAjaxQueryOptions('ys_list','getProducts.htm','xh','gg',false)"""  
  14.                 .Placeholder = "先选择型号再选择规格"  
  15.             End With  
  16.             .AddQuerySelect("ys","颜色").Placeholder = "先选择型号规格再再选择颜色"  
  17.             wb.InsertHTML("form1",.BuildHtml)  
  18.         End With  
  19.         With wb.AddButtonGroup("form1","btg1",True)  
  20.             .Add("btn1""确定""submit")  
  21.         End With  
  22.         wb.AppendHTML("<script>initExWeUI();</script>")  
  23.         e.WriteString(wb.Build) '生成网页  
  24. 把这段代码复制到内部函数就出问题了

  25. 图片点击可在新窗口打开查看此主题相关图片如下:qq图片202111.png
    图片点击可在新窗口打开查看求教下这个是什么原因啊

[此贴子已经被作者于2020/6/17 16:03:36编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

AddQuerySelect,不存在上面截图里的AddQuerypihaoSelect,不要自己创造不存在的用法。

另外解决问题请放自己的代码,不要放帮助的代码,我们比您熟

 回到顶部