Hello!

When I try to run the following script using "perlis.dll" I have a problem -
database connection is not closed even if I call "disconnect" method
directly. I have noticed that this connection is used repeatedly, but I need
to close it.

I use DBI for database access (driver DBI::ODBC), database server MSSQL7,
web-server IIS 5, operating system - Windows 2000, ActivePerl 5.6.

use strict;
use DBI;

print "Content-type: text/plain\n\n";

my $Dsn = 'DBI:ODBC:...';
my $User = '...';
my $Password = '...';

print "Connecting\n";

my $dbh = DBI->connect($Dsn, $User, $Password, { AutoCommit => 1, RaiseError
=> 1, PrintError => 1 }) || die DBI->errstr;

print "Disconnecting\n";

$dbh->disconnect();
undef($dbh);

print "Exiting\n";

exit(0);

Sergey Popov.


_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

Reply via email to