关于weui我想实现这么个效果。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

参考：http://www.foxtable.com/mobilehelp/topics/0080.htm

好像只能跟编辑一样在链接里传递id，当然你也可以自己写js函数传递

[此贴子已经被作者于2021/6/25 11:14:13编辑过]

Select Case e.Path

Case "test.htm"

Dim wb As New WeUI

With wb.AddDialog("","dlg1", "提示","您的订单正在派送,请注意查收!")

.AddButton("btnOK","确定","edit.htm")

End With

Dim txt As String = "由各种物质组成的巨型球状天体,叫做星球.星球有一定的形状,有自己的运行轨道."

With wb.AddPanelGroup("","pg1","图文组合列表")

.Add("pn1","标题一",txt,"./images/button.png","http://www.foxtable.com") '超链接

With .Add("pn2","标题二",txt,"./images/search.png") '带子链接

.AddFoot("文字来源")

.AddFoot("时间")

.AddFoot("<a onclick=""show('dlg1')"" style='color:blue'>|其他信息</a>","")

End With

e.WriteString(wb.Build) '生成网页

End Select

[此贴子已经被作者于2021/6/25 11:14:11编辑过]

With .Add("pn2",dr(cl1),strr,icon) '带子链接

.AddFoot(dr(cl3))

.AddFoot("|详细","detail.htm?page=" & pgname & "&iden=" & dr(pk))

.AddFoot("|编辑","edit.htm?page=" & pgname & "&iden=" & dr(pk))

.AddFoot("|删除","#")Attribute ="""

End With

With wb.AddDialog("","dlg2", "删除确认","您确定要删除当前记录吗?")

.AddButton("btnCancel","取消").Kind = 1

.AddButton("btnOK","确定","./delete.htm?id=" & dr(pk))

End With

==========不过，我推荐使用帮助里的方法：使用js函数=====

http://www.foxtable.com/mobilehelp/topics/0128.htm

1、list函数

'设计菜单
With wb.AddActionSheet("","menu")
    .Add("mnudAdd", "增加订单").Attribute="" '调用js函数
    .Add("mnuEdit", "编辑订单").Attribute =""
    .Add("mnuDelete", "删除订单").Attribute ="""
    .Add("mnuFirst","第一页","List.htm?page=0",True)
    .Add("mnuLast","最末页","List.htm?page=" & pages - 1)
    .Add("mnuCancel","取消","",True)
End With
With wb.AddDialog("","dlg1", "删除确认","您确定要删除当前订单吗?")
    .AddButton("btnCancel","取消").Kind = 1
    .AddButton("btnOK","确定").Attribute = ""
End With

2、js文件的del函数

del函数的代码为：

function del(){
location="list.htm?page=" + table1.pagenumber + "&deloid=" + table1.primarykey;
}

xuanxiao	小大 1楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：三尾狐帖子：640 积分：5407 威望：0 精华：0 注册：2014/8/27 11:12:00	关于weui我想实现这么个效果。 Post By：2021/6/25 10:45:00 [只看该作者] 用户已经被屏蔽

xuanxiao	小大 3楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：三尾狐帖子：640 积分：5407 威望：0 精华：0 注册：2014/8/27 11:12:00	Post By：2021/6/25 10:50:00 [只看该作者] 用户已经被屏蔽

主题：关于weui我想实现这么个效果。