wb.AddForm("","form2","tongjibiao222jg.htm") '表单显示在第一个页面
With wb.AddInputGroup("form2","ipg1","请选择统计期间")
.AddHiddenValue("zhangtao",e.PostValues("zhangtao")) '隐藏选定后的账套 不显示
With .AddInput("d1","开始日期","date")
Dim d As Date
Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
d = y & "-" & m & "-1"
.Value = Format(d,"yyyy-MM-dd")
.Attribute = ""
End With
With .AddInput("d2","结束时间","date")
.Value = Format(Date.Today,"yyyy-MM-dd")
.Attribute = ""
End With
End With
wb.InsertHTML("<h5 style='margin-left:0.8em; margin-top:0.5em' >卡号较多时,可分别选看2个卡号,方便手机查看.</h5>")
With wb.AddCheckGroup("form2","卡号","请选择要显示的卡号")
For Each dr As DataRow In DataTables("卡号设置").sqlSelect("账套 = '" & e.PostValues("zhangtao") & "' and 币种 = '人民币'")
.Add(dr("卡号"),dr("卡号")).Attribute = ""
Next
End With
老师,明明把inserthtml放在了卡号前面,他显示在下面,是因为同一个form会放在一起的原因吗?
有什么办法可以实现放在卡号前面吗?不然放在下面怪怪的。
此主题相关图片如下:微信图片_20200606215600.jpg