wb.AddForm("","form1","logon.htm).Attribute = "o nsubmit='return myfunctionlong()'" '调用函数
With wb.AddInputGroup("form1","ipg1")
.AddInput("companyID","公司编号","text")
.AddInput("username","户 名","text")
.AddInput("password","密 码","password")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "登录", "submit") '.Attribute= ""
End With
With wb.AddDialog("","dlg1", "提示","此用户正在电脑端登录,是否确认继续?") '提示框
.AddButton("btnYes","是").Attribute = "o nclick='form1.submit()'" 如何在点击确认的时候,修改一下上面的提交地址,增加一个参数?&add=true
.AddButton("btnNo","否").Kind = 1
End With