You've got the connection string and DSN definition confused.
For a DSN-less connection use something like:

my $DSN = 'driver={SQL Server};
   Server=.;database=vision;
   uid=sa;pwd=secret;';
my $dbh = DBI->connect("dbi:ODBC:$DSN") or die "$DBI::errstr\n";

-- 
   Simon Oliver

Reply via email to