Here is some code I have for connecting to Access:
$DSN = 'dbi:ODBC:driver=Microsoft Access Driver (*.mdb);dbq='.$Databas
+e;
$DBH = DBI->connect($DSN, undef, undef)
|| ExitProg(ERR->{odbc},'['.$DBI::errstr.' - '.$DBI::err.']');
$DBH->{LongReadLen}=2048;
And here is some code I have for connecting to MS SQL Server:
$DSN = 'dbi:ODBC:driver={SQL Server};server={'.$Server.'};database={'.
+$Database.'}';
$DBH = DBI->connect($DSN, undef, undef)
|| ExitProg(ERR->{odbc},'['.$DBI::errstr.' - '.$DBI::err.']');
Please note... ExitProg is a sub I use, and is probably not in your program. *Smiles* Also, you will need to fill in the blanks for $Database and $Server as well as set your own value for $DBH->{LongReadLen} (if you use "memo" fields).
One more also... I have "undef, undef" for username and password... if you need those, they are important to fill in. *Grins* (The example snippet was from a program which used Windows authentication to the database.)
|