Thread DBD::SQLite - Anzahl Zeilen abfragen (21 answers)
Opened by Kean at 2011-05-09 09:16

pktm
 2011-05-09 17:12
#148381 #148381
User since
2003-08-07
2921 Artikel
BenutzerIn
[Homepage]
user image
Zu deiner Frage, ob dein Tk-Programm beendet wird, wenn du die() aufrufst: ja. Das kannst du umgehen, indem du den Fehler anders behandelst. die() ist ein recht einfacher Weg. Du kannst auch einen Popup erschienen lassen oder einen Sound abspielen - als Programmierer bist du da recht frei :)

Beispiel:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
my $sth = $dbh->prepare($sql);
if( $sth ) {
# prepare hat geklappt, jetzt kannst du execute() aufrufen.
}else{
# prepare hat nicht geklappt, behandle den Fehler
#die('Crash to Desktop');

require Tk::Dialog;

my $error_dialog = $mw->Dialog(
-title => 'Kann Daten nciht aus DB auslesen',
-text => 'Fehler: ' . $dbh->errstr(),
# ....
);

my $selected = $error_dialog->Show();
}
http://www.intergastro-service.de (mein erstes CMS :) )

View full thread DBD::SQLite - Anzahl Zeilen abfragen