With wb.AddInputGroup("form1","ipg1","自动输入") With .AddSelect("制令单","制令单","|"+DataTables("某表").GetComboListString("制令单")) .Attribute = "onchange=""setAjaxOptions('条码','getCounties.htm','制令单',false);setAjaxOptions('宽度','getCounties.htm','制令单',false);"""
EndWith With .AddSelect("条码","条码","") EndWith With .AddSelect("宽度","宽度","") EndWith EndWith