学习JQuery时对$(...)操作后返回的jQuery对象具有如此灵活的操作方法感到惊讶，阅读JQuery源码后逐步明白一些道理。

下面仿照JQuery构造一个超简单的框架，以说明对JQuery的理解。

var jQuery = $ = function(selector){
	return new jQuery.fn.init(selector);
};

使用jQuery(...)和$是一样的，都是返回一个对象，这个对象是由jQuery.fn.init的构造体构造的，这个对象有什么来头呢 ？

jQuery.fn = jQuery.prototype = {
	init:function(selector){
		var elem = document.getElementById(selector);
		this[0] = elem;
		this.length = 1;
		return this;
	},
	each:function(method){
		for(var i=0; i<this.length; i++){
			method.call(this[i],i);
		}
		
	}
};

可见，返回的是一个数组，所以并没有什么神秘的东西。

但这个数组还不能进行each的操作，需要扩展其原型方法，下面的这句很重要：

jQuery.fn.init.prototype = jQuery.fn;

这样，通过$(...)得到的对象就能进行each调用了。

下面测试一下：

	<div id="myid">测试内容</div>
	<script>
		$('myid').each(function(i){
			alert(i+":"+this.id+":"+this.innerHTML);
		});
	</script>

确实可以运行，运行结果如下图：

• 快来参加7月17日在成都举行的SOA中国技术论坛
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• 北京: 千橡集团暨校内网诚聘软件研发工程师
• 搜狐网站诚聘Java、PHP和C++工程师

• 快来参加7月17日在成都举行的SOA中国技术论坛
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• 北京: 千橡集团暨校内网诚聘软件研发工程师
• 搜狐网站诚聘Java、PHP和C++工程师
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！

Erlang中删除列表元素在标准模块lists中可以找到delete/2函数，

比如调用lists:delete(2, [1,2,3,4,5])后将返回新的列表[1,3,4,5]
笔者在翻阅lists模块源码中发现，一些函数实现成BIF，比如reverse就是一个BIF，在注释中发现

%% reverse(L) reverse all elements in the list L. Is now a BIF!

由此确定reverse是一个BIF。
但对delete函数的实现没找到类似的注释，怀疑其不是一个BIF，其实现存在性能问题，其实现代码如下：

delete(Item, [Item|Rest]) -> Rest;
delete(Item, [H|Rest]) ->
    [H|delete(Item, Rest)];
delete(_, []) -> [].

这个实现没使用尾递归，对大表的操作将会导致堆栈上的内存消耗严重。
测试程序如下：

test1() ->
    {ok,Bin} = file:read_file("file1.txt"),
    L = binary_to_list(Bin),
    R = lists:delete($a,L),
    io:format("~p~n",[length(R)]).

文件file1.txt有近30M大小，运行时内存高值1G以上。
笔者对delete重新用尾递归的方式改写一遍：

delete(E, [E|T], R) -> lists:reverse(R) ++ T;
delete(E, [H|T], R) -> delete(E, T, [H|R]);
delete(E, [], R) -> lists:reverse(R).

再运行测试程序：

test2() ->
    {ok,Bin} = file:read_file("file1.txt"),
    L = binary_to_list(Bin),
    R = delete($a,L,[]),
    io:format("~p~n",[length(R)]).

发现内存占用在800M以内。
由此可以推测标准模块中lists的delete函数存在性能优化的空间，其他函数可能也同样存在这个问题，这对小列表不存在什么问题，
对大列表的处理如果内存足够也没什么问题，但总会让人觉得不爽。同时也说明编写尾递归函数的重要性，如果是自定义函数，写成尾递归的形式总是对的。

• 搜狐网站诚聘Java、PHP和C++工程师
• 快来参加7月17日在成都举行的SOA中国技术论坛
• 北京: 千橡集团暨校内网诚聘软件研发工程师
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！

Erlang访问关系数据库的方式极为有限，目前似乎只有ODBC。使用ODBC时有时候会莫名其妙地出现一些错误，很难查找原因。故写了一个ADO.NET的数据访问模块，以期在项目中使用，感觉还不错。

现介绍一下基本使用情况，使用前必须设置一下环境变量set ARCHDIR=windows，然后：

application:start(adonet)

然后，连接数据库：

    {ok, Ref} = adonet:open("User ID=sa;Data Source=192.168.1.133;Password=soft123456;Initial Catalog=trade;Provider=SQLOLEDB.1;"),

查询数据：

adonet:select(Ref,"select name,id,code from goods where id>?",[3])

成功执行将返回：

{ok,["name","id","code"],
    [{"ddd",4,"332"},
     {"微波炉",5,"004"},
     {[],6,"005"},
     {"er",7,"006"},
     {"液晶电视",8,"098"},
     {"洗衣机",9,"007"},
     {"TCL电脑",10,"008"},
     {"名称\nabc",11,"001"}]}

插入，删除待操作可以使用do，例如：

adonet:do(Ref, "insert into goods(name,code) values(?,?)",
["name1","001"])

目前仅实现select和do二个函数，其他的以后慢慢再完成。

• 搜狐网站诚聘Java、PHP和C++工程师
• 快来参加7月17日在成都举行的SOA中国技术论坛
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！
• 北京: 千橡集团暨校内网诚聘软件研发工程师
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。

