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)