#!c:\perl\bin\perl -w use OLE; # create ADO auto object $conn = CreateObject OLE "ADODB.Connection" || die "CreateObject: $!"; # connect to data source $conn->Open('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=accessDB.mdb +'); # query $sql = 'SELECT * FROM my_table_name'; # build recordset $rs = $conn->Execute($sql); # loop through recordset while(!$rs->EOF()) { print $rs->Fields('my_field_name')->Value; $rs->MoveNext(); } # shut down the recordset $rs->Close(); # close the data source $conn->Close();
In reply to Re: Re: Re: Perl & Personal Web Server
by Anonymous Monk
in thread Perl & Personal Web Server
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |