in reply to Accessing Access DB with DBI
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.)
In Section
Seekers of Perl Wisdom