Foxtable(狐表)用户栏目专家坐堂 → 未声明“ExWeUI


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

主题:未声明“ExWeUI

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


加好友 发短信
等级:九尾狐 帖子:2466 积分:22761 威望:0 精华:0 注册:2011/3/29 17:14:00
未声明“ExWeUI  发帖心情 Post By:2024/1/13 20:41:00 [只看该作者]

---------------------------
错误
---------------------------
编译错误:未声明“ExWeUI”。它可能因其保护级别而不可访问。



错误代码:With ExWeUI.WebUI.AddListGroup("", "lst01", 1)
---------------------------
确定   
---------------------------



Select Case e.Path
    Case "Ipicbpgodmx"
        Dim wb As New weui 
        wb.AppendHTML("<link rel='stylesheet' href='./weui/exweui.css'/>", True) 
        wb.AppendHTML("<script src='./weui/exweui.js' ></script>", True) 
        With ExWeUI.WebUI.AddListGroup("", "lst01", 1) 
            For i As Integer = 1 To 4 
                With .AddList("Foxtable数据库应用开发宝典 数据管理", "images/007.jpg") 
                    With .LeftFooter 
                        .AddFoot("¥49.00").Attribute = "style='color:red;font-size:15px'" 
                        .AddFoot("¥99.00").Attribute = "style='font-size:12px;text-decoration: line-through;'" 
                    End With 
                    .RightFooter.AddFoot("加入购物车").Attribute = " style='color:blue;'" 
                End With 
            Next 
            wb.InsertHTML(.BuildHtml) 
        End With 
        wb.AppendHTML("<script>initExWeUI();</script>") 
        e.WriteString(wb.Build) 
End Select 

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


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/14 19:12:00 [只看该作者]

把用到的第三方dll复制到Foxtable的安装目录

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


加好友 发短信
等级:九尾狐 帖子:2466 积分:22761 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By:2024/1/15 1:09:00 [只看该作者]

复制了

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


加好友 发短信
等级:超级版主 帖子:107440 积分:546479 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/15 8:36:00 [只看该作者]


 回到顶部