$username = DB::trim (param ("Username")); $password = DB::trim (param ("Password")); $dbh = DB::connect(); $sth = $dbh->prepare ("SELECT * FROM EmployerJobs WHERE Username = ? AND Password = ?"); $sth->execute($username, $password); while (my $row = $sth->fetchrow_hashref ()) { $ID = $row->{ID}; if ($userid eq $row->{USERID}) { $DISABLE = $row->{Disabled}; if (param("Disabled") eq "Yes") { $DISABLE = "Yes"; param (-name => "Disabled", -value => $DISABLE); param (-name => "ID", -value => $ID); $tbl_info = DB::TableInfo->get ($dbh, "EmployerJobs"); $tbl_info->update_record ($dbh, "ID"); }elsif (param("Disabled") eq "No") { $DISABLE = "No"; param (-name => "Disabled", -value => $DISABLE); param (-name => "ID", -value => $ID); $tbl_info = DB::TableInfo->get ($dbh, "EmployerJobs"); $tbl_info->update_record ($dbh, "ID"); }else { param (-name => "Disabled", -value => "No"); param (-name => "ID", -value => $ID); $tbl_info = DB::TableInfo->get ($dbh, "EmployerJobs"); $tbl_info->update_record ($dbh, "ID"); } } } $sth->finish (); $dbh->disconnect ();