print "HTTP/1.0 200 OK\n";
print "Content-Type: text/html\n\n";
print "<HTML><HEAD><TITLE></TITLE></HEAD>\n";
print "<BODY>\n";
use DBI;
use DBD::ODBC;
use CGI;
my ( $server_name, $database, $user_id, $password ) = qw( 'sdp-si.biz' 'SDPSI' 'myusername' 'mypassowrd' );
#Connect the database handle.
$dbh = DBI->connect("DBI:ODBC:$DSN") or die "$DBI::errstr\n";
#Close connection when finished:
$dbh->disconnect;
print "</BODY>\n";
print "</HTML>\n";
In reply to ODBC and MS SQL Server 2000 Connection by peacemaker1820
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |