Only have one set of user/password so yes :o)
Nico.
At 00:07 14-5-01 -0400, Chip Turner wrote:
>
>Looks like your query is returning zero rows. Have you tested it with
>the same username and password from sqlplus?
>
>Chip
>
>Nico van Leeuwen <[EMAIL PROTECTED]> writes:
>
>> new script different style
>>
>> #!/usr/bin/perl -w
>>
>> use strict;
>> use DBI;
>>
>> my $dbh = DBI->connect( 'dbi:Oracle:mercury.systime',
>> 'systime',
>> 'systime',
>> {
>> RaiseError => 1,
>> AutoCommit => 0
>> }
>> ) || die "Database connection not made: $DBI::errstr";
>>
>> print "connected\n";
>>
>> my $sql = "SELECT id, is_admin, aktiv, passwort FROM vo_user WHERE
>> login='nicovl'";
>> my $sth = $dbh->prepare("$sql");
>> $sth->execute();
>>
>> my( $id, $is_admin, $aktiv, $passwort );
>> $sth->bind_columns( undef, \$id, \$is_admin, \$aktiv, \$passwort );
>>
>> while( $sth->fetch() ) {
>> print "$id, $is_admin, $passwort\n";
>> }
>>
>> $sth->finish();
>> $dbh->disconnect();
>>
>>
>> command prompt:::
>>
>> centriumdb:/usr/local/httpd/cgi-bin # ./select-test.pl
>> connected
>> centriumdb:/usr/local/httpd/cgi-bin #
>>
>> that's all I see... no problems.. no output either... and as I said in
>> SQL*PLUS the select gives results... and the $dbh->do I have tried work
fine!
>>
>> I am truely puzzled,
>>
>> Nico.
>>
>>
>> At 20:57 13-5-01 -0700, Michael A. Chase wrote:
>> >You really need error checking. I suggest you add { RaiseError => 1 }
after
>> >the password in the connect() call.
>> >--
>> >Mac :})
>> >** I normally forward private database questions to the DBI mail lists. **
>> >Give a hobbit a fish and he'll eat fish for a day.
>> >Give a hobbit a ring and he'll eat fish for an age.
>> >----- Original Message -----
>> >From: "Nico van Leeuwen" <[EMAIL PROTECTED]>
>> >To: <[EMAIL PROTECTED]>
>> >Sent: Sunday, May 13, 2001 20:27
>> >Subject: Oracle Selects ??
>> >
>> >
>> >> The following code would work fine for me using mysql... for oracle it
>> >> won't work and I have been trying real hard to find out why but it won't
>> >work.
>> >>
>> >> I have checked the SQL in SQL*PLUS and it worked fine!
>> >>
>> >> dbh->do seems to be working fine too....
>> >>
>> >> Thanks in advance,
>> >>
>> >> Nico.
>> >>
>> >> #!/usr/bin/perl -w
>> >>
>> >> # Set variables
>> >>
>> >> use DBI;
>> >>
>> >> $ENV{ORACLE_HOME} = "/opt/oracle/product/8.1.7";
>> >> $dbh = DBI->connect('dbi:Oracle:','[EMAIL PROTECTED]','systime');
>> >>
>> >> # Prepare Select
>> >> $sth = $dbh->prepare("SELECT id, is_admin, aktiv, passwort FROM vo_user
>> >> WHERE login='nicovl'");
>> >>
>> >> # Execute the Select
>> >> ($sth->execute);
>> >>
>> >> @dbdata = $sth->fetchrow_array;
>> >>
>> >> $userid = $dbdata[0];
>> >> $isadmin = $dbdata[1];
>> >> $aktiv = $dbdata[2];
>> >> $passwortdb = $dbdata[3];
>> >>
>> >>
>> >> print "$userid\n";
>> >
>
>--
>Chip Turner [EMAIL PROTECTED]
> RHN Web Engineer
