Select Code to Download

$dbh = DBI->connect("dbi:ODBC:CQmaster",$user,$password) || die "Can't
+ open! $!";