写过一段时间的DOTNET程序和ROR程序后，受ROR的ActiveRecord框架启发，故此写了DOTNET版本的活动记录框架。具有CRUD、事务、验证器、支持多数据库连接。

先介绍简单的CRUD操作。

建立表结构：

create table products(
id int primary key identity,
name varchar(50),
shape varchar(50),
amount int,
remark varchar(200)
)

然后定义类：

	using EtNet.ActiveRecord;

	[Table("products")]
	public class Product : ActiveRecordBase
	{
		public Product()
		{
			//
			// TODO: 在此处添加构造函数逻辑
			//
		}

		[PrimaryKey]
		public int id
		{
			get {return _id;}
			set {_id = value;}
		}
		[Field]
		public string name
		{
			get {return _name;}
			set {_name = value;}
		}
		[Field]
		public string shape
		{
			get {return _shape;}
			set {_shape = value;}
		}
		[Field]
		public int amount
		{
			get {return _amount;}
			set {_amount = value;}
		}
		[Field]
		public string remark
		{
			get {return _remark;}
			set {_remark = value;}
		}

		private int _id;
		private string _name;
		private string _shape;
		private int _amount;
		private string _remark;
	}

1、增加记录

			Product p = new Product();
			p.name = "电脑";
			p.shape = "PII";
			p.amount = 30;
			p.Create();

2、修改记录

			 Product p = (Product)Product.Find(typeof(Product),1);
			p.shape = "PIII";
			p.amount = 23;
			p.remark = "备用";
			p.Update();

3、删除记录

			Product p = (Product)Product.Find(typeof(Product),1);
			p.Destroy();

4、查询记录

			Product p = (Product)Product.Find(typeof(Product),1);
			Console.WriteLine(p.id);
			Console.WriteLine(p.name);
			Console.WriteLine(p.shape);
			Console.WriteLine(p.amount);

其他的功能操作以后再介绍。

• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！
• 搜狐网站诚聘Java、PHP和C++工程师
• 快来参加7月17日在成都举行的SOA中国技术论坛
• 北京: 千橡集团暨校内网诚聘软件研发工程师

作为对进程监督机制的学习，现实现一个简易的监督者程序，监督者将监控一组进程，如果被监控的进程死掉，监督者将收到{'EXIT',Pid,Why}信号，拒此可以对被监督进程进行重启操作。

监督者启动时首先注册进程名，然后进入消息监听：

start() ->
    register(keep_alive, spawn(fun start1/0)).
    
start1() ->
    process_flag(trap_exit, true),
    loop([]).

接下来先看一下启动被监控进程的代码：

start_process(M, F, A) ->
    case apply(M, F, A) of
        {ok, Pid} when is_pid(Pid) ->
            link(Pid),
            io:format("start a process:~w~n", [Pid]),
            {ok, Pid};
        Pid when is_pid(Pid) ->
            link(Pid),
            io:format("start a process:~w~n", [Pid]),
            {ok, Pid}
    end.

下面看一下监控者消息监听的代码：

loop(Processes) ->
    receive
        {From, {new_proc, M, F, A}} ->
            {ok, Pid} = start_process(M, F, A),
            From ! {keep_alive, started},
            loop([{Pid, M, F, A}|Processes]);
        {'EXIT', Pid, _} ->
            case lists:keysearch(Pid, 1, Processes) of
                false ->
                    loop(Processes);
                {value, {Pid, M, F, A}} ->
                    P = lists:delete({Pid, M, F, A}, Processes),
                    {ok, Pid1} = start_process(M, F, A),
                    loop([{Pid1, M, F, A}|P])
            end
    end.

收到被监控者退出消息后，说明被监控者已经死掉，这时可以重启动被监控进程。

注册新的被监控进程可以通过以下函数完成：

new_process(M, F, A) ->
    keep_alive ! {self(), {new_proc, M, F, A}},
    receive
        {keep_alive, started} -> true
    end.

Erlang中杜绝防御性编程，让其他进程来修复错误的处理哲学很有特色。简易监督者能够使编写的程序处理稳定运行状态，对于暂时性的网络中断或程序错误，在编程的时候将不需在代码中TRY来TRY去了。

• 搜狐网站诚聘Java、PHP和C++工程师
• 快来参加7月17日在成都举行的SOA中国技术论坛
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！
• 北京: 千橡集团暨校内网诚聘软件研发工程师

最近做的一个项目用到工作流，由于不想使用其他的工作流产品，所以依照OSWORKFLOW写了一个，使用效果还不错。现贴上一个信访流程的定义：

• 快来参加7月17日在成都举行的SOA中国技术论坛
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• 北京: 千橡集团暨校内网诚聘软件研发工程师
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！
• 搜狐网站诚聘Java、PHP和C++工程师

• 北京: 千橡集团暨校内网诚聘软件研发工程师
• JavaEye问答大赛开始了！ 从6月23日 至 7月6日，奖品丰厚 ！
• Oracle专区上线，有Oracle最新文章，重要下载及知识库等精彩内容，欢迎访问。
• 搜狐网站诚聘Java、PHP和C++工程师
• 快来参加7月17日在成都举行的SOA中国技术论坛