use "dev:code[SKUItem.vx]" unit vbusiness.vpage [ SKUItemImport is extend SKUItem; about SKUItemImport [ field: xdwgrid__ dw_list; treeview__ tv_1; xdwtable__ dw_maint; method: [ string jxParam(string p, string n) { if(p != "") { int i = 1; while (p.find("=",0)>0) { string name = p.mid(0, p.find("=",0)); string value = p.mid(p.find("=",0) + 1, p.find("=",0) - 1); return ""+value; i += 1; } } return ""; } int OnSelectAll() { if(this.dw_list.GetRowCount() > 0 ) this.dw_list.SelectRow(1,true); this.dw_list.SelectRow(0,true); this.dw_list.Redraw(); return 1; } int OnSelectNo() { this.dw_list.SelectRow(0,false); this.dw_list.Redraw(); return 1; } int OnOk() { xdwtable__ dw = new xdwtable__; dw.setNativePointer(dw_maint.FindDwTable("Item",0)); int row = SKUItem::dw_list.GetNextSelectRow(1); if (row<1) { alert("ÇëÑ¡ÔñÏîÄ¿Ãû³Æ!"); return 1; } while (row>0) { msxml::IXMLDOMElement e =SKUItem::dw_list.GetRowElement(row); string ItemName = e.selectSingleNode("ItemName").text+""; //trace(ItemName); if(dw.GetItemString(1,"ItemName")=="") { dw.SetItemString(1,"SeqNo","1"); dw.ItemChangeTo(1,"ItemName",ItemName); } else { int n=dw.InsertRow(0); dw.SetItemString(n,"SeqNo",n.ToString()); dw.ItemChangeTo(n,"ItemName",ItemName); } row = SKUItem::dw_list.GetNextSelectRow(row +1); } CloseWindow(); return 1; } int OnCancel() { CloseWindow(); return 1; } int OnDoubleClicked(ref TNotifyEvent evt,int p) { OnOk(); return 1; } int OnCmdDispatch(string comdid) { if (comdid=="SelectAll") OnSelectAll(); else if (comdid=="SelectNo") OnSelectNo(); else if (comdid=="cb_import") OnOk(); else if (comdid=="cb_close") OnCancel(); //else if (comdid=="query") GridSearch(); return 0; } int OnXCommand(ref TXCommandEvent evt,int p) { return OnCmdDispatch(evt.pStrID); } int onload() { if (GetParam()) { xaserverarg__ arg1=GetParam(); dw_maint = new xdwtable__; dw_maint.setNativePointer(arg1.GetArgString("dw_maint").toInt()); } SKUItem::onload(); SKUItem::dw_list.SetSelectionMode(3); //3 SKUItem::dw_list.SetReadOnly(true); AttachEvent("WM_XCOMMAND",OnXCommand); AttachEvent("dw_list","DWV_DOUBLECLICKED",OnDoubleClicked);//ÐÐË«»÷ } ] ] ]