DCOMConnection.AppServer

rill518 2003-05-09 08:52:14
為何 DCOMConnection.AppServer 不能使用呢?它不能獲得遠程數據模塊的接,更不能調用遠程數據模塊的方法。
它是動態聯編的,如果要想靜態聯編呢?怎麼辦??
...全文
109 15 打赏 收藏 举报
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
riffleliu 2003-06-11
  • 打赏
  • 举报
回复
chechy(简简单单的活) 說得對,如果你不能解決問題,可以先到書讓看看李唯的那本分布式開發的。可能對你有用。
chechy 2003-05-14
  • 打赏
  • 举报
回复
我说得第二个问题就是导致你错误得原因。
2)DCOMConnection.Connected如果是True,DCOMConnection.AppServer.方法名不行,那么可能是这个Ole Automation Server不支持这个方法名,需要查看相关的帮助
rill518 2003-05-13
  • 打赏
  • 举报
回复
procedure TForm1.FormCreate(Sender: TObject);
var
I:Integer;
DBNames:OleVariant;
begin
DCOMConnection1.Connected :=true;
DBNames:= DCOMConnection1.AppServer.GetDatabaseNames;
if VarIsArray(DBNames) then
for I:=0 to VarArrayHighBound(DBNames,1) do
DatabaseName.Items.Add(DBNames[i]);
DatabaseNameClick(Self);
end;

執行到“DBNames:= DCOMConnection1.AppServer.GetDatabaseNames;”這句就會出錯!
ProjectProject1.exe raised exception class EOleError with message 'Method 'GetDatabaseNames' not supported by automation object'.Process stopped.Use Step or Run to continue.
888888888888 2003-05-11
  • 打赏
  • 举报
回复
关注
chechy 2003-05-11
  • 打赏
  • 举报
回复
1)DCOMConnection.Connected如果不是True,那么DCOMConnection.AppServer.方法名肯定不行。因为此时DCOMConnection.AppServer啥都不是。
2)DCOMConnection.Connected如果是True,DCOMConnection.AppServer.方法名不行,那么可能是这个Ole Automation Server不支持这个方法名,需要查看相关的帮助
rill518 2003-05-11
  • 打赏
  • 举报
回复
兄弟们,给点信心好不好啊!!
longlonger 2003-05-10
  • 打赏
  • 举报
回复
好像看看LiWei的书就可以了
microjuz 2003-05-10
  • 打赏
  • 举报
回复
蛇眼兄写的真是高深,~~学习学习
rill518 2003-05-09
  • 打赏
  • 举报
回复
我就是想調用中間層數據模塊的方法,應該是用DCOMConnection.AppServer.方法名就可以了,但實際用的時候卻不能用,何解!!!!
WangPeter 2003-05-09
  • 打赏
  • 举报
回复
“DCOMConnection.AppServer 不能使用”
怎么不能用?请详细描述。
snake_eye 2003-05-09
  • 打赏
  • 举报
回复
procedure TForm1.Button2Click(Sender: TObject);
var
vDatas : OleVariant;
ownerdata:olevariant;
BeginTime:Integer;
EndTime:Integer;
begin
BeginTime:=GetTickCount;
ownerdata := vararrayof([Clientdataset1.CommandText]);
vdatas := bObj.ApplyData(clientDataSet1.delta ,ownerdata);//CoM+方法!
EndTime:=GetTickCount;
Self.Caption:=FloatToStr((EndTime-BeginTime)/1000.0)+'秒';
end;
snake_eye 2003-05-09
  • 打赏
  • 举报
回复

private
{ Private declarations }
bObj : IDBPool;

..
bObj := CoDBPool.Create;
snake_eye 2003-05-09
  • 打赏
  • 举报
回复
怎么不能使用,不用也可以自己创建COM+对象一样!
chechy 2003-05-09
  • 打赏
  • 举报
回复
首先要DCOMConnection.Connected := True才行。
dolphin2001 2003-05-09
  • 打赏
  • 举报
回复
第一:
首先确认你的DComConnection相关连接属性(ServerName,ServerGuid)有没有设置正确,如果服务器和你的程序不在同一台机器上,你还需要在服务器端做相应的配置才行,至于如何配置,你可以查看一下以前的帖子;
第二:
你确认一下你的服务器是否存在你调用的方法,因为你是采用Variant的方式调用远程的方法,DELPHI在编译的时候它不会去检查你的方法是否存在,再者,就是你送的参数对不对。
代码下载链接: https://pan.quark.cn/s/90fbf78c3289 "1元云购"是一种依托互联网的购物方式,用户仅需投入微小的资金(一般为一元)便有机会赢取高价值商品。此类模式常借助抽奖机制来判定获胜者,从而吸引众多用户加入。"1元云购源代码"是承载该业务流程的程序代码,其用途在于搭建一个完整的1元云购系统。 在构建1元云购源代码的过程中,主要包含以下几个核心技术要点: 1. **数据库架构**:为了有效存储商品详情、用户资料、交易历史及开奖结果,必须设计科学合理的数据库框架。这包括商品数据表、用户信息表、订单记录表和开奖记录表等,确保数据的统一性与完整性。 2. **支付渠道对接**:1元云购平台需与第三方支付服务(例如支付宝、微信支付)进行对接,以实现用户的在线支付操作。这涉及API接口调用、交易状态同步、退款流程管理等环节。 3. **随机数生成策略**:抽奖过程的核心在于公平透明地选定获奖者,通常采用随机数生成策略来实现。该策略需保障每位参与者拥有相等的获奖机会,同时防止欺诈行为。 4. **用户界面开发**:卓越的用户体验是吸引参与者的关键因素。前端页面应兼具视觉吸引力与操作便捷性,清晰展示商品信息、购买步骤、中奖规范等,并提供用户注册、登录、查询订单等功能。 5. **服务器程序设计**:后端系统负责处理用户请求,如管理订单、计算中奖号码、更新数据库信息等。这部分通常采用PHP等服务器端技术实现,需应对并发访问与高负载情形。 6. **安全措施**:1元云购平台可能面临恶意攻击,例如SQL注入、XSS跨站脚本攻击等。因此,源代码需遵循安全编程准则,对用户输入进行过滤与校验,同时运用HTTPS等加密手段保障数据传输安全。 7. **...

1,594

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