Re: accessing database via network using DBI

[learn perl]

Hi Jenda,

Thanks for your info~ it wasn't on the book any where? =)
as for DSN lookup I have my own code to search for available drivers

^^

Eric

#begin code################################################
#!d:\perl\bin\perl.exe -w
#This tool is used to check for connection strings to the
#available database
use DBI;

my @drivers = DBI->available_drivers();
die "No drivers found!\n" unless @drivers;

foreach my $driver (@drivers){
    print "Driver: $driver \n";
    my @dataSources = DBI->data_sources ($driver);
    foreach my $dataSource (@dataSources){
        print "\tData Source is $dataSource\n";
    }
    print "\n";
}

exit;

#End Code#

On Thu, 13 Jun 2002, Jenda Krynicky wrote:

> From:                 learn perl <[EMAIL PROTECTED]>
> > Thanks, that's what I thought of doing.  But is there a way to connect
> > to the remote database (MS SQL server) w/o going thru DSN?
>
> $db = DBI->connect( 'DBI:ODBC:Driver=SQL Server;
>       Server=The_name_or_IP_of_Server;
>       Database=DatabaseName');
>
> You can add some other options. I do not know the list, but if you
> find the option in the DSN manager and set it for a DSN you can look
> up the name in registry under HKLM\SOFTWARE\ODBC\ODBC.INI\<DNSname>
>
> HTH, Jenda
> =========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
> There is a reason for living. There must be. I've seen it somewhere.
> It's just that in the mess on my table ... and in my brain
> I can't find it.
>                                       --- me
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]