xml - Trying to add a node in VBScript -


i have code renames child nodes (holderaccount) holderaccount1 , holderaccount2. holderaccounts may have 1 or 2 holderaccount child nodes. want create new holderaccount, there 1 holderaccount in holderaccounts.

parent node = holderaccounts
child node = holderaccount

input sample: 

<holderaccounts>     <holderaccount>test</holderaccount>         </holderaccounts>  <holderaccounts>     <holderaccount>test</holderaccount>     <holderaccount>test</holderaccount> </holderaccounts>

my output: 

<holderaccounts>     <holderaccount1>test</holderaccount1>     <holderaccount2/>  </holderaccounts>  <holderaccounts>     <holderaccount1>test</holderaccount1>      <holderaccount2>test</holderaccount2>     <holderaccount2/>        </holderaccounts>

what trying accomplish:

<holderaccounts>     <holderaccount1>test</holderaccount1>     <holderaccount2></holderaccount2>  </holderaccounts>  <holderaccounts>     <holderaccount1>test</holderaccount1>      <holderaccount2>test</holderaccount2>                       </holderaccounts> 
set xml = createobject("microsoft.xmldom") xml.async = false count_var = 1  total_accounts = 0 total_modified_accounts = 0  'get data directory  if xml.load("c:\xml_data2.xml")     'find , give me list of holderaccounts      each holderaccounts in xml.selectnodes("//holderaccounts")         'find , give me list of holderaccount             each holderaccount in holderaccounts.selectnodes("./holderaccount")             'check see if pointing 2nd holderaccount in holderaccounts             if count_var > 1                 'rename 2nd holderaccount in holderaccounts                 set accountenum = xml.createnode(1, "holderaccount" & count_var, "")                  'give me current nodes child nodes                  each child in holderaccount.childnodes                     'attach child nodes account                     accountenum.appendchild(child.clonenode(true))                 next                 holderaccounts.replacechild accountenum, holderaccount                  total_modified_accounts = total_modified_accounts + 1                 xml.save("c:\xml_data2.xml")             else    '1st holderaccount                  'rename 1st account                  set accountenum = xml.createnode(1, "holderaccount" & count_var, "")                  each child in holderaccount.childnodes                     accountenum.appendchild(child.clonenode(true))                 next                 holderaccounts.replacechild accountenum, holderaccount                   'this returning <holderaccount2/> nodes within <holderaccounts>,                  'i want create new node exist 1 node within <holderaccounts>                 set accountenum2 = xml.createelement("holderaccount2")                 holderaccounts.appendchild(accountenum2)                  xml.save("c:\xml_data2.xml")             end if             count_var = count_var + 1         next                    count_var = 1         total_accounts = 0           next end if  set node = nothing set xml  = nothing

i've simplified code bit better suit logic. looks you've changed specifications enumerate first node well, can rid of if statement altogether. else block being called since count_var started @ 1 each holderaccounts container.

instead, want handle case there 1 account under node. inner loop copy it, need add new, empty holderaccount node well.

input

<fabedole>     <holderaccounts>         <holderaccount>test</holderaccount>     </holderaccounts>     <holderaccounts>         <holderaccount>test</holderaccount>         <holderaccount>test</holderaccount>     </holderaccounts> </fabedole>

output

<fabedole>     <holderaccounts>         <holderaccount1>test</holderaccount1>         <holderaccount2/>     </holderaccounts>     <holderaccounts>         <holderaccount1>test</holderaccount1>         <holderaccount2>test</holderaccount2>     </holderaccounts> </fabedole>

code

set xml = createobject("microsoft.xmldom") xml.async = false count_var = 1  if xml.load("c:\xml_data2.xml")     each holderaccounts in xml.selectnodes("//holderaccounts")         set holderaccountcollection = holderaccounts.selectnodes("./holderaccount")          each holderaccount in holderaccountcollection              set accountenum = xml.createnode(1, "holderaccount" & count_var, "")             each child in holderaccount.childnodes                 accountenum.appendchild(child.clonenode(true))             next             holderaccounts.replacechild accountenum, holderaccount              count_var = count_var + 1         next          if holderaccountcollection.length = 1 holderaccounts.appendchild(xml.createnode(1,"holderaccount" & count_var,""))         count_var = 1        next     xml.save("c:\xml_data2.xml") end if

Comments

Post a Comment

Popular posts from this blog

inversion of control - Autofac named registration constructor injection -

does autofac support specifying registration name in components' constructors? example: ninject's namedattribute . you need use autofac.extras.attributed package on top achieve this so let's have 1 interface , 2 classes: public interface ihello { string sayhello(); } public class englishhello : ihello { public string sayhello() { return "hello"; } } public class frenchhello : ihello { public string sayhello() { return "bonjour"; } } then have consumer class, in want select instance injected: public class helloconsumer { private readonly ihello helloservice; public helloconsumer([withkey("en")] ihello helloservice) { if (helloservice == null) { throw new argumentnullexception("helloservice"); } this.helloservice = helloservice; } public string sayhello() { return this.helloservice.sayhello()...
Read more

verilog - Systemverilog dynamic casting issues -

i've code snippet following in testbench function void write_to_port( my_data_type_base data ); my_data_type_extended data_ext; if(!$cast(data_ext, data)); `uvm_error(get_type_name(), "failed cast"); `uvm_info(get_name(), $psprintf("data_ext :\n%s", data_ext.sprint()), uvm_medium) // write data_ext out port.... endfunction when run it, i'm getting uvm_error "failed cast." i'm not quire sure why $cast not returning 1. can see, i'm printing out extended class data item after casting uvm_info. can see it's being cast properly. if don't use $cast if condition, don't runtime error. isn't coding practice use if dynamic cast check if $cast returning 1 ? what might reason behind cast not returning 1 in above case? i think semicolon on line 'if' not belong? i think consumes if statement, , uvm_error executes regardless of how if evaluates: if(!$cast(data_ext, data)); <- no semico...
Read more

ios - Change Storyboard View using Seague -

i have following code checks connection server, , depending on want change views if no connection found. nsstring *connect = [nsstring stringwithcontentsofurl:[nsurl urlwithstring:@"http://myserver.com"] encoding:nsutf8stringencoding error:nil]; if (connect == null) { [self performseguewithidentifier:@"network_failure" sender:self]; } else { // other code here } my problem not change views. have added storyboard segue between 2 views identifier of network_failure . not have navigation controller or that, problem? thanks help! no not problem. first of all, in objectivec exists nil object oriented null . must use that. so: if(connect == nil) or better: if(!connect) so due fact nil not same of null , probably code does't enter in if scope . you have been able discover breakpoint. anyway: be sure set trigger segue (line) 2 view controller , , name network_failure (that not best name. should instead view1toview2 ) as, m...
Read more