Opened by Gast at 2005-04-04 10:53
Hallo liebe Perler
ich habe grad im Rahmen einer Projektarbeit folgendes Problem zu lösen, welches mich langsam an den Rand ver Verzweiflung bring:
Ich habe einen WebServer auf dem die PerlSkript laufen soll und einen weiteren Server, auf dem ein MS SQL Server läuft.
Nun möchte ich "einfach" von dem PerlSkript (auf dem WebServer) auf die MS SQL DB (auf dem weiteren Server) zugreiffen....
ist das überhaupt möglich?
Ich habe es schon bisher versucht, jedoch kommt im Browser entweder garnix, oder es kommt ein OK und danach eine Fehlermeldung (was bedeutet dieses OK?!).
Bin ein absoluter Newbie und die Tuts oder Beiträge, welche ich bisher gefunden habe, waren leider nicht aussreichend oder nicht passend....
für HILFE wäre ich äußerst dankbar
cu
ich
*************
Quelltext:
edit pq: code-tags hinzugefügt\n\n
<!--EDIT|renee|1112604167-->
ich habe grad im Rahmen einer Projektarbeit folgendes Problem zu lösen, welches mich langsam an den Rand ver Verzweiflung bring:
Ich habe einen WebServer auf dem die PerlSkript laufen soll und einen weiteren Server, auf dem ein MS SQL Server läuft.
Nun möchte ich "einfach" von dem PerlSkript (auf dem WebServer) auf die MS SQL DB (auf dem weiteren Server) zugreiffen....
ist das überhaupt möglich?
Ich habe es schon bisher versucht, jedoch kommt im Browser entweder garnix, oder es kommt ein OK und danach eine Fehlermeldung (was bedeutet dieses OK?!).
Bin ein absoluter Newbie und die Tuts oder Beiträge, welche ich bisher gefunden habe, waren leider nicht aussreichend oder nicht passend....
für HILFE wäre ich äußerst dankbar
cu
ich
*************
Quelltext:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
use DBI;
print "content-type: text/html\n\n";
print '<html><head><title>Outputtitle><head><body>';
my $dbh = DBI->connect('dbi:dbd:DATENBANK:MSSQLSERVER, 'USER', 'PWD') or die ("da geht nix");
my $sql = q/select dokument, version from dokuversion/;
my $sth = $dbh->prepare($sql);
$sth->execute;
while (my @row = $sth->fetchrow_array) {
print "<tr><td>$row[0]</td><td>$row[1]</td></tr>\n";
}
edit pq: code-tags hinzugefügt\n\n
<!--EDIT|renee|1112604167-->