博客园-VB.NET-最新评论http://www.cnblogs.com/zqonline/CommentsRSS.aspxzh-cnThu, 13 Nov 2008 09:56:20 GMTThu, 13 Nov 2008 09:56:20 GMTcnblogsre: 使用VB.Net写一个简单的数据访问层：T-Sql函数的支持。http://www.cnblogs.com/zqonline/archive/2008/11/12/1322896.html#1367851韦恩卑鄙韦恩卑鄙Wed, 12 Nov 2008 05:08:42 GMThttp://www.cnblogs.com/zqonline/archive/2008/11/12/1322896.html#1367851冥冥中感觉似乎可以有更好的办法

韦恩卑鄙 2008-11-12 13:08 发表评论
]]>re: 使用VB.Net写一个简单的数据访问层：T-Sql函数的支持。http://www.cnblogs.com/zqonline/archive/2008/11/04/1322896.html#1360924逍遥海盗船逍遥海盗船Tue, 04 Nov 2008 08:18:41 GMThttp://www.cnblogs.com/zqonline/archive/2008/11/04/1322896.html#1360924
逍遥海盗船 2008-11-04 16:18 发表评论
]]>re: 关于自定义实体集合绑定datagrid控件在进行编辑时出现错误"向原始数据存储区提交行时出错"的原因.http://www.cnblogs.com/zqonline/archive/2008/09/04/493635.html#1308625langxiaodilangxiaodiThu, 04 Sep 2008 11:27:09 GMThttp://www.cnblogs.com/zqonline/archive/2008/09/04/493635.html#1308625我在dataGrid中更新数据时候，有时会出现“向原始数据提交行时出错，id（数据库中的自动增长数列，在dataGrid中隐藏起来了）不能为空”
有时候就没任何提示 可以正常运行
希望博主能帮我一下，非常感谢
如果上面的代码就能解决 希望博主能告诉我怎么用。。
先谢谢了

langxiaodi 2008-09-04 19:27 发表评论
]]>re: 我来说说自定义对象集合的绑定http://www.cnblogs.com/zqonline/archive/2008/08/15/493820.html#1288051smhsmhFri, 15 Aug 2008 07:35:28 GMThttp://www.cnblogs.com/zqonline/archive/2008/08/15/493820.html#1288051我的邮件地址sunminghua8134@yahoo.com.cn

smh 2008-08-15 15:35 发表评论
]]>re: 如何把去DNN把模块名称作来网址的问题。http://www.cnblogs.com/zqonline/archive/2008/08/14/1256717.html#1286403实况实况Thu, 14 Aug 2008 03:08:08 GMThttp://www.cnblogs.com/zqonline/archive/2008/08/14/1256717.html#1286403
实况 2008-08-14 11:08 发表评论
]]>re: ATO/MTO类机械制造业特点以及ERP需求分析(三)http://www.cnblogs.com/zqonline/archive/2008/06/10/786155.html#1222368beetybeetyTue, 10 Jun 2008 09:58:42 GMThttp://www.cnblogs.com/zqonline/archive/2008/06/10/786155.html#1222368
beety 2008-06-10 17:58 发表评论
]]>安装MDAC出错，怎么处理http://www.cnblogs.com/zqonline/archive/2008/05/18/627365.html#1201865dgqdgqSun, 18 May 2008 03:56:16 GMThttp://www.cnblogs.com/zqonline/archive/2008/05/18/627365.html#1201865[08:26:37]: Executing PreInstallActions for package.
[08:26:37]: Loading function (CheckMDACVersionExact) from internal function list.
[08:26:37]: 2.71,false[08:26:37]: Checking version of Microsoft Data Access Components that is currently installed on the machine.
[08:26:37]: An error occurred while setup was trying to verify the version of Microsoft Data Access Components current installed on the machine.
Either the version currently installed does not match the version of this hotfix package, or setup was unable to determine the version currently installed.
[08:26:37]: The action (NULL!CheckMDACVersionExact) returned FALSE.
Either all of the PreInstallActions for this package returned FALSE, or there was a fatal error while executing an action.
The package will not be installed. This error will not halt the setup process.
[08:26:37]: Executing PreInstallActions for package.
[08:26:37]: Loading function (CheckMDACVersionExact) from internal function list.
[08:26:37]: 2.71,false[08:26:37]: Checking version of Microsoft Data Access Components that is currently installed on the machine.
[08:26:37]: An error occurred while setup was trying to verify the version of Microsoft Data Access Components current installed on the machine.
Either the version currently installed does not match the version of this hotfix package, or setup was unable to determine the version currently installed.
[08:26:37]: The action (NULL!CheckMDACVersionExact) returned FALSE.
Either all of the PreInstallActions for this package returned FALSE, or there was a fatal error while executing an action.
The package will not be installed. This error will not halt the setup process.

