Thread Access Datenbank Zugriff aus einem thread (11 answers)
Opened by vitek at 2021-10-13 11:05

GwenDragon
 2021-10-14 13:48
#194014 #194014
User since
2005-01-17
14051 articles
Admin1
[Homepage]
user image
Warum schießt du das Programm mit die() bei Problemen des ODBC ab?
Code: (dl )
1
2
3
Win32::ODBC::ConfigDSN(ODBC_ADD_DSN, $DriverType,("DSN=$DSN", "Description=MAO Win32 ODBC Test DSN for Perl", "DBQ=$Dir", "DEFAULTDIR=$Dir", "UID=", "PWD=")) or die "ConfigDSN(): Could not add temporary DSN" . Win32::ODBC::Error();

$db=new Win32::ODBC($DSN) or die "couldn't ODBC $DSN because ", Win32::ODBC::Error(), "\n";


Warum logst du nicht was da hakt?
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
my $rv = Win32::ODBC::ConfigDSN(ODBC_ADD_DSN, $DriverType,("DSN=$DSN", "Description=MAO Win32 ODBC Test DSN for Perl", "DBQ=$Dir", "DEFAULTDIR=$Dir", "UID=", "PWD="));
if (not $rv) {
# Log mit deiner eigener Funktion schreiben
LogMe ( "ConfigDSN(): Could not add temporary DSN" . Win32::ODBC::Error() );
# hier weiterer Code was in deiner App geschehen soll bei Fehlern
}

$db=new Win32::ODBC($DSN);
if (not $dbh) {
LogMe ( "couldn't ODBC $DSN because " . Win32::ODBC::Error() . "\n" );
# hier weiterer Code was in deiner App geschehen soll bei Fehlern
}

Last edited: 2021-10-14 13:50:55 +0200 (CEST)
die Drachin, Gwendolyn


Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel

View full thread Access Datenbank Zugriff aus einem thread