遇到两个类似的问题。
1. 我设计了一个公司信息编辑页面,代码如下,上下文太长就没有贴出来
With wb.AddInputGroup("partnerform","ipg1",iif(e.GetValues.ContainsKey("cid"),"Edit Partner","Add Partner"))
.AddInput("Company","Company","text").Value = pr("Company") ‘这一项是编辑公司名称信息,对应后台数公司据表中的Company列,这里没有问题。
.AddInput("Note","Note","text").Value = pr("Note") ‘这一项是编辑公司备注信息,对应后台数公司据表中的Note列,这里没有问题。
.AddSwitch("MNDA","MNDA",False).Attribute = "Checked = '" & pr("MNDA") & "'" ‘这一项是编辑公司MNDA信息,对应后台数公司据表中的MNDA列,问题就出在这里了。我尝试了如下设置,但是结果都是无法通过后台数据表中逻辑列的值来控制网页上面的逻辑开关。
End With
似乎这个逻辑开关不会去读取后台数据表中的数据一样,但是上面两个输入框却都读取了后台的数据。我用开发者工具看到的代码是读取了True或者False的,但是网页上面总是显示开关是打开状态。
下面的是我添加了一组复选列表框,类似的问题是无论后台数据表中多值列是否包含指定信息,网页端都是显示未勾选。
With wb.AddCheckGroup("partnerform","ipg5","Responsible Person(s)")
.Add("p1","JM").value = iif(mr("Person").Contains("JM"),"on","off")
.Add("p1","RM").value = iif(mr("Person").Contains("RM"),True,False)
.Add("p1","RS").value = iif(mr("Person").Contains("RS"),True,False)
.Add("p1","SG").value = iif(mr("Person").Contains("SG"),True,False)
.Add("p1","SS").Value = iif(mr("Person").Contains("SS"),True,False)
End With
求老师指点。