版主,能把分还给我吗,我自已找到答案了,就是少访问。 (200分)

  • 主题发起人 主题发起人 tintin45
  • 开始时间 开始时间
T

tintin45

Unregistered / Unconfirmed
GUEST, unregistred user!
General SQL error.
ct_send(): user api layer: external error: This routine cannot be called because another command structure has results pending
 
请问该怎么解决
 
访问进程多了有时候会出现
Access violation at address 45C45400. Read of address 45C45400
这个错误,再多服务器就自己退了。
 
这是d6+Corba的bug,
还是别用corba了
 
com2,我用的是delphi5+corba
 
delphi5+corba和delphi6+corba
在客户端大量并发访问情况下,服务端都有可能意外出错。
我对inprise的corba三层开发失去信心!
用dcom比较稳定,就是dcomcnfg配置搞不清!
 
我觉得第一个问题General SQL error
是detabase竞争时出错,用了,tsession有了优化,我试过出现的可能少了。但问题是还会出现.
不知是不是corba的模式设的有问题,
李维的书中放了tsession,设autosessionname=true,就可以把handleshared设为false.
但语气不是肯定,设不设有关系吗。
还有我有多个database,把autosessionname设为true,的话只能放一个tsession.可是我的database有的连sybase,
有的连dbf,放一个Tsession就可以了吗。
 
哈哈,又一个上当者;
这是D5的BUG问题,留下E我发个东东给你。
 
gzfrank,我的邮件地址是
dlr@263.net
 
多笔并发时还会有这种错误
错误一、
[red]Access violation at address 00404127 in module 'WTSERVER.exe'. Read of address 00000004[/red]
错误二、
[red]Access violation at address 77993F19 in module 'oleaut32.dll'. Read of address 00E7C000[/red]
错误三、
[red]Invalid pointer operation[/red]
这应该是delphi的bug吧?
 
用了tsession,并把autosessionname设为true,用户一多就成这样。
错误
Insufficient memory for this operation.
 
gzfrank,我的邮件地址是
HyphoonLee@163.net
谢谢。
 
gzfrank,也请给我一个,谢谢
kiss_natural@sina.com.cn
 
访问进程多了有时候会出现
Access violation at address 45C45400. Read of address 45C45400
这个错误,再多服务器就自己退了。
 
borland中国网站上有关于这个bug的修正方法,非常简单。
你自己去看看吧。我昨天刚好看到。
 
gzfrank,能不能把你的解决办法告诉我,r2000@etang.com
另外:
borland中国网站的《2001-08-23 VisiBroker for Delphi 内存释放问题》的解决
试了一下,不能用,发现几个问题:

1。delphi5中没有corba.pas的文件
2。我Corba服务程序好像没有use corba单元,应该和corba.pas无关。
3。Delphi6 编译corba.pas时发现“ inBuf 没有定义的错误”。
下面是Borland提供的更新代码,请问inBuf在哪里定义的?:
function TCORBAObject.Execute(Operation: PChar;
const Strm: MarshalInBufferProxy;
Cookie: Pointer): CorbaBoolean;
type
TUnmarshalProc = procedure (const Input: InputStream;
Cookie: Pointer) of object;
var
M: TUnmarshalProc;
begin
Result := False;
try
TMethod(M).Code := Self.MethodAddress('_' + Operation);
if TMethod(M).Code = nil then
Exit;
TMethod(M).Data := Self;
inBuf := TInputStream.Create(Strm);
try
M(inBuf, Cookie);
finally
inBuf.free;
end;
except
Exit;
end;
Result := True;
end;

 
gzfrank,我也没找到那个要更新的文件
 
后退
顶部