Opened by welle at 2013-11-01 20:07
Mit diesem Code:
bekomme ich:
Egal welche der 2 Paths ich verwende, ich kann mich nicht mit der Datenbank verbinden...
Last edited: 2013-11-03 11:13:55 +0100 (CET)
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
use strict;
use warnings;
use UTF8;
use Tk;
use DBD::SQLite;
use Data::Dumper;
$Data::Dumper::Useqq=1;
my $mw = new MainWindow;
my $types = [ ['Text', '.db'], ['All Files', '*'],];
my $file_1= $mw->getOpenFile(-filetypes => $types);
my ($file_2)=glob('C:/Users/FC/Desktop/*/DATABASE.db');
print Dumper($file_1);
print Dumper($file_2);
#connecting to sqlite
my $dbh = DBI->connect("dbi:SQLite:$file_2", "", "", { RaiseError => 1, AutoCommit => 1, PrintError => 0 });
bekomme ich:
Quote$VAR1 = "C:/Users/FC/Desktop/\x{fc}folder/DATABASE.db";
$VAR1 = "C:/Users/FC/Desktop/\374folder/DATABASE.db";
Egal welche der 2 Paths ich verwende, ich kann mich nicht mit der Datenbank verbinden...
Last edited: 2013-11-03 11:13:55 +0100 (CET)