When I try to run my script that tries to connect to an Oracle8 database I get the following message in a pop-up window from Perl.exe:
The procedure entry point slcvs2ptr could not be located in the dynamic link library oracore9.dll
I have Oracle9i and Oracle8i client software installed on my machine and I am able to connect to ACD1 using SQL*Plus from either version. OS is Windows XP.
--------------------------------------------------------
script to test connecting to Oracle database:
--------------------------------------------------------
use strict;
use DBI;
my $dbh = DBI->connect( 'dbi:Oracle:acd1',
'intcustapp',
'password',
{
RaiseError => 1,
AutoCommit => 0
}
) || die "Database connection not made: $DBI::errstr";
my $sql = qq{ SELECT sysdate, user FROM dual };
my $sth = $dbh->prepare( $sql );
$sth->execute();
my( $today_dt, $user_name );
$sth->bind_columns( undef, \$today_dt, \$user_name );
while( $sth->fetch() ) {
print "$today_dt, $user_name\n";
}
$sth->finish();
$dbh->disconnect();
The procedure entry point slcvs2ptr could not be located in the dynamic link library oracore9.dll
I have Oracle9i and Oracle8i client software installed on my machine and I am able to connect to ACD1 using SQL*Plus from either version. OS is Windows XP.
--------------------------------------------------------
script to test connecting to Oracle database:
--------------------------------------------------------
use strict;
use DBI;
my $dbh = DBI->connect( 'dbi:Oracle:acd1',
'intcustapp',
'password',
{
RaiseError => 1,
AutoCommit => 0
}
) || die "Database connection not made: $DBI::errstr";
my $sql = qq{ SELECT sysdate, user FROM dual };
my $sth = $dbh->prepare( $sql );
$sth->execute();
my( $today_dt, $user_name );
$sth->bind_columns( undef, \$today_dt, \$user_name );
while( $sth->fetch() ) {
print "$today_dt, $user_name\n";
}
$sth->finish();
$dbh->disconnect();