$::dbh = DBI->connect ("dbi:ODBC:$dsn", "ODBC");
$::dbh = DBI->connect ("dbi:ODBC:$dsn", "ODBC", "");
$::dbh = DBI->connect ("dbi:ODBC:$dsn", "ODBC", NULL);