求助 weui 图片字段保存时 必填用什么方式
Select
Case e.Path
Case
"test.htm"
Dim wb As New weui
wb.AddForm("","form1","test.htm")
With wb.AddInputGroup("form1","ipg1","客户资料")
.AddInput("姓名","姓名","Text").value = "舒淇"
.AddInput("年龄","年龄","number").Value = "28"
.AddInput("日期","日期","date").value = #10/12/2012#
With .AddUploader("up1","照片",True)
.TextPosition = 0
'标题靠左
End
With
End
With
With
wb.AddButtonGroup("form1","btg1",True)
.Add("btn1",
"确定",
"submit")
End
With
e.WriteString(wb.Build) '生成网页
End
Select