Help for this page

Select Code to Download


  1. or download this
    my $db = new Win32::ODBC( "DSN=INFO;UID=id;PWD=password" );
           if( ! $db )
           {
               die "Error connecting: " . Win32::ODBC::Error() . "\n";
            }
    
  2. or download this
    my $dbh = DBI->connect("dbi:ODBC:INFO","username","password")
        or die "Unable to connect: " . $DBI::errstr . "\n";