救命啊,急,急,急啊。李维的书《delphi5.x ado/MTS/COM+》,第9章的例子。可以再加300分。 (50分)

  • 主题发起人 主题发起人 sunys
  • 开始时间 开始时间
S

sunys

Unregistered / Unconfirmed
GUEST, unregistred user!
李维的书《delphi5.x ado/MTS/COM+》,第9章的例子。
环境WIN98 + MSSQL7.5 +delphi6 ,使用:
顺便说一下我已经把 第8章的取BOOKS表数据的例子已经做成功。
程序服务端:
1 三个transactional data module: ADOQUERY+DSP 支持交易
2 transactional Object + 普通的datamodule 支持交易(用于查询)
其间我也改了COMOBJ。PAS。
客户端:
客户端:Clientdataset+datasource+dbgrid
按钮“取数据”

问题:
取数据时发生“ OlE error 8004E004 “ 的错误。
我进行断点调试时,发现到COMOBJ.pas里的
OleCheck(CoCreateInstanceEx(ClassID, nil, Flags, @ServerInfo, 1, @MQI));
就出现上面错误。
然后接下去就是意外错误。
各位高手有否遇过这样的问题?迫切请教,谢谢!
 
I have but I hvae no time!
Sorry:
 
TO:jqw
加 pathes 什么意思呢
 
徐杰,什么时候有时间呢。等您回来
 
接口失败。
 
那怎么办呢。。。。。
 
“三个MTS remote data moudle ,”
你是否用的是mts date modle
mts,com+ 应为
"transactional data module"
另dcom
可以用“remote data module”
 
to btxiaoyao:
我题目说的不清楚,现在改过了,还忘你帮一把了。
我用的DELPHI6
三个MTS remote data moudle ,”为transactional data module"
mts,com+ 应为 transactional object
另dcom 可以用“remote data module”——
是不是把原来的普通的DATAMODULE变为remote data module。这样我先试试看。

望各位大哥多多帮忙,分数可以再加。

 
现在出现的问题又这样了。
但是就是执行到 的 if (Getobjectcontext= nil) then
(就是李维加的一个判断函数),就跳到
procedure OleError(ErrorCode: HResult);,
所以这句GetObjectContext.CreateInstance(ClassID,IUnknown,Result);根本执行不到。
注明:
(我已经USES MTX单元,并且重新编译过COMOBJ。PAS 。拷到工程的目录下。)

 
换一种创建的方法!!!
 
to :wlmmlw
怎么个换法,请详细点好吗。
 
各位,那有这本书下载
 
下载这本书啊,很好找的,去WWW.GOOGLE.COM
 
创建mts对象:
1. coClass.Create;
2. CreateObject('ClassName.InterfaceName');
3. CreateRemoteObject('ClassName.InterfaceName');
我记得不太清楚。李维的书上好想写得很清楚啊。
 
TO jswqg: comobj.pas 我当然改了,你没有看清题目意思
 
win98下该实例配置成功不了,不要浪费时间。
 
真的吗,那我在2000下也试过了,也是这个毛病。
 
李维是谁?
 
你说李大叔啊,就是那个我写给他MAIL不回的那个,现在清楚了吗。
不清楚再问我好了。有空帮我UP
 
后退
顶部