Hi guys,
just found a way that works, though it's not very elegant. (see below)
and I do not know why it didn't work...
Although it's working now, I'd still appreciate your comments.
Regards,
Sven
code:
while ( my (
$u_id, $u_surname, $u_name, $u_rank, $u_cname, $u_caddress, $u_ctel,
$u_cfax, $u_cmobile, $u_cemail, $u_curl, $u_btype, $u_hq,
$u_quali, $u_experi, $u_inhouse, $u_resid, $u_ptel,$u_pfax,
$u_pmobile,
$u_pemail, $u_birthday, $u_marital, $u_spouse, $u_children_number,
$u_children_names, $u_hobbies, $u_membership, $u_pcont,
$u_permtel, $u_permfax, $u_course, $u_nation, $u_lastup, $u_loginid,
$u_password, $u_japan_row, $u_ETPA_membership_paid,
$u_ETPA_membership_expires,
$u_face
) = $sth->fetchrow_array ) {...};
On Wednesday, May 15, 2002, at 12:18 PM, Sven Bentlage wrote:
> Hi!
> I'm using the code below to fetch data from mysql, but when I print iit
> out, several variables are always mixed up.
> For example $u_course has the value of membership_paid, membership has
> the values of pcont.
>
> Can anybody help me figure out how to correct that?
>
>
> Thank you for your help.
>
> sven
> code:
> my $sth = $dbh->prepare(
> "select *
> from memberscopy
> where name = '$f_name' and surname = '$f_surname' "
> );
>
>
> $sth->execute;
>
> #combine perl variables with data
>
> $sth->bind_col(1, \$u_id );
> $sth->bind_col(2, \$u_surname);
> $sth->bind_col(3, \$u_name);
> $sth->bind_col(4, \$u_rank);
> $sth->bind_col(5, \$u_cname);
> $sth->bind_col(6, \$u_caddress);
> $sth->bind_col(7, \$u_ctel);
> $sth->bind_col(8, \$u_cfax);
> $sth->bind_col(9, \$u_cmobile);
> $sth->bind_col(10, \$u_cemail);
> $sth->bind_col(11, \$u_curl);
> $sth->bind_col(12, \$u_btype);
> $sth->bind_col(13, \$u_hq);
> $sth->bind_col(14, \$u_quali);
> $sth->bind_col(15, \$u_experi);
> $sth->bind_col(17, \$u_inhouse);
> $sth->bind_col(18, \$u_resid);
> $sth->bind_col(19, \$u_ptel);
> $sth->bind_col(20, \$u_pfax);
> $sth->bind_col(21, \$u_pmobile);
> $sth->bind_col(22, \$u_pemail);
> $sth->bind_col(23, \$u_birthday);
> $sth->bind_col(24, \$u_marital);
> $sth->bind_col(25, \$u_spouse);
> $sth->bind_col(26, \$u_children_number);
> $sth->bind_col(27, \$u_children_names);
> $sth->bind_col(28, \$u_hobbies);
> $sth->bind_col(29, \$u_membership);
> $sth->bind_col(30, \$u_pcont);
> $sth->bind_col(31, \$u_permtel);
> $sth->bind_col(32, \$u_permfax);
> $sth->bind_col(33, \$u_nation);
> $sth->bind_col(34, \$u_course);
> $sth->bind_col(35, \$u_loginid);
> $sth->bind_col(36, \$u_japan_row);
> $sth->bind_col(37, \$u_password);
> $sth->bind_col(38, \$u_lastup);
> $sth->bind_col(39, \$u_ETPA_membership_paid);
> $sth->bind_col(40, \$u_ETPA_membership_expires);
>
> table structure:
>
>
>
> CREATE TABLE memberscopy (
> id int(6) default NULL,
> surname text,
> name varchar(50) default NULL,
> rank text,
> cname text,
> caddress text,
> ctel text,
> cfax text,
> cmobile text,
> cemail text,
> curl text,
> btype text,
> hq text,
> quali text,
> experi text,
> inhouse text,
> resid text,
> ptel text,
> pfax text,
> pmobile text,
> pemail text,
> birthday text,
> marital text,
> spouse varchar(150) default NULL,
> children_number varchar(150) default NULL,
> children_names varchar(150) default NULL,
> hobbies text,
> membership text,
> pcont text,
> permtel text,
> permfax text,
> course int(3) default NULL,
> nation varchar(40) default NULL,
> lastup year(4) default NULL,
> loginid text,
> password text,
> japan_row set('jjj','rrr') default NULL,
> ETPA_membership_paid date default NULL,
> ETPA_membership_expires date default NULL,
> face blob,
> KEY id (id),
> FULLTEXT KEY resid (resid)
> ) TYPE=MyISAM;
>
>
> ---------------------------------------------------------------------
> Before posting, please check:
> http://www.mysql.com/manual.php (the manual)
> http://lists.mysql.com/ (the list archive)
>
> To request this thread, e-mail <mysql-thread109081@stripped>
> To unsubscribe, e-mail <mysql-unsubscribe-
> root=svenbentlage.de@stripped>
> Trouble unsubscribing? Try: http://lists.mysql.com/php/unsubscribe.php
>
>
