Hello,
This should do the trick - you'll need to make sure that the Data Source points to the database on your site. It's using OLE (probably should use Win32::OLE, but I am adapting some old code).
use strict;
use OLE;
my $dbh;
$dbh = CreateObject OLE "ADODB.Connection" or die "Can't create connec
+tion to DataBase: $!" unless $dbh;
$dbh->Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\_private\\
+db1.mdb");
my $sql = "SELECT email, password FROM surya";
my $rs = $dbh->Execute($sql);
while (!$rs->EOF()) {
print $rs->Fields('email')->Value . " " . $rs->Fields('password')-
+>Value . "\n";
$rs->MoveNext;
}
$dbh->Close();
Update: The "Open" string above is using the Access 2000 driver installed with ADO 2.5, you can substitute that line for :
$dbh->Open("Driver={Microsoft Access Driver (*.mdb)};DBQ=\\_private\\d
+b1.mdb");
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.