while( ($vprofilenumber,
        $vStatus,
        $vPricePlusProduct,
        $vKeywords,
        $vUsername) = $sth->fetchrow) {
   print...
   ...
}