原文网址：
http://www.blogwind.com/Wuvist/56788.shtmlKatze，是德文猫的意思，猫是很懒的……用Katze为偶这个“ORM”命名，是要强调其目的：少打代码。ORM加引号，是因为偶不认为它是真
正的ORM，它只是个穿上ORM马甲的SqlHelper……它没有xml配置文件，默认映射类名为表名、属性名为列名。如果不一致，通过
Attribute修改。
Katze只支持单数字主键表 （最好还是自增，然后叫做id），不支持各种神奇的关系，只对外键有一定支持。没有缓存机制。企图支持多数据库，但目前只能在MSSQL上跑，还必须是2005版~纯VB.Net开发，只有.net 2.0版本！
呃，如果这样你还有兴趣，就继续看吧：
先来看看如何使用Katze：
1. 定义Model
<Table(PrimaryKeyName:="index")> _
Public Class Blogger
Inherits Entity
<Field(Size:=100, ColumnType:=SqlDbType.NVarChar, ColumnName:="id")> _
Public UserId As Field.Text
<Field(Size:=100, ColumnType:=SqlDbType.NVarChar)> _
Public nick As Field.Text
Public DOB As Field.Smalldatetime
End Class
是的，需要Inherits Entiy， Katze属于丑陋的侵入性ORM。
2. 定义全局ConnHelper
Katze.Entity.DefaultConnHelper = New Katze.MSSqlConnHelper("你的数据库链接字符串")
配置就这两步，剩下的就是使用了：
创建一个新的Blogger?
Dim MyBlogger As New Blogger
MyBlogger.nick= "testaccount"
MyBlogger.Save()
查找主键为100的Blogger，修改其Nick并保存?
Dim MyBlogger As New Blogger
MyBlogger.FindById(100)
MyBlogger.nick = "newnick"
MyBlogger.Save()
在webform中显示出最新的十个blogger？
Template:
<asp:Repeater ID="UserList" runat="server">
<ItemTemplate>
<li><%#Container.DataItem("nick")%>
</ItemTemplate>
</asp:Repeater>
Code Behind:
Dim MyBlogger As New Blogger
UserList.DataSource = MyBlogger.Find("", "[index] desc", 0, 10)
UserList.DataBind()
是的，Find这个方法定义得很丑陋……纯粹就是拼sql……偶在以后版本会改掉的……
定义多一个Model吧：
<Table(PrimaryKeyName:="index")> _
Public Class Articles
Inherits Entity
<Field(Size:=50, ColumnType:=SqlDbType.VarChar)> _
Public title As Field.Text
Public blogger As Blogger
<Field(ColumnType:=SqlDbType.Text)> _
Public content As Field.Text
Public add_date As Field.DateTime
End Class
显示Blogger主键为100的最新10篇blog标题？
Template:
<asp:Repeater ID="ArticleList" runat="server">
<ItemTemplate>
<li><%#Container.DataItem("blogger.nick")%>写了<%#Container.DataItem("title")%>
</ItemTemplate>
</asp:Repeater>
Code Behind:
Dim MyBlogger As New Blogger
MyBlogger.FindById(100)
ArticleList.DataSource = MyBlogger.ReverseFind(GetType(Articles), "[index] desc", 0, 10)
ArticleList.DataBind()
或者，
Dim MyArticles As New Articles
ArticleList.DataSource = MyArticles.Find("blogger=100", "[index] desc", 0, 10)
ArticleList.DataBind()
嗯， 加紫色的部分就是Katze对外键的有限支持啦~假设说有N个Model，彼此通过外键连来连去……在Template中可以写：
<%#Container.DataItem("blogger.BloggerCategory.Language.DisplayName")%>
之类的，无限.下去~Katze会自动去查询相应的表。
Katze暂时只是一个Prototype，偶企图通过开发它提高一下自己.net功力而已。现在贴出来，只是希望能够得到大家批评以便改进……要是有谁敢拿去用的话……后果自负！
开发Katze的时候，偶主要是参考了Django内置的ORM以及iBatis跟Nbear等。当然，所谓参考，也就是随便瞅瞅，绝对不能说领悟了它们的精髓然后打造出Katze。
项目主页是在：http://code.google.com/p/katze/
暂时只有源码，没有文档之类的。