Case "getBrands1.htm"
Dim vals As String
msgbox(e.PostValues.Count)
If e.PostValues.Count = 1 Then
msgbox("','+[备注一]+',' like '%," & e.PostValues("备注一") & ",%' ")
vals = "|" & DataTables("进货退货数据表").GetComboListString("备注二", "','+[备注一]+',' like '%," & e.PostValues("备注一") & ",%' ").Replace(",", "|")
ElseIf e.PostValues.Count = 2 Then
Dim Filter As String = "','+[备注一]+',' like '%," & e.PostValues("备注一") & ",%' And ','+[备注二]+',' like '%," & e.PostValues("备注二") & ",%'"
msgbox(Filter )
vals = "|" & DataTables("进货退货数据表").GetComboListString("进货退货备注", Filter).Replace(",", "|")
End If
e.WriteString(vals)