Subject | Connection String Parsing |
---|---|
Author | hans@hoogstraat.ca |
Post date | 2001-09-29T21:56:27Z |
Hello Jason,
IBA_Connection.IMP fails to parse a connection string
like 10.0.0.5:d:/test/test.gdb, 10.0.0.5:/test/test.gdb works
and if I comment out the tmpPos > 0 test, all work.
Have a feeling it won't accept the new PORT setup in the
connection string either.
Best Regards
Hans
========================================================
if ( FConnectedDatabase = '' ) and
( GetEnvVariable( 'ISC_DATABASE' ) = '' ) then
raise EIB_ConnectionError.Create( E_DATABASE_BLANK );
tmpPos := getLitSafePos( ':', Path, 1 );
=====
if tmpPos > 0 then
if ( Length( Path ) > tmpPos ) and
not ( Path[ tmpPos + 1 ] in ['\','/'] ) then
raise EIB_ConnectionError.Create( 'Invalid connection path' );
=====
if Assigned( FAliasParams ) then
begin
FAliasParams.Free;
FAliasParams := nil;
end;
IBA_Connection.IMP fails to parse a connection string
like 10.0.0.5:d:/test/test.gdb, 10.0.0.5:/test/test.gdb works
and if I comment out the tmpPos > 0 test, all work.
Have a feeling it won't accept the new PORT setup in the
connection string either.
Best Regards
Hans
========================================================
if ( FConnectedDatabase = '' ) and
( GetEnvVariable( 'ISC_DATABASE' ) = '' ) then
raise EIB_ConnectionError.Create( E_DATABASE_BLANK );
tmpPos := getLitSafePos( ':', Path, 1 );
=====
if tmpPos > 0 then
if ( Length( Path ) > tmpPos ) and
not ( Path[ tmpPos + 1 ] in ['\','/'] ) then
raise EIB_ConnectionError.Create( 'Invalid connection path' );
=====
if Assigned( FAliasParams ) then
begin
FAliasParams.Free;
FAliasParams := nil;
end;