以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问如何同页显示  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=145560)
--  作者：lyfxybc
--  发布时间：2020/1/30 14:49:00
--  请问如何同页显示



[此贴子已经被作者于2020/3/19 19:51:22编辑过]
--  作者：有点蓝
--  发布时间：2020/1/30 15:15:00
--  
参考：http://www.foxtable.com/mobilehelp/topics/0054.htm

With wb.AddTabBar("", "tb1", 0)
    .AddPage("page0","首页","./images/Users32.ico")
    .AddButton("bt1","设置","./images/Design32.ico")
    .AddButton("bt2","官网","./images/Design32.ico","http://www.baorunwollen.com/")
    .AddButton("bt3","购买","./images/Design32.ico")
    .AddButton("bt4","退出","./images/exit.png", "exit.htm") \'退出登录
End With

With wb.AddForm("page0","form0","accept.htm")
    wb.AddPageTitle("page0","pageheader0","文件上传","文件上传")
End With
With wb.AddForm("page0","form1","zlsc.htm")
    With wb.AddInputGroup("form1","ipg1","文件上传")
        .AddUploader("up1","照片",True) \'True表示允许上传多个文件
    End With
    With wb.AddButtonGroup("form1","btg1",True)
        .Add("btn1", "确定", "submit")
    End With
End With
e.WriteString(wb.Build)