ScktSrvr does not support early-binding |
尚未結案
|
wuherong2000
一般會員 發表:26 回覆:21 積分:9 註冊:2003-06-16 發送簡訊給我 |
procedure ApplyDelta(AProvider: OleVariant; var Delta : OleVariant);
var
ErrCount : integer;
OwnerData: OleVariant;
begin
if not VarIsNull(Delta) then
begin
// ScktSrvr does not support early-binding
{$IFDEF VER130}
Delta := (IDispatch(AProvider[0]) as IAppServer).AS_ApplyUpdates(AProvider[1], Delta, 0, ErrCount, OwnerData);
{$ELSE}
Delta := OleVariant(IDispatch(AProvider)).ApplyUpdates(Delta, 0, ErrCount);
{$ENDIF}
if ErrCount > 0 then
SysUtils.Abort; // This will cause Rollback in the calling procedure
end;
end;
以上是delphi 5开发人员指南一书中关于三层作多表更新的方法,在delphi5中不支持ScktSrvr does not support ,哪在此情况下,我该怎么用TSocketconnection呢,因我们部门老板是个外行,但他又懂一点电脑,以为Dcomconnection是DCom,而TSocketconnection不是DCom,所以让我们一定要用
TSocketconnection做三层,且用的是remotemodule,请问有什么好方法吗
|
jieshu
版主 發表:42 回覆:894 積分:745 註冊:2002-04-15 發送簡訊給我 |
引言: 以上是delphi 5??人?指南一?中?于三?作多表更新的方法,在delphi5中不支持ScktSrvr does not support ,哪在此情?下,我?怎么用TSocketconnection呢,因我?部?老板是?外行,但他又懂一???,以?Dcomconnection是DCom,而TSocketconnection不是DCom,所以?我?一定要用 TSocketconnection做三?,且用的是remotemodule,??有什么好方法?實在不太清楚您的問題在哪裡, 像我們客戶的系統原本都是用DCOMConnection連, 後來病毒攻擊135 Port後, 我們都改用SocketConnection來連, 也沒有什麼不能處理的, 可否詳述您的問題點. <iFrame src="http://www.coss.com.tw/jieshu/sign.htm" width=400 height=105 scolling="NO" border="0"></iFrame> 震江系統(股)公司: http://www.coss.com.tw/ 捷舒軟體設計坊: http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行 人若為善,福雖未至,禍已遠離 人若為惡,禍雖未至,福已遠離 http://www.taconet.com.tw/jieshu/ |
Ktop_Robot
站務副站長 發表:0 回覆:3511 積分:0 註冊:2007-04-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |