Dim
wb
As
New
weui
Select
Case
e.Path
Case
"test.htm"
If
e.PostValues.count = 0
Then
wb.AddForm("","form1","test.htm")
With
wb.AddInputGroup("form1","ipg1","订单编辑")
.AddHiddenValue("订单编号","123")
.AddInput("客户","客户","text")
.AddInput("产品","产品","text")
.AddInput("数量","数量","number")
.AddInput("单价","单价","number").Step= "0.01"
End
With
With
wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End
With
Else
wb.InsertHTML("接收到的数据有:<br/>")
For
Each
key
As
String
In
e.PostValues.Keys
wb.InsertHTML(key
&
":"
&
e.PostValues(key) &
"<br/>")
Next
End
If
End
Select
e.WriteString(wb.Build) '生成网页
.AddHiddenValue("订单编号","123") 这里的值已经是固定123了。。那请问有什么意义呢?以后访问这个页面,编号都是123了吧。。