dgq 2008-05-18 11:56 发表评论
]]>re: 放在首页，希望你们帮我来解说一下这个简单的问题，有没有其它的实现方式。http://www.cnblogs.com/zqonline/archive/2008/05/13/720088.html#1194784SephilSephilTue, 13 May 2008 02:52:00 GMThttp://www.cnblogs.com/zqonline/archive/2008/05/13/720088.html#1194784
或者修改Manager类

Public Class Manager
Public Sub Execute(ByVal obj As Object)
If TypeOf obj Is ITextInfo Then
Execute(CType(obj, ITextInfo))
Else If TypeOf obj Is IMessage Then
Execute(CType(obj, IMessage))
Else
MsgBox("无效的类")
End If
End Sub

Public Sub Execute(ByVal obj As ITextInfo)
MsgBox(obj.Text)
End Sub

Public Sub execute(ByVal obj As IMessage)
obj.ShoMessage()
End Sub
End Class


Sephil 2008-05-13 10:52 发表评论
]]>re: ATO/MTO类机械制造业特点以及ERP需求分析(三)http://www.cnblogs.com/zqonline/archive/2007/08/22/786155.html#864876jixierensjixierensWed, 22 Aug 2007 01:47:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/08/22/786155.html#864876 你的那篇关于ATO/MTO类机械制造业特点以及ERP需求分析的文章,能发一下全文吗?谢谢!

jixierens 2007-08-22 09:47 发表评论
]]>re: 职业操守http://www.cnblogs.com/zqonline/archive/2007/07/07/790244.html#809860征泉征泉Sat, 07 Jul 2007 13:52:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/07/07/790244.html#809860悲哀！
他的也是我的！
我的悲哀是因为没有机会参加一个务实的团队！
他的悲哀就是明天努力找工作了！

征泉 2007-07-07 21:52 发表评论
]]>re: 合格的程序员http://www.cnblogs.com/zqonline/archive/2007/06/22/790769.html#793034renrenlerenrenleFri, 22 Jun 2007 05:18:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/06/22/790769.html#793034一般不要捕获异常
由异常收集器来收集写入日志
这样在系统提交之后才能远程处理一些问题

renrenle 2007-06-22 13:18 发表评论
]]>re: 合格的程序员[未登录]http://www.cnblogs.com/zqonline/archive/2007/06/20/790769.html#790932heheheheWed, 20 Jun 2007 12:47:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/06/20/790769.html#790932
hehe 2007-06-20 20:47 发表评论
]]>re: 职业操守http://www.cnblogs.com/zqonline/archive/2007/06/20/790244.html#790257丁学丁学Wed, 20 Jun 2007 04:54:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/06/20/790244.html#790257
丁学 2007-06-20 12:54 发表评论
]]>re: 放在首页，希望你们帮我来解说一下这个简单的问题，有没有其它的实现方式。http://www.cnblogs.com/zqonline/archive/2007/06/15/720088.html#784046让风吹--笨牛让风吹--笨牛Thu, 14 Jun 2007 16:00:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/06/15/720088.html#784046

我想说的是对于继承的接口，是不是不能自动选择合适的重载方法。

]]>re: 在sqlserver视图中慎用table.*的方式。http://www.cnblogs.com/zqonline/archive/2007/05/08/561782.html#738705Bonn LionBonn LionTue, 08 May 2007 02:50:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/05/08/561782.html#738705
Bonn Lion 2007-05-08 10:50 发表评论
]]>re: 放在首页，希望你们帮我来解说一下这个简单的问题，有没有其它的实现方式。http://www.cnblogs.com/zqonline/archive/2007/04/20/720088.html#721490随心所欲随心所欲Fri, 20 Apr 2007 12:01:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/20/720088.html#721490
随心所欲 2007-04-20 20:01 发表评论
]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/04/697569.html#700363萧寒萧寒Wed, 04 Apr 2007 12:50:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/04/697569.html#700363
呵呵,其实就是拼sql ,总之原因有很多,不是不想作成orm 对实体对象进行查询,这只是纯粹的实现sql query 的部分,还有正在开发的,比如:

select.Form(UserInfo).Where ( UserInfo.UserID == "123" ) ;

这个通过重载操作符实现的

萧寒 2007-04-04 20:50 发表评论
]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/04/697569.html#700211CureCureWed, 04 Apr 2007 10:17:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/04/697569.html#700211
Cure 2007-04-04 18:17 发表评论
]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/04/697569.html#699631henryhenryWed, 04 Apr 2007 05:24:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/04/697569.html#699631以下是我组件的操作方式，你可以对比一下：
(DB.Order.OrderId==1024).List<Orders>();
(DB.Order.OrderId==1024).List<Orders>(DB.Order.OrderDate.DESC);
(DB.Order.OrderId==1024).Delete<Orders>();

你有没发现为了把SQL对象化反而在编写上复杂了:
OQL:
SQL.Select(1, False, 生产厂家, 仓库名称, 厂家编号). _
From(Me.md_depotMateriel). _
WHERE(.物品编号.EqualTo(en.物品编号)). _
GroupBy(). _
OrderBy(.生产厂家.OrderBy(Lily.Core.SortDirection.DESC))

SQL:
select 生产厂家，仓库名称,厂商编号 from table where 物品编号='111'
order by 生产厂家 desc

henry 2007-04-04 13:24 发表评论
]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#699042让风吹--笨牛让风吹--笨牛Tue, 03 Apr 2007 14:53:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#699042

你说的两个都有用过，我也没有用过其它的ORM，也没有深究过，这个主要是我觉得在开发不方便改进来而的，也许算不上ORM。

]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#699043让风吹--笨牛让风吹--笨牛Tue, 03 Apr 2007 14:53:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#699043
刚开始，我也这样做的。但是发现，不是太好。

]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#699040让风吹--笨牛让风吹--笨牛Tue, 03 Apr 2007 14:52:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#699040我的OQL主要是结合到我的实体对象来进行操作
如：
OQL：
SQL.Select(). _
From(Me.md_采购物品). _
WHERE(Me.md_采购物品._采购编号.EqualTo(Me.md_采购合同.采购编号))
SQL：
select * from table where table.采购编号='20070100009'

OQL:
SQL.Select(1, False, 生产厂家, 仓库名称, 厂家编号). _
From(Me.md_depotMateriel). _
WHERE(.物品编号.EqualTo(en.物品编号)). _
GroupBy(). _
OrderBy(.生产厂家.OrderBy(Lily.Core.SortDirection.DESC))

SQL:
select 生产厂家，仓库名称,厂商编号 from table where 物品编号='111'
order by 生产厂家 desc

不知道这样的效果，在认为怎么样的呢，我觉得还是很方便的。

BS我的用中文吧。

]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#698415亚历山大同志亚历山大同志Tue, 03 Apr 2007 07:34:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#698415我怎么看着你的方式像是在拼接ＳＱＬ呢？用Ｓｔｒｉｎｇ如何强类型化呢？

]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#698369萧寒萧寒Tue, 03 Apr 2007 07:01:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#698369最近做的个
自己最近也做了套这个东西，还在完善中。

/*
SELECT WORKDEPT, EDLEVEL, MAX(SALARY) AS MAXIMUM
  FROM EMPLOYEE
   WHERE HIREDATE > '1979-01-01'
  GROUP BY WORKDEPT, EDLEVEL
  ORDER BY WORKDEPT, EDLEVEL
* 
* 功能：按照 WORKDEPT, EDLEVEL分组，计算每个组中雇员在'1979-01-01'之后的最高薪水和最低薪水，
*/
query.Clear();
query
  .SelectColumns("WORKDEPT", "EDLEVEL", "MAX(SALARY) as MAXIMUM")
  .From("EMPLOYEE")
  .Where("HIREDATE", Comparison.GreaterThan, "1979-01-01")
  .GroupBy("WORKDEPT", "EDLEVEL")
  .OrderBy("WORKDEPT", "EDLEVEL");


萧寒 2007-04-03 15:01 发表评论
]]>re: ORM(一)OQL结构图http://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#698370萧寒萧寒Tue, 03 Apr 2007 07:01:00 GMThttp://www.cnblogs.com/zqonline/archive/2007/04/03/697569.html#698370最近做的个
自己最近也做了套这个东西，还在完善中。

/*
SELECT WORKDEPT, EDLEVEL, MAX(SALARY) AS MAXIMUM
  FROM EMPLOYEE
   WHERE HIREDATE > '1979-01-01'
  GROUP BY WORKDEPT, EDLEVEL
  ORDER BY WORKDEPT, EDLEVEL
* 
* 功能：按照 WORKDEPT, EDLEVEL分组，计算每个组中雇员在'1979-01-01'之后的最高薪水和最低薪水，
*/
query.Clear();
query
  .SelectColumns("WORKDEPT", "EDLEVEL", "MAX(SALARY) as MAXIMUM")
  .From("EMPLOYEE")
  .Where("HIREDATE", Comparison.GreaterThan, "1979-01-01")
  .GroupBy("WORKDEPT", "EDLEVEL")
  .OrderBy("WORKDEPT", "EDLEVEL");


萧寒 2007-04-03 15:01 发表评论
]]>