【mnesia】更新其中一列

shijiang1130

1. u()->
   
2.    A =mnesia:dirty_all_keys(console),
   
3.    [ spawn( fun() -> u1(E) end ) || E <- A ].
   
4.    
   
5. u1(A)->
   
6.     [E] =mnesia:dirty_read({console,A}),
   
7.   
   
8.     %io:format("try ~p ~p ~p ~n ",[Oob, Host,E#console.port]),
   
9.     case E#console.pingable =:= <<"0">> of
   
10.         true -> u2(E);
    
11.         false -> skip
    
12.     end.
    
13. 
    
14. u2(E) ->
    
15.    io:format("update").
    
16. 
    
17. 
    
18. 
    

复制代码

shijiang1130

1.         F=fun()->               
   
2.                 [P] = mnesia:wread({console,H}),
   
3.                 mnesia:write(P#console{ip=Ips})
   
4.         end,
   
5.         mnesia:transaction(F).

复制代码