Thread Tomaten auf den augen
(21 answers)
Opened by
Alter
at 2008-04-26 13:26
User since 2003-08-04
14371
Artikel
ModeratorIn
Statt
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
#Eingabefelder zum herstellen der Verbindungen if ($dbh ne "") { } else{ print $html->startform(-method=>'POST', -action=>'datenbank_verwaltung.pl'), $html->div({align=>'center'},'Servername/IP-Adresse: '), $html->textfield(-name=>'server'), $html->div({align=>'center'},'Datenbank: '), $html->textfield(-name=>'datenbank'), $html->div({align=>'center'},'Nutzername: '), $html->textfield(-name=>'name'), $html->div({align=>'center'},'Passwort: '), $html->password_field(-name=>'passwort'); $html->end_form(), print "<br><br>";
#Übergabe der eingaben an "richtige" Variablen my $server = param(server); my $nutzer = param(name); my $passwort = param(passwort); my $datenbank = param(datenbank);
#Zusammensetzen der Serververbindung my $source = "DBI:mysql:$datenbank:$server"; print $html->submit(-name=>'Login');
$dbh = DBI -> connect($source,$nutzer,$passwort); }
eher das hier:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
#Eingabefelder zum herstellen der Verbindungen if ($html->param('server') and $html->param('name') ) { #Übergabe der eingaben an "richtige" Variablen my $server = $html->param('server'); my $nutzer = $html->param('name'); my $passwort = $html->param('passwort'); my $datenbank = $html->param('datenbank');
$dbh = DBI -> connect($source,$nutzer,$passwort); # mach was mit $dbh } else{ print $html->startform(-method=>'POST', -action=>'datenbank_verwaltung.pl'), $html->div({align=>'center'},'Servername/IP-Adresse: '), $html->textfield(-name=>'server'), $html->div({align=>'center'},'Datenbank: '), $html->textfield(-name=>'datenbank'), $html->div({align=>'center'},'Nutzername: '), $html->textfield(-name=>'name'), $html->div({align=>'center'},'Passwort: '), $html->password_field(-name=>'passwort'), "<br><br>";
#Übergabe der eingaben an "richtige" Variablen
#Zusammensetzen der Serververbindung my $source = "DBI:mysql:$datenbank:$server"; print $html->submit(-name=>'Login'), $html->end_form();
}
View full thread Tomaten auf den augen
